Hai Imar,
Coba buat prosedur dan diisi dengan :
Dim sPath As String
sPath = "G:\temp\kid"
If LenB(Dir$(sPath, vbHidden + vbDirectory)) = 0 Then
MkDir sPath
SetAttr sPath, vbHidden
MsgBox "Done." & vbCrLf & "Folder '" & sPath & "' selesai dibuat
dan berstatus hidden", vbInformation
Else
SetAttr sPath, vbHidden
MsgBox "Folder sudah ada.", vbExclamation
End If
Wassalamu'alaikum Wr. Wb.
Kid.
2013/2/4 Imar Andre <[email protected]>
> **
>
>
> Dear Be Exceler,
>
> Saya mau meng-savecopyas dalam folder baru yang di hidden, bagaimana macro
> untuk membuat folder baru dan attribute-nya hidden.
> Terima kasih sebelumnya.
>
>
> Wassalam
> imar
>
> _
>
