  |
Sub test3() Dim ws1 as Worksheet Dim ws2 as Worksheet Dim Filename as Variant Dim h as Long Filename = Application.GetOpenFilename("xlsmファイル,.xlsm", Multiselect := True) For h = 1 to 10 Workbooks.open(Filename(h)) Set ws1=Workboo...
わからなければわかるところまで分解しろと言う話
△△△＜教えてあげないよ！ジャン♪という話
Application.GetOpenFilename()の戻り値がVariant の配列なのであれば、for文は0から始めるべきなんじゃね？ VBAはインデックスまわりややこしかった気がするから自信ないけど あとは他の増田が言...
25
