数式を別のシートにコピーする方法 Excel VBA

Excel VBA は、プログラムを使用してあるシートから別のシートに数式をコピーできる非常に強力なツールです。この記事では、Excel VBAを使って数式を別シートにコピーする方法を紹介します。

まず、同じシート上のあるセルから別のセルに数式をコピーする単純なマクロを作成します。次に、数式を別のシートにコピーするようにマクロを変更します。

入門

マクロを記録すると、Excel は記録したアクションを複製するために使用できる VBA コードを自動的に生成します。VBA コードを手動で記述して、同じ結果を達成することもできます。この記事では、両方の方法を説明します。

マクロの記録

マクロを記録するには、次の手順に従います。

1. コピーする数式が含まれるシートを含むワークブックを開きます。

2. 「開発」タブの「マクロの記録」ボタンを押します。「開発者」タブが表示されない場合は、ここをクリックして追加方法を確認してください。

3. マクロの名前を入力し、必要に応じてショートカット キーを選択します。

4. 「OK」をクリックします。

5. コピーする数式が含まれるセルを選択します。

6. 「Ctrl」+「C」を押して、選択したセルをコピーします。

7. コピーした数式を貼り付けるセルを選択します。

8. 「Ctrl」+「V」を押して、コピーした数式を貼り付けます。

9. 「開発」タブの「記録の停止」ボタンを押します。

これでマクロを使用する準備ができました。実行するには、割り当てたショートカット キーを押すか、[開発] タブの [マクロ] ボタンをクリックしてリストからマクロを選択するだけです。

VBA コードを手動で作成する

数行の VBA コードを記述しても、同じ結果を得ることができます。これを行うには、次の手順に従います。

1. コピーする数式が含まれるシートを含むワークブックを開きます。

2. 「Alt」+「F11」を押して、Visual Basic Editor を開きます。

3. 「挿入」 > 「モジュール」をクリックします。

4. 次のコードをモジュールに入力します。

サブコピー式()

薄暗いソース範囲としての範囲

ターゲット範囲を範囲として暗くする

Set sourceRange = Range(“A1”) 'A1 を数式セルに変更します

Set targetRange = Range(“B1”) 'B1 を貼り付けたいセルに変更します

targetRange.Formula = sourceRange.Formula

エンドサブ

5. 「F5」を押してコードを実行します。

これで、数式が目的のセルにコピーされるはずです。

マクロを変更して数式を別のシートにコピーする

前のセクションで記録したマクロは、同じシート内の数式のみをコピーします。ただし、数式を別のシートにコピーするように簡単に変更できます。これを行うには、次の手順に従います。

1. コピーする数式が含まれるシートを含むワークブックを開きます。

2. 「Alt」+「F11」を押して、Visual Basic Editor を開きます。

3. 画面左側のリストでマクロをダブルクリックします。マクロのコードが右側に表示されます。

4. 次のコード行を見つけます。

Set targetRange = Range(“B1”) 'B1 を貼り付けたいセルに変更します

5. SheetName!CellAddress の形式を使用して、数式を貼り付ける他のシートのセルに「B1」を変更します。たとえば、「Sheet2」という名前のシートのセル B2 に数式を貼り付ける場合は、コードを次のように変更します。

targetRange = Sheets(“Sheet2”).Range(“B2”) を設定します。

6. 「F5」を押してコードを実行します。数式が別のシートにコピーされるはずです。

最終的な考え

この記事を読むと、Excel VBA を使用して数式を別のシートにコピーする方法がわかるはずです。記録されたマクロはそのまま使用することも、ニーズに合わせて変更することもできます。Excel VBA についてさらに詳しく知りたい場合は、このテーマに関する他の記事をご覧ください。

これでチュートリアルは終わりです。