+- AccessTr.neT (https://accesstr.net)
+-- Forum: Microsoft Access (https://accesstr.net/forum-microsoft-access.html)
+--- Forum: Access Cevaplanmış Soruları (https://accesstr.net/forum-access-cevaplanmis-sorulari.html)
+--- Konu Başlığı: Access 'ten Excele Veri Gönderirken Son Dulu Hücreyi Bulma Ve Değer Yazdırma (/konu-access-ten-excele-veri-gonderirken-son-dulu-hucreyi-bulma-ve-deger-yazdirma.html)
Sayfalar:
1
2
RE: Access 'ten Excele Veri Gönderirken Son Dulu Hücreyi Bulma Ve Değer Yazdırma - SeferŞANLI - 27/11/2021
Burada 66 ve 90 arası gün sayısını eksik atıyor. değiştirdiğimde de hata veriyor.
RE: Access 'ten Excele Veri Gönderirken Son Dulu Hücreyi Bulma Ve Değer Yazdırma - lemoncher2 - 27/11/2021
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