Skip to main content

AccessTr.neT


Puantaj Programı Excele Aktarma Son Satır

Puantaj Programı Excele Aktarma Son Satır

#5
Kod:
excl.Range("C" & i + 11 & ":" & "D" & i + 11).MergeCells = True
excl.Range("C" & i + 11 & ":" & "D" & i + 11).Font.Bold = True
excl.Range("C" & i + 11) = "TANZİM EDEN"

excl.Range("C" & i + 14 & ":" & "D" & i + 14).MergeCells = True
excl.Range("C" & i + 14) = rs3(0)

excl.Range("C" & i + 15 & ":" & "D" & i + 15).MergeCells = True
excl.Range("C" & i + 15) = rs3(2)

sn berduş'un katkıları ile düzenlenen kodlarda tanımlanan i ile son satırı zaten alıyordum, ben ayrıca son satırı bulup üzerinden devam etmek istedim kod yazımındaki mantığı daha iyi anlayabilmek için olmadı. İlk yazdığımda çalışan kodlar daha sonra çalışmadı bende sayın berduş'un kodları üzerinden devam ettim.
şimdi personel izin veya görev giderse bunları aktarmak için uğraşıyorum puantaj içerisine tamamen bu siteye güvenerek girdim izin görev vs aktarma işine takıldığım/ yapamadığım yerde yardım geleceğine eminim. Teşekkür ederim ilgindiğiniz için
Cevapla

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

Yorum yapmak için üye olmanız gerekiyor

ya da

Bu Konudaki Yorumlar
RE: Puantaj Programı Excele Aktarma Son Satır - Yazar: angelos - 10/10/2022, 11:47
Task