Aktif Hücrenin Temel Bilgilerini Bulma isimli içerikte, ilgili işlemin VBA kodları ile nasıl yapacağınızı öğreten bir Hazır Makro Kodu yer almaktadır.
Faydalanılması temennisiyle
Hazır Kod
VBA:
Sub Aktif_Hucre_Bilgileri()
Dim s As Integer
Dim z As Integer
Dim t As String
Dim u As String
s = ActiveCell.Column
z = ActiveCell.Row
t = Columns(s).Address(0, 0)
u = Rows(z).Address(0, 0)
MsgBox "Sütun Numarası:" & s & Chr$(13) & Chr$(13) & "sütun ismi(n): " & Left(t, InStr(t, ":") - 1) & Chr$(13) & Chr$(13) & "Satır Numarası: " & Left(u, InStr(u, ":") - 1) & Chr$(13) & Chr$(13) & "Aktif Hücre Adresi: " & Left(t, InStr(t, ":") - 1) & Left(u, InStr(u, ":") - 1), _
vbOKOnly, "Aktif Hücre Adresi ..."
End SubAçıklama
Excel'de hangi hücre seçilmişse, o hücreye ait kodlamalarda kullanılacak olan temel bilgileri listeler.Faydalanılması temennisiyle