excel如何判断指定文件夹中有没有另一个文件夹？如果没有就创建

2025-04-16 02:04:40

推荐回答（1个）

回答1：

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Row = 1 And Target.Column = 3 Then
On Error Resume Next
MkDir "f:\项目\" & Range("a1") & "-" & Range("b1") & "-" & Range("c1")
ActiveSheet.Hyperlinks.Add Anchor:=Range("A1"), Address:="F:\项目\" & Range("a1") & "-" & Range("b1") & "-" & Range("c1")
End If
End Sub
按alt +f11，打开你需要填管理项目的表（在窗口左侧），把代码复制进去就OK了，工作簿需要启用宏