Excel bu hata mesajlarını niye verir?

[Tevfik_Kursun]

Günaydın Arkadaşlar,
Excel'de daha önce almadığım bu mesajları, makro çalıştığında, bu sabah itibariyle almaya başladım. Nedeni ne olabilir?
Saygılarımla

 

[Cengiz Demir]

Excel güncelleme sonrası sorun olmuş olabilir.
İşyerimde buna benzer sorunla karşılaşmıştık. Aynı sürüm excelerde, bende sorunsuz çalışan makrolu bir dosya, başka excellerde çalışmamıştı.
İzinde olduğum için benim laptobumdaki excel güncellememişti.
Tam emin olmamakla beraber, sorunun güncellemeden kaynaklandığını düşündük.

Hatta daha önce bu forumda, sorunu olan bir arkadaşın dosyasını açtığımda, işyerindeki hataya benzer bir hata almıştım. O zaman sürüm farkıdır diye önemsememiştim.

 

[halit3]

Ofis 2003 için ve üzeri için kodları buna benzer bir yapı ile tanımlamak gerekiyor.

If uzanti = "xls" Then
adoCN.Open = "Provider=Microsoft.Jet.OLEDB.4.0;" & "Data Source=" & myFile & ";Extended Properties=""Excel 8.0;HDR=yes"""  'ofis 2003
ElseIf uzanti = "xlsb" Or uzanti = "xlsx" Or uzanti = "xlsm" Then
adoCN.Open = "Provider=Microsoft.ACE.OLEDB.12.0;" & "Data Source=" & myFile & ";Extended Properties=""Excel 12.0;HDR=yes""" 'ofis 2007
End If

 

[Tevfik_Kursun]

Sayın Cengizdemir.72,
İlginize teşekkür ederim. Şüphelenmiştim ama karar veremedim.
Sayın Halit3 Hocam,
İlginize teşekkür ederim. Evet, makro çalışmaya başladı. Biraz fazla ağır çalışıyor nedenini anlamadım.
Saygılarımla