VBAを使用して対象のファイルをアクティブにする方法 シート選択も

Windows(ThisFilename).Activate
※赤文字にアクティブにしたいファイル名を入力

Sheets("データ").Select
※対象のシートを選択

--------------------------------------------------------------------------
Dim ThisFilename As String

Sub Data_File_Select()
ThisFilename = "AAA.xls"

Windows(ThisFilename).Activate
Sheets("データ").Select

End Sub
--------------------------------------------------------------------------

EXCEL VBA xls Excel2003