5ちゃんねる ★スマホ版★ ■掲示板に戻る■ 全部 1- 最新50  

■ このスレッドは過去ログ倉庫に格納されています

Excel総合相談所 92

960 :959:2010/07/14(水) 00:32:40
>>947
もしくはこんな感じか?
Sub bbb()
Dim FN As Variant, WB As Variant
WB = Range("A1:A5").Value ' 予めセルA1〜A5にファイル名を入れとく
For Each FN In WB
Workbooks.Open Filename:="D:\data\" & FN
Next FN
End Sub

338 KB
★スマホ版★ 掲示板に戻る 全部 前100 次100 最新50

read.cgi ver 05.04.00 2017/10/04 Walang Kapalit ★
FOX ★ DSO(Dynamic Shared Object)