slm dostlar.
Private Sub CommandButton5_Click()
a = InputBox("dosyanın adını giriniz")
On Error GoTo 10
Documents.Open FileName:="a.doc"
Exit Sub
10 MsgBox "dosya yok"
End Sub
yukarıdaki kodda yapmak istediğim şey açılması istenen dosyanın isminin InputBox'tan belirlemek. ama çalışmıyor.Normalde şu InputBox olayını kullanmadığım zaman çalışıyor.ama benim istediğim ismi InputBox ile belirlemek.
yardımcı olur musunuz?iyi çalışmalar.
Private Sub CommandButton5_Click()
a = InputBox("dosyanın adını giriniz")
On Error GoTo 10
Documents.Open FileName:="a.doc"
Exit Sub
10 MsgBox "dosya yok"
End Sub
yukarıdaki kodda yapmak istediğim şey açılması istenen dosyanın isminin InputBox'tan belirlemek. ama çalışmıyor.Normalde şu InputBox olayını kullanmadığım zaman çalışıyor.ama benim istediğim ismi InputBox ile belirlemek.
yardımcı olur musunuz?iyi çalışmalar.