hücre boyutu deger girerek değişsin

[uretimpark]

merhaba A1 hücresinde a degeri vardır, B1 hücresindede 10 degeri,

ben B1 hücresindeki degeri 20 yazdıgım zaman C5 hücresi 20 cm olur mu, olursa formulunu yazabilirmisiniz,

tesekkurler

 

[S.Yiğit]

Merhaba,

C5 hücresine =EĞER(B1=20;"20 cm";"") dener misiniz?

 

[uretimpark]

arkadasım cevabın için tesekkurler ama, istediğim sadece 20 ile sınırlı değil,
yani b1 hucresine 1,2,3... 100 degerlerini girdiğimde, C5 in sütun genişliği verdiğim degerler kadar uzayacak veya kısalacak... herhalde yanlış anlattım kusura bakmayın...

 

[omerceri]

Formülle sütun genişliği değiştirilemiyor. Makro ile yapmak istereseniz, ilgili sayfanın kod bölümüne aşağıdaki kodu yapıştırınız.

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$B$1" Then
Range("C5").ColumnWidth = Target * 5.1425 - 0.71
End If
End Sub

 

[uretimpark]

cok tesekkur ederim cevabınız için, bir şey daha istesem cevaplarmısınız,
sütun genişliği değişirken başka bir hücreye yazdıgımız deger ile satır yükseliğide değişir mi, ilginize tesekkur ederim

 

[omerceri]

A1 hücresine girdiğiniz değer = Yükseklik
B1 hücresine girdiğiniz değer = Genişlik
Değiştirir.
Ama Formdan aldığım cm'ye çevirme formülünü benmi yanlış anladım bilmiyorum ama doğru gözükmedi bana.
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$B$1" Then
Range("C5").ColumnWidth = -0.71 + 5.1425 * Target
End If
If Target.Address = "$A$1" Then
Range("C5").RowHeight = Target * 29.5
End If
End Sub

 

[uretimpark]

çok cok tesekkurler, cm olayına bir goz atmamız lazım geliyor...
cok guzel oldu,