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)
ş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