数式を別のシートにコピーする方法 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 11のフォトアプリのファイルシステムエラーを修正:効果的な迅速で簡単な解決策

Windows 11のフォトアプリのファイルシステムエラーを修正:効果的な迅速で簡単な解決策

Windows 11のフォトアプリでファイルシステムエラーが発生していませんか? ストレスなくスムーズに画像を表示できる、実証済みの解決策をご紹介します。ステップバイステップのガイドで、すぐに問題を解決できます。

セキュリティの力を解き放つ:Windows 11 の BitLocker 暗号化を数分で有効にする方法

セキュリティの力を解き放つ:Windows 11 の BitLocker 暗号化を数分で有効にする方法

Windows 11 で BitLocker 暗号化を有効にする手順ガイドをご覧ください。専門家のヒントを活用してデータを簡単に保護し、PC に最高レベルのセキュリティを確保しましょう。

Windows 11 HDMI 2.1 4K 120Hz の問題に対する究極の修正: 今すぐスムーズなゲーム体験を実現!

Windows 11 HDMI 2.1 4K 120Hz の問題に対する究極の修正: 今すぐスムーズなゲーム体験を実現!

Windows 11 HDMI 2.1 4K 120Hz エラーでお困りですか?画面が真っ黒になったり、ちらついたり、リフレッシュレートの問題が発生したりしても、4K ゲームや動画をスムーズに楽しめるよう、実証済みの解決策をご紹介します。ステップバイステップのガイド付き。

Windows 11 スタートアップ修復のロックを解除: 数分でブートの問題を修正し、すぐにオンラインに戻ります。

Windows 11 スタートアップ修復のロックを解除: 数分でブートの問題を修正し、すぐにオンラインに戻ります。

Windows 11のスタートアップ修復機能を使って、起動時の問題を素早く診断・修復する方法をご紹介します。データを失うことなくPCを復元するためのヒントをまとめたステップバイステップガイド。スムーズなパフォーマンスを実現するために不可欠なトラブルシューティング。

🚀 究極のガイド: Windows 11 DirectAccess 接続エラーを数分で修正します!

🚀 究極のガイド: Windows 11 DirectAccess 接続エラーを数分で修正します!

Windows 11のDirectAccess接続エラーでお困りですか?実証済みのステップバイステップの解決策で、シームレスなVPNアクセスを復元し、生産性を向上しましょう。技術的な専門知識は必要ありません!

Windows 11のWindows Hello PINリセットエラーを修正:アクセスを回復するための簡単ガイド

Windows 11のWindows Hello PINリセットエラーを修正:アクセスを回復するための簡単ガイド

Windows 11 の Windows Hello PIN リセットエラーでお困りですか? 実証済みのトラブルシューティング手順で、迅速に問題を解決し、ストレスなく安全なログインを取り戻しましょう。スムーズな Windows エクスペリエンスを実現するための最新のヒントも掲載しています。

🚀 クイックフィックス: Windows 11 Microsoft Store エラー 0x80073D05 を数分で解消!

🚀 クイックフィックス: Windows 11 Microsoft Store エラー 0x80073D05 を数分で解消!

Windows 11のMicrosoft Storeエラー0x80073D05に悩まされていませんか?アプリのダウンロードをスムーズにするための、実証済みのステップバイステップの解決策をご紹介します。技術的な専門知識は必要ありません。

🚀 究極の解決策:Windows 11 キャプチャカードが 60FPS で信号なしになる問題を解決する - 簡単ガイド

🚀 究極の解決策:Windows 11 キャプチャカードが 60FPS で信号なしになる問題を解決する - 簡単ガイド

Windows 11のキャプチャカードで60FPSで信号が出ないという問題でお困りですか?スムーズな60FPSのストリーミングと録画を復元するための実証済みの解決策をご紹介します。シームレスなゲームキャプチャを実現するためのステップバイステップのソリューションです。

ピークパワーを解き放つ:2026年にWindows 11 Ultimateパフォーマンスプランの問題を解決する方法

ピークパワーを解き放つ:2026年にWindows 11 Ultimateパフォーマンスプランの問題を解決する方法

Windows 11 のパフォーマンス低下にお悩みですか?Ultimate Performance Plan のステップバイステップの修正方法で、驚異的なスピードを取り戻し、PC を簡単に最適化できます。最新の 2026 ビルドに更新されています。

🚨 究極ガイド:Windows 11 セーフモードでネットワークエラーが発生した場合の修復方法(高速かつ簡単)

🚨 究極ガイド:Windows 11 セーフモードでネットワークエラーが発生した場合の修復方法(高速かつ簡単)

Windows 11のセーフモードでネットワークエラーが発生して困っていませんか? 実証済みの手順で、迅速に問題を解決し、インターネットアクセスを復旧して、PCをスムーズに動作させることができます。技術的なスキルは必要ありません!