vba文件夾
㈠ 用VBA如何批量將工作表保存到指定的文件夾
用vba保存到指定的文件夾,這種情況下,我們就是在電腦上先建立一個文件夾,然後上傳保存就可以了
㈡ vba操作文件夾
Sub 拷貝文件夾()
On Error Resume Next
Set fs = CreateObject("Scripting.FileSystemObject")
For i = 2 To 100
If Cells(i, 1) = "" Then Exit For
OldString = "路徑說明書"
NewString = "路徑" & Cells(i, 1) & "說明書"
fs.Copyfolder OldString, NewString
Set fs = Nothing
Next
End Sub
㈢ VBA 如何顯示文件夾,就是只打開文件夾就可以了
直接使用Shell函數,使用explorer.exe來打開文件夾即可。代碼如下:
Subshowdir()
Shell"explorer.exeD:dir",vbNormalFocus
EndSub
效果如下:
Shell 函數說明
運行可執行程序並在成功時返回表示程序的任務 ID 的 Variant (Double),否則返回零。
語法
Shell(pathname[,windowstyle])
Shell 函數語法具有以下命名參數:
組成部分
說明
pathname
必需;Variant (String)。要執行的程序的名稱以及任何必需的參數或命令行開關;可能包括目錄或文件夾和驅動器。在 Macintosh 中,可以使用 MacID 函數指定應用程序的簽名,而不是名稱。以下示例使用 Microsoft Word 的簽名:
Shell MacID("MSWD")
windowstyle
可選。與要運行程序的窗口的樣式對應的 Variant (Integer)。如果省略 windowstyle,程序將啟動並最小化,但會獲得焦點。在 Macintosh(System 7.0 或更高版本)中,windowstyle 只確定應用程序在運行時是否獲得焦點。
windowstyle 命名參數具有以下值:
常量 值 說明
vbHide 0 隱藏窗口並將焦點傳遞給隱藏的窗口。vbHide 常量在 Macintosh 平台中不適用。
vbNormalFocus 1 窗口獲得焦點,並還原到其原始尺寸和位置。
vbMinimizedFocus 2 窗口顯示為具有焦點的圖標。
vbMaximizedFocus 3 窗口最大化並具有焦點。
vbNormalNoFocus 4 窗口還原到最近的尺寸和位置。當前活動的窗口仍保持活動狀態。
vbMinimizedNoFocus 6 窗口顯示為圖標。當前活動的窗口仍保持活動狀態。
注釋
如果 Shell 函數成功執行命名文件,它將返回已啟動程序的任務 ID。任務 ID 是標識正在運行的程序的唯一編號。如果 Shell 函數無法啟動指定的程序,則會發生錯誤。
在 Macintosh 中,vbNormalFocus、vbMinimizedFocus 和 vbMaximizedFocus 都將應用程序放在前台;vbHide、vbNoFocus、vbMinimizeFocus 都將應用程序放在後台。
㈣ 如何用VBA復制整個文件夾包括子目錄
Sub Files(Path As String, afterPath)
'Path:原文件夾路徑;afterPath:目標文件夾路徑
Dim Spath As String
Set fs = CreateObject("Scripting.FileSystemObject")
Spath = Dir(Path, vbDirectory)
Do While Len(Spath)
If Spath <> "." And Spath <> ".." Then
fs.CopyFolder Path, afterPath
Spath = Dir()
End If
Loop
End Sub
————————————————
版權聲明:本文為CSDN博主「前端小菜鳥007」的原創文章,遵循CC 4.0 BY-SA版權協議,轉載請附上原文出處鏈接及本聲明。
原文鏈接:https://blog.csdn.net/weixin_41844140/article/details/103188537