他のブック名を指定して開きます
プログラム
(例)ブックのフルパス=”C:\Sample.xlsx”
Dim WbXls 'ブックを紐づける為の変数
Dim bookName As String 'ブックのフルパス
Dim fName As String 'ブックのファイル名
'----------------------------------------
bookName = "C:\Sample.xlsx"
fName = "Sample.xlsx"
'----------------------------------------
'ブックを開く
Workbooks.Open Filename:=bookName
'----------------------------------------
'ブック内をコントロールするために代入
Set WbXls = Workbooks(fName)
'----------------------------------------
'閉じる
Application.DisplayAlerts = False '警告OFF
WbXls.Close
Application.DisplayAlerts = True '警告ON
'----------------------------------------
'後片付け
Set WbXls = Nothing
'----------------------------------------
Amazon | 本, ファッション, 家電から食品まで | アマゾン
Amazon.co.jp 公式サイト。アマゾンで本, 日用品, ファッション, 食品, ベビー用品, カー用品ほか一億種の商品をいつでもお安く。通常配送無料(一部を除く)