son boş satır

[polis-53]

Merhaba arkadaşlar günaydın excel dosyamı her açtığımda imlec son boş satırda olsun istiyorum yardım ederseniz sevinirim.

 

[asi_kral]

Merhaba arkadaşlar günaydın excel dosyamı her açtığımda imlec son boş satırda olsun istiyorum yardım ederseniz sevinirim.

Merhaba
Boş bir module kopyalayın ve deneyin.

Option Explicit
Sub AUTO_OPEN()
'Konu       :   Son Boş Satırı Seç
'Mail       :   m.batu.1967@gmail.com
'Msn        :   m.batu.1967@hotmail.com.tr
'Skype      :   m.batu.1967
'Coder By   :   asi_kral_1967
Dim asi As Long
asi = Range("A" & Rows.Count).End(xlUp).Row
Range("A" & asi).Select
End Sub

 

[polis-53]

teşekkürler asi bey bizim için her yer trabzon

 

[asi_kral]

teşekkürler asi bey bizim için her yer trabzon

Kolay Gelsin.