Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


17378 / 76738 ←次へ | 前へ→

【64814】Re:【初心者】任意のブックの指定
発言  かみちゃん E-MAIL  - 10/3/15(月) 20:15 -

引用なし
パスワード
   こんにちは。かみちゃん です。

>しかし、随時出てくるブックは常にブック名が変化します。
>(A'、A''、A'''、A''''…)
>
>したがってマクロを組んだとしても、プログラムは随時出てくるCHFのブック名に対応していないので、マクロは作動しません。
>
>このような状況下で、任意のブックを指定する方法はございますでしょうか?

一例として、以下のような感じです。
Aというブックを選択して、開くという処理をする場合に変数WBに格納するという例です。

Sub Sample()
 Dim WB As Workbook
 Dim strFileName As String
 
 strFileName = Application.GetOpenFilename("Excelファイル,(*.xls)", , "ブックAを選択してください")
 If strFileName = "False" Then
  MsgBox "処理を中止しました"
  Exit Sub
 End If
 Set WB = Workbooks.Open(strFileName)
 MsgBox WB.FullName & vbCrLf & WB.Path & vbCrLf & WB.Name
End Sub

0 hits

【64811】【初心者】任意のブックの指定 dodemoee 10/3/15(月) 16:58 質問
【64814】Re:【初心者】任意のブックの指定 かみちゃん 10/3/15(月) 20:15 発言
【64854】Re:【初心者】任意のブックの指定 dodemoee 10/3/19(金) 14:39 お礼

17378 / 76738 ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free