(14/06/2019, 20:03)zaferlacin yazdı:(13/06/2019, 22:10)haliliyas yazdı: son olarak da aşağıdaki kodu bir deneyin istersenizBen çözemedim bu kodları da kullandım bazen çalışıyor bazen çalışmıyor
Dim appExcel As excel.Application
Dim myWorkbook As excel.Workbook
Set appExcel = CreateObject("Excel.Application")
Set myWorkbook = appExcel.Workbooks.Open(DosyaAdiveYolu)
appExcel.Visible = True
myWorkbook.Activate '<==eklendi
Set appExcel = Nothing
Set myWorkbook = Nothing
problemin proje veya kodlardan değil de bilgisayarım yada excel'den kaynaklı olduğunu düşünüyorum
bilgisayar ayarları ya da Excel ayarları konusunda tahmini çözüm bilgisi olan olursa
yardımlarını bekliyorum Teşekkür ederim
Projemde formumu açıyorum
Set myWorkbook = appExcel.Workbooks.Open(DosyaAdiveYolu)
bu satırda dosyaAdi tekrar yazıyorum
kaydedip çıkıyorum çalışıyor
programdan çıkış yapıyorum sonra tekrar açıp deniyorum çalışmıyor
dosyaadi nı tekrar yazıp kaydediyorum dosya adını değiştirmiyorum aynısını yazıyorum kaydediyorum
çalışıyor
çözemedim