ActiveCell

[mrt]

Selamlar,


Log adında sayfası oluşturdum.

Bu sayfaya User sayfasındaki A sutunun son satırında yazan ismi; aşağıdaki koda nasıl yazabilirim.

ActiveCell.Offset(0, 0).Value = "" user sayfası a sutunu son satır
ActiveCell.Offset(0, 1).Value = Format(Now, "Long Date")
ActiveCell.Offset(0, 2).Value = Format(Time, "Long Time")

 

[N.Ziya Hiçdurmaz]

Yanıt

son = Sheets("user").Cells(65536, "a").End(3).Row
ActiveCell.Offset(0, 0).Value = Sheets("user").Cells(son, "a")
ActiveCell.Offset(0, 1) = Format(Now, "Long Date")
ActiveCell.Offset(0, 2).Value = Format(Time, "Long Time")

 

[mrt]

Sn. N.Ziya HİÇDURMAZ
Teşekkürler,

 

[N.Ziya Hiçdurmaz]

Bişey değil