Skip to main content

AccessTr.neT


Access 'ten Excele Veri Gönderirken Son Dulu Hücreyi Bulma Ve Değer Yazdırma

Access 'ten Excele Veri Gönderirken Son Dulu Hücreyi Bulma Ve Değer Yazdırma

#7
Burada 66 ve 90 arası gün sayısını eksik atıyor. değiştirdiğimde de hata veriyor.
Cevapla
#8
66 ve 90 gün sayısı değil Chr kod karşılığı 66 B 90 Z harflerine karşılık gelir

Kod:
Dim gun As Integer
gun = 0
For i = 66 To 90
Excl.Range(Chr(i) & "8") = Format(gun & " " & Me.DtDonem, "dd mmmm yyyy dddd")
gun = gun + 1
Next i
For i = 65 To 71
Excl.Range(Chr(65) & Chr(i) & "8") = Format(gun & " " & Me.DtDonem, "dd mmmm yyyy dddd")
gun = gun + 1
Next i

En pratik bu oldu kulağı biraz tersten göstermiş olduk ama Konuyu okuyan Hocalarımız daha başarılı bir kod sunacaktır.
Cevapla

Bir hesap oluşturun veya yorum yapmak için giriş yapın

Yorum yapmak için üye olmanız gerekiyor

ya da