pozdravljeni,
rad bi izvedel sledeč makro
Dim Mapa As String
Mapa = InputBox("Napiši pot do mape...", "vnos gesla", "C:\Users\luka\Desktop\september 2010")
.......
.......
torej, v inputbox-u je privzeta pot.
želel bi, da v kolikor na računalniku ne najde te poti, torej mape,
v msgbox napiše
msgbox "določili ste napačno pot"
upam, da ne bo prehudo
že v naprej se zahvaljujem.
lp
pogoj v inputbox-u
Re: pogoj v inputbox-u
Tole je funkcija, ki jo iščete:
Koda: Izberi vse
Option Explicit
Sub MapaObstaja()
Dim mapa As String: mapa = "C:\Users\luka\Desktop\september 2010"
Dim fso: Set fso = CreateObject("Scripting.FileSystemObject")
If Not fso.FolderExists(mapa) Then
MsgBox mapa & " ne obstaja!", vbInformation, "Napačna pot"
End If
End Sub
lp,
Matjaž Prtenjak
Administrator
Matjaž Prtenjak
Administrator
Re: pogoj v inputbox-u
pozdravljeni,
uhhh, tega pa sam nebi spravil skupaj...
najlepša hvala za pomoč
lp
uhhh, tega pa sam nebi spravil skupaj...
najlepša hvala za pomoč
lp