DOSYA İndirmek/Yüklemek için ÜCRETLİ ALTIN ÜYELİK Gereklidir!
Altın Üyelik Hakkında Bilgi
Sub DOSYA_AC()
Dim Yol As String
Yol = "\\PC-BILGISAYAR\Mmn Kasa\Turkcell\Aylık Ortalamalar.xlsx"
On Error Resume Next
Workbooks.Open Yol
End Sub
Merhaba,
Aşağıdaki kodu kullanabilirsiniz.
Kod:Sub DOSYA_AC() Dim Yol As String Yol = "\\PC-BILGISAYAR\Mmn Kasa\Turkcell\Aylık Ortalamalar.xlsx" On Error Resume Next Workbooks.Open Yol End Sub