数式を別のシートにコピーする方法 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 10でBluetoothをオフにする方法(Bluetoothを無効にする)

Windows 10でBluetoothをオフにする方法(Bluetoothを無効にする)

PCやラップトップのBluetoothは非常に便利ですが、オフにしたい場合もあります。今日では、その方法をよく説明しています。

Windows10でマウスのプライマリボタンを変更する方法

Windows10でマウスのプライマリボタンを変更する方法

Windows10でマウスのプライマリボタンを変更する方法

Microsoft Edge about:flagsページにアクセスする方法

Microsoft Edge about:flagsページにアクセスする方法

Microsoft EdgeはChromiumベースです。Google Chromeに存在する機能の多くを活用しつつ、独自の機能も備えています。

MSIアフターバーナーの使用方法–詳細ガイド

MSIアフターバーナーの使用方法–詳細ガイド

コンピュータのハードウェアコンポーネントは、より高いパフォーマンスを引き出すためにおいて重要な役割を果たします。MSIアフターバーナーでGPUを最適化しましょう。

Windows10で複数のファイルにOpenWithを使用する方法

Windows10で複数のファイルにOpenWithを使用する方法

Windows 10のファイルコンテキストメニューには、[プログラムから開く]という便利なオプションがあります。このオプションを使用すると、ユーザーはファイルを開くためのアプリを選択できます。

Windows または macOS コンピュータでグラフィックス ドライバを再起動する方法

Windows または macOS コンピュータでグラフィックス ドライバを再起動する方法

グラフィックス ドライバーを再起動し、グラフィックス関連の望ましくない問題にスマートに対処する方法を学び、自分自身の PC トラブルシューティングの専門家になりましょう。

Windows 10のOneDriveによる高いCPU使用率を修正する方法

Windows 10のOneDriveによる高いCPU使用率を修正する方法

Windows 10のOneDriveによる高いCPU使用率を修正する方法

エラー0x800705b4(Windows Update)を修正する方法–究極のガイド

エラー0x800705b4(Windows Update)を修正する方法–究極のガイド

マイクロソフトでは、デバイスの安全性を維持し、さまざまな問題を修正できるように、システムアップデートを定期的にインストールすることを強くお勧めします。

Steam 1ファイルを修正する方法は検証に失敗し、再取得されます

Steam 1ファイルを修正する方法は検証に失敗し、再取得されます

Steamは優れたゲーム配信プラットフォームですが、さまざまなエラーが発生することがあります。この記事では、特に「1ファイルの検証に失敗し、再取得されます」というエラーを修正する方法を説明します。

Windows10で空のフォルダーを見つける方法

Windows10で空のフォルダーを見つける方法

Windows 10で空のフォルダーを効率的に見つける方法について詳しく解説します。