Bir Sütun içerisinde bilgi yazılı son hücre

[mikadoo]

selamlar

Bir sütundaki dolu olan en son hücrenin içindeki bilgiyi başka bir hücreye nasıl yazdırabilirim?
Örneğin a sütunun dolu olan en son hücresi a450 hücresi diyelim.Bunun aşağısındaki tüm hücreler a65536 ya kadar boş.Bu en son dolu olan hücreyi bulup içindeki bilgiyi b1 hücresine yazdırmak istiyorum.

Formu dolaştım biraz ama bulunacak gibi değil.

yardım için teşekkürler.

 

[mehmett]

Arada boş hücreler yoksa aşağıdaki fonksiyonu kullanabilirsiniz.

=DOLAYLI("A"&BAĞ_DEĞ_DOLU_SAY(A:A))

 

[Ali]

Sub aktar()
Range("B1") = Cells(65536, 1).End(xlUp).Value
End Sub

 

[mikadoo]

ikiside işimi gördü
teşekkür ederim