1

私は Excel VBA マクロにかなり慣れていません。ループに問題があります。助けが要る。全体の流れを説明しました。

Shipper VP というソース Excel タブがあります。Jason、Ken、Steve という 3 人の人物について、異なる年の異なる月の出荷値があります。

ループを使用して Excel マクロを作成したいと考えています。私は、各人に 3 つの異なるマクロを記録することによって、すべてのことを行いました。しかし、これらのマクロのコードは非常に長く、ほとんどのものは共通です。ループを使用して、手動で値を入力せずにコードを効率的にしたいと考えています。

ループを使用したい場合、n = 1 ~ 3; n = 1 の場合、

追加のシートを作成し、この場合は B4 値である [Shipper VP] タブから人の名前をコピーして名前を変更したいと考えています。したがって、追加のシートが作成され、JASON という名前が付けられます。

その後、JASON タブに別の値を入力したいと思います。

次の重要なステップでは、Shipper VP タブから Jason タブに異なる列の値をコピーします。

B9:B17 の値を (Shipper VP タブから) セル値 D7:D15 に (JASON タブに) コピーします。
B19:B30 の値を (Shipper VP タブから) セル値 D16:D27 に (JASON タブに) コピーします。
B32:B43 の値を (Shipper VP タブから) セル値 D28:D39 に (JASON タブに) コピーします。
B45:B56 の値を (Shipper VP タブから) セル値 D40:D51 に (JASON タブに) コピーします。
B58:B69 の値を (Shipper VP タブから) セル値 D52:D63 に (JASON タブに) コピーします。

その後、再び多くの他の値が JASON タブに入力され、一連の計算が行われ、2 つの異なる列の値に基づいて、見出しタイトルが JASON のチャートが作成され、チャートの名前が Jason に変更されます。

次のループでは、n = 2、

2 番目のケンという人物にもまったく同じものが必要です。

2 番目のシートを作成し、この場合は C4 値である [Shipper VP] タブから人の名前をコピーして名前を変更したいと考えています。そのため、追加のシートが作成され、KEN という名前が付けられます。

その後、JASON で行ったのとまったく同じように、[KEN] タブにさまざまな値を入力します。

しかし今、Shipper VP タブから KEN タブに異なる列の値をコピーしたいと考えています。

C9:C17 の値を (Shipper VP タブから) セル値 D7:D15 に (KEN タブに) コピーします。
C19:C30 の値を (Shipper VP タブから) セル値 D16:D27 に (KEN タブに) コピーします。
C32:C43 の値を (Shipper VP タブから) セル値 D28:D39 に (KEN タブに) コピーします。
C45:C56 の値を (Shipper VP タブから) セル値 D40:D51 に (KEN タブに) コピーします。
C58:C69 の値を (Shipper VP タブから) セル値 D52:D63 に (KEN タブに) コピーします。

その後、他の多くの新しい値が KEN タブに入力され、一連の計算が行われ、2 つの異なる列の値に基づいて、KEN というタイトルの見出しを持つチャートが作成され、チャートの名前が Ken に変更されます。(この部分はJASON以前と同じです)。

次のループ n= 3 では、Steve という 3 人目の人物についてもまったく同じことが必要です (今回は、すべての値が [Shipper VP] タブの D 列から取得されます)。

プロセス全体を完全に説明したかったのです。ループコードのヘルプは本当にありがたいです。基本的に主な問題は、さまざまな列の値を Shipper VP から個々のタブにコピーし、ループでインクリメントすることです。計算はできます。

4

1 に答える 1

0
  1. 各 VP に 1 つずつ、合計 3 つのタブを作成します。
  2. グラフやその他すべてを使用して、必要に応じて各タブを設定します。[Shipper VP] タブを参照する (つまり、 を使用する=ShipperVP!A1) ことを忘れないでください。これらの値はコピーしないでください。

そして実際、それはそれについてです。コードは不要で、一度実行するだけで済みます。

これをさらに一歩進めて、3 つの個別のファイルを作成して、各人に独自のタブを送信できるようにすることもできます。

  1. 最初の VP タブを開くマクロを作成します。
  2. すべて選択
  3. コピー
  4. 値を貼り付けます(これにより参照が削除されます)
  5. タブを新しいものとして新しいワークブックにコピーします
  6. 一意の名前を付けて新しいブックを保存します
  7. 次の VP について繰り返します。

反復的なコードを節約するために、VP 名をパラメーターとして使用して、ステップ 1 から 6 を関数に入れることができます。

于 2013-06-04T21:37:05.350 に答える