Satır Yukseklıgını hesaplama

[falkan]

Arkadaslar Merhaba

Excel dosyamda verıler var. Satır yukseklıklerı farklı, her satırın yukseklıgını hesaplayan functıon veya bı kod varmı bukonuda yardımcı olabılırmısınız.

Tesekkurler

 

[uzmanamele]

merhaba

bu kod işinizi görür mü?

Private Sub Worksheet_Change(ByVal Target As Range)
If Intersect(Target, [a:a]) Is Nothing Then Exit Sub
Target.Offset(0, 1) = Target.RowHeight
End Sub

 

[falkan]

Tesekkurler
bu kodu nereye nasil yazacagimi bilmiyorum. Kusura bakmayin yardimci olurmusunuz.

 

[Merhum İdris SERDAR]

ALT ve F11' basın.

Insert > Module

Ve buraya

Function satyük(cell As Range) As String

satyük = cell.RowHeight

End Function


Herhangi bir hücreye, Örneğin

=Satyük(A5) yazarsanız, size 5'inci satırın yüksekliğini verir.

.

 

[falkan]

Emeginize saglik arkadaslar cok tesekkur ederim.