MACRO Hata Veriyor ?

[boncuk_kurt]

Merhaba Arkadaslar,

Ekteki dosyada " AKTAR " butonu tıklandıgında hata vermektedir.Hata nedeni nedir ?

Uzman arkadasların yardımlarını rica ederim.

Tesekkurler,

 

[Merhum İdris SERDAR]

ThisWorkbook'taki kodda yer alan sayfa adının sonunda boşluk var. Onu silin.



Private Sub Workbook_Open()
Sheets("Creances en Euro").Range("D6:J46").ClearContents


End Sub


Aynı şekilde, Sub al() makrosunda da bu düzeltmeleri yapın.


.

 

[Orion1]

"Creances en Euro " dan sondaki boşluğu kaldırınız.
say0 = Sheets("Creances en Euro ").[A65536].End(3).Row

 

[boncuk_kurt]

Tesekkurler arkadaslar,

Birsey daha sormak istiyorum,

Gondermis oldugum dosya aylık olarak refresh yapılmaktadır. " Bakiye " sayfasına yeni bir musteri kodu eklendiginde " Creance en EUR " sayfasına yeni eklenen musteri kodu macro ile nasıl eklenebilir ?

Tesekkurler,

 

[Orion1]

Sheets("Creances en Euro").Cells(65536, "A").End(xlUp)(2, 1) = kod