çizgi boyunun makro ile uzatılması

[BG]

arkadaşlar ekte bir dosya gönderiyorum, açıklama içindedir yardım ederseniz çok memnun olurum şimdiden herkese teşekkürler

 

[Seyit Tiken]

Bu şekilde deneyin.

Private Sub Worksheet_Change(ByVal Target As Range)
ActiveSheet.Shapes("Line 7").Height = [A4].Value
End Sub

 

[uzmanamele]

merhaba
ekdeki gibi olabilir mi

 

[BG]

hocam çok teşekkür ederim, tam olarak böyle bir şeydi, emeğinize sağlık