数式を別のシートにコピーする方法 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 についてさらに詳しく知りたい場合は、このテーマに関する他の記事をご覧ください。

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

Leave a Comment

バージョンを削除してWindows 7ユニバーサルDVDを作成する

バージョンを削除してWindows 7ユニバーサルDVDを作成する

Windows XPのインストールは、インストールディスクのバージョンの違いが大きな原因で、多くのユーザーにとって非常に面倒な作業でした。ほとんどの人は

Snippage [ウィジェット] でライブ Web ページのコンテンツをデスクトップに表示する

Snippage [ウィジェット] でライブ Web ページのコンテンツをデスクトップに表示する

Snippageは、あらゆるウェブページの一部をキャプチャし、デスクトップ上のウィジェットとして使用できる優れたAdobe Airデスクトップアプリです。

Windows 8アカウントユーザーがインターネット設定を変更できないようにする方法 [ヒント]

Windows 8アカウントユーザーがインターネット設定を変更できないようにする方法 [ヒント]

Windows 10/11アカウントのユーザーがインターネット設定を変更できないようにする方法を学びましょう。これらの手順でネットワーク構成を安全に保ちましょう。

Windows 11でWi-Fiパスワードを見つける方法

Windows 11でWi-Fiパスワードを見つける方法

もうWi-Fiのパスワードを忘れることはありません!Windows 11でパスワードにアクセスして取得する方法を、簡単な手順でご紹介します。

お使いのコンピューターがOculus Riftと互換性があるか確認する

お使いのコンピューターがOculus Riftと互換性があるか確認する

Oculus Riftは、市場に投入されるVRヘッドセットの中で最も有望なものの一つです。発売から数年経ちますが、ついに発売されました。

iPadやAndroidタブレットでWindowsゲームをプレイ

iPadやAndroidタブレットでWindowsゲームをプレイ

PCゲームにモバイル版が存在することは稀で、モバイル端末ではデスクトップと同じ体験を提供できないため、当然のことです。たとえ

Windows 7で署名されていないドライバーをインストールする

Windows 7で署名されていないドライバーをインストールする

Windows XPからWindows 7に移行した場合、署名されていないドライバのエラーに遭遇する可能性があります。この記事では、そのようなエラーを削除するためのツールを紹介します。

Windowsレジストリキーのリアルタイム変更を監視する

Windowsレジストリキーのリアルタイム変更を監視する

Registry Live Watchは、定義したレジストリキーを監視する小さなユーティリティです。システムトレイに最小化すれば、すぐに起動します。

Desktop Hunter: 定義された画像圧縮レベルでスクリーンショットを撮る

Desktop Hunter: 定義された画像圧縮レベルでスクリーンショットを撮る

Desktop Hunterでスクリーンショットを最大限に活用しましょう。チュートリアルやガイド用のスクリーンショットを簡単にキャプチャして整理できます。

Do It Again: アクションを繰り返すための Windows 自動化ツール

Do It Again: アクションを繰り返すための Windows 自動化ツール

Do It Againは、ユーザーが一連のアクションやタスクを自動化して、手順に従わずに素早く実行できるようにする効率的な自動化ツールです。