エクセルでマクロを使用して自動的にデータをインポートする方法

2年 ago
蓮, 翼
1 minute

業務内容の自動インポートは、マクロを用いて以下手順を実行することで可能になります。

  1. 「Alt + F11」を押して、Excel ファイルを開き、VBA エディターを起動します。
  2. VBAエディタで、マクロを実行したいブックを選択する。
  3. VBAエディタの「挿入」メニューから「モジュール」を選択する。
  4. 新規にモジュールを作成し、マクロの本文を記載する。

例えば以下は、データをインポートするために簡単なマクロを使用する方法です。

Sub ImportData()
' 定义变量
Dim wb As Workbook
Dim ws As Worksheet
Dim dataPath As String
Dim dataSheet As String
' 设置数据文件路径和工作表名称
dataPath = "C:\data.xlsx"
dataSheet = "Sheet1"
' 打开数据文件
Set wb = Workbooks.Open(dataPath)
' 指定数据文件中的工作表
Set ws = wb.Sheets(dataSheet)
' 将数据复制到当前工作表
ws.UsedRange.Copy Destination:=ThisWorkbook.ActiveSheet.Range("A1")
' 关闭数据文件
wb.Close SaveChanges:=False
End Sub

上のコードでは、dataPath, dataSheetを変数名として指定し、インポートするデータ ファイルのパスとワークシート名を指定する値に変更する必要があります。変更後、コードをコピー＆ペーストして VBA エディターに保存します。

  1. 実行ボタンをクリックするか、”F5″ キーを押してマクロを実行します。データは現在のブックのアクティブワークシートの “A1” セルから自動的にインポートされます。

マクロを実行する前に、データファイルとワークブックが互換性があり、パスとワークシート名が正しいことを確認してください。

bannerAds