メモ

メモ VBA

Private Sub OpenFolder(Path As String)
Dim sa
Set sa = CreateObject("Shell.Application")
sa.Open Path
End Sub