Public Function PostojiFolder(ByVal F As String) As Boolean
Dim objFSO As New FileSystemObject
Set FSO = New FileSystemObject
PostojiFolder = FSO.FolderExists(F)
End Function
Hvala.
Da li treba neku Referencu ukljuciti?
Uredu je trebalo je u Referencama dodati Microsoft Scripting Runtime.