Merhaba arkadaşlar,

Uzun zamandır sorunsuz kullandığım excel ile hazırlanmış programımda dosya bulunamadı hatası alıyorum. programın iki dosya halinde calışıyor. iki dosyada aynı klasorde olmasına rağmen dosya bulunamadı hatası veriyor. Yardımlarınızı vekliyorum. Şimdiden teşekkurler...

Hata verdiği satır şu:

Alıntı:
Sub Duğme65581_Tıklat()
Range("E4").Select
Sheets("İLETİŞİM").Select
Application.Run "'ccc.xlk'!Duğme2_Tıklat"
Range("E4:E2982").Select
Selection.Copy Range("E3").Select
Sheets("BORC ODEME GİRİŞİ").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _ :=False, Transpose:=False Range("E4").Select
Sheets("MUŞTERİ İLK GİRİŞİ").Select
Range("E4").Select
Application.CutCopyMode = False
ActiveWindow.SmallScroll Down:=-9
Application.Run "'ccc.xlk'!Duğme1_Tıklat"
Sheets("BORC ODEME GİRİŞİ").Select
Range("F4").Select
End Sub

__________________