回覆列表
-
1 # 使用者5944070487834
-
2 # 羽諾池唯
Set objFD = Application.FileDialog(msoFileDialogFolderPicker)With objFDIf .Show = -1 Then" 如果單擊了確定按鈕,則將選取的路徑儲存在變數中sPath = .SelectedItems(1)End IfEnd With
-
3 # 使用者3197016599696632
以msgbox為例,根據返回值判斷即可。示例:Dim aa As Long '定義用於接收變數aa = MsgBox("是否確定", vbYesNo, "提示選擇:") '提示選擇對話方塊If aa = 6 Then '判斷按鈕值,是為6,否為7MsgBox "你按了是"ElseMsgBox "你按了否"End If
我看你題目沒說一定要用批處理,所以給你介紹另外的操作:
使用Total Commander進行搜尋。如圖示它可以搜尋純文字內容。於是,你搜索含有“信用不良”字樣的檔案——輸出到面板——全選——移動到指定資料夾即可。另一處也是這樣操作。