0

この問題にどう対処すればよいかまったくわかりません。私の VBA スキルは非常に弱いものです。このデータは、3 つの列と一定ではない行数 (任意の数の行である可能性があります) で構成されています。

各列の各値を取得し、それを変数として別のシートに挿入しようとしています。これら 3 つの列は異なる変数であるため、異なるセルに移動します。これらの変更の効果が収集され、結果が得られた各行に沿ってセルに配置されます。つまり、行 1 は 2/3/4 である可能性があります。同じ行に沿って、右側の数個のセルに、方程式のさまざまな値に対する変数 (2/3/4) の効果が置かれています。

これが実行された後、次の行に移動し、同じ操作を実行します。これは、その行に沿って値を取得し、それをスプレッド シートに挿入して、同じ行に沿って結果を配置することです。

マクロは、テーブルの最後で実行を停止します。

Worksheets("Sheet2").Activate

    Worksheets("Sheet2").Range("A9").Select
    Worksheets("Rating").Range("B3") = ActiveCell.Offset(0, 0).Value

    Worksheets("Sheet2").Range("B9").Select
    Worksheets("Rating").Range("B5") = ActiveCell.Offset(0, 0).Value

    Worksheets("Sheet2").Range("C9").Select
    Worksheets("Rating").Range("B6") = ActiveCell.Offset(0, 0).Value


Do
    If ActiveCell.Value = "" Then Exit Do
    ActiveCell.Offset(1, 0).Select

Loop

正直なところ、これをコーディングする方法がわかりません。どんな助けでも素晴らしいでしょう..ありがとう

4

1 に答える 1