Excel VBA 質問スレッド No.193 (未解決)

fso(ファイルパスのリストで自動処理したい)

投稿者 : ts     投稿日時 : 2021/03/13(Sat) 18:13:03     OS : Windows 10     EXCEL : Excel 2016
以下のコードのsSource = "???"

この???を、【フルパスのリスト(エクセルのシートのセル範囲で)】とする方法はないでしょうか?
又は、リストのセル(フルパス)をクリックして、マクロが動くように設定する方法をご教示頂けないでしょうか?初心者で調べていたのですが、わからなかった次第です。

Sub FileSystemObjectCopyFileTest()
Dim fso As New FileSystemObject
Dim sSource
Dim sDest
sSource = "???"
sDest = "\///\"
Call fso.CopyFile(Source:=sSource, Destination:=sDest)
End Sub

[返信 1] Re : fso(ファイルパスのリストで自動処理したい)
投稿者 : ヘンリー     投稿日時 : 2021/03/13(Sat) 21:12:40
> この???を、【フルパスのリスト(エクセルのシートのセル範囲で)】とする方法はないでしょうか?
セルを1つずつ読み込み、データの最終行まで繰り返せばできると思います。

> 又は、リストのセル(フルパス)をクリックして、マクロが動くように設定する方法をご教示頂けないでしょうか?初心者で調べていたのですが、わからなかった次第です。

WorksheetのSelectionChangeイベントで可能だと思います。

当掲示板について
返信入力フォーム
お 名 前  :
内  容   :
ステータス  : この質問を解決済みにする

認証コード  :
        キャプチャ画像


( 処理日時 : 2021-04-21 08:19:01 )

Page
Top