WinActorで実装できました！！ ありがとうございます！！ 検索の仕方が問題だったようです。。。

VBSについて質問です。 -------------------------------------------- kouban = "2022000" strFrom = "C:\Users\Downloads\" & kouban & "\*.xml" strTo = "C:\Users\Desktop\" & kouban &"\"...

anothersolution様 ご回答ありがとうございます。 いただいたアドバイスで省略できました！ ありがとうございます！ mstscというコマンドは私も知りませんでした。。。...

'Iniファイルから変数へ main() Function main() ' ファイル入出力の定数 Const conForReading = 1, conForWriting = 2, conForAppending = 8 conIniFileName = !IniFile! pram_Section = !Section!...

Cドライブの中に存在するファイル名〜フルパスを取得したい ファイルリストやVBA/VBS方面で何とかなった感じでしょうか。 　 　 .rdpのフルパス取得は、実行のためだと思うんです。...

anothersolution様 ご回答ありがとうございます。 cd C:¥ cd %APPDATA%￥Microsoft￥Workspaces￥{＊ cd Resource mstsc "ファイル名.rdp" 上記cmdで実行できたのですが、1行でまとめて実行することは可能ですか？？

sourei様
ご回答ありがとうございます。 複数のフォルダーが存在していた場合、 「ファイル一覧(ファイル名)取得(ソート順あり)」 で ソート順1のフォルダー名取得して、そのフォルダーの中に指定したファイル名の存在有無を確認、...

sourei様 ご回答ありがとうございます。 「最後のフォルダー名」 ややこしい表現をしてしまい申し訳ありません。 私の中の「最後のフォルダー名」は、...

sourei様 すみません。質問に対する答えになっていませんでした。 Workspacesの中には今のところ1つしかフォルダーは存在していません。 そのフォルダー名が取得できれば問題ありません。

sourei様 ご回答ありがとうございます。 C:Usersユーザー名AppDataRoamingMicrosoftWorkspaces の後のファイルパスがユーザーごとに16進数のようなもので違い、共通で使用できないのでワイルドカードで回避しようとしています。...

Yosh様 ご回答ありがとうございます。 objWshShell.SpecialFolders("AppData") で少しできるようになりました！ ありがとうございます！

Cドライブの中に存在するファイル名の途中に、フォルダー名にワイルドカードを含めた状態でファイル名を指定してフルパスを取得したいのですが、どのようにすれば取得できるのか教えていただきたいです！...

やんちゃボーイ 様 マクロを実行した際の「Set WS」に指定したシート名と、ActiveSheetが一緒だからうまくいった、ということですね！！！ 私のミスした考えを読み取っていただきありがとうございます！！...

namirai 様 エラーが出る箇所は、 WS.Range(Range("A1"), Cells(Rows.Count, 1).End(xlDown)).Clear この行ですよね。 この行の前に、 WS.Select を追加すればいいと思います。...

ご回答ありがとうございます。 そちらでエラーは回避できました！ ですが、なぜ Set WS = Sheets("1") の場合はSelectしなくてもできるのでしょうか？ Variant型特有なのでしょうか？？

VBA '------------------------------------------- Dim i& Dim WS As Worksheet Dim 貼付シート名 As Variant 貼付シート名 = Array("", _ "1", _ "2", _ "3", _ "4") For i = 1 To UBound(貼付シート名)...

ご回答ありがとうございます。 結構前に作成したかなり奥深いシナリオだったので、現在全体的に使用しています。 なので元のまま使用するとうまくいかない場所が不明の段階にあります。。。

----解決済-----