Hücre yazımın uzunluğu kadar açılsın

[Mdemir63]

Selamlar

Arkadaşlar birleştirilmiş hücreler içine yazı yazdığımda hücrenin kendiliğinden yazının uzunluğuna göre açılmasını istiyorum. (Metni kaydır kullanmadan) Aşağıdaki kodlarla yaptım ama istediğim gibi olmadı. Çünkü bu kodlar yazını boyutuna göre açmadı. daha fazla açtı.Benim istediğim ise benim yazım ne kadarsa o kadar açsın. Nasıy yapmam konusunda aydınlatırsanız sevinirim.

Saygılar

Private Sub Worksheet_Change(ByVal Target As Range)
If Len(Range("A13").Value) < 10 Then [A13].RowHeight = 100
If Len(Range("A13").Value) > 10 Then [A13].RowHeight = 200
End Sub

 

[conari]

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Target.EntireColumn.AutoFit
End Sub

 

[Mdemir63]

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Target.EntireColumn.AutoFit
End Sub

Selamlar

Arkadaşım güzel ama hücreden çıktıktan sonra tek satır haline geliyor.

Saygılar

 

[conari]

Selamlar

Arkadaşım güzel ama hücreden çıktıktan sonra tek satır haline geliyor.

Saygılar

istediğiniz; Hücreye girilen yazı kadar hücrenin genişlemesi değilmi benmi yanlış anladım.

bir hücre ki yazı sütun genişliğinden uzun ise AutoFit
ile sütun yazı kadar genişletilir.

??

 

[Mdemir63]

istediğiniz; Hücreye girilen yazı kadar hücrenin genişlemesi değilmi benmi yanlış anladım.

bir hücre ki yazı sütun genişliğinden uzun ise AutoFit
ile sütun yazı kadar genişletilir.

??

Selamlar

Ben genişlemiyor demiyorum zaten . Kodlar görevini yapıyor ama hücreden çıkınca teksatır gibi görünüyor. Benim istediğim ben ne kadar yazarsam yazdığım kadar genişlesin ve o şekilde görünsün. umarım anlatabilmişimdir.

Teşekkürler

 

[kulomer46]

birde hücre biçimlendir - hizalama - metni kaydır ı işaretli hale getirin birde böyle deneyin bakalım olacakmı..

 

[conari]

Pardon
birleştirilmiş hücreler demişsiniz.

 

[conari]

birde hücre biçimlendir - hizalama - metni kaydır ı işaretli hale getirin birde böyle deneyin bakalım olacakmı..

metni kaydır ı kullanıldığında bu özellik zaten kullanmanızın bir önemi kalmıyor.

Ozaman Metni kaydırmaz yani hücreyi genişletir çünkü.

 

[Mdemir63]

birde hücre biçimlendir - hizalama - metni kaydır ı işaretli hale getirin birde böyle deneyin bakalım olacakmı..

Selamlar

Metni kaydır kullanmadan diye özellikle belirtmiştim. İlginize teşekkürler.
ama bunun bir çözümü olması gerekir diye düşünüyorum.

Kolay gelsin

 

[conari]

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
With Selection
If .WrapText = False Then
.EntireColumn.AutoFit
End If
End With
End Sub

Metni kaydır özelliği yok ise colonu genişlet.
böyle deneyin bakalım

 

[Mdemir63]

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
With Selection
If .WrapText = False Then
.EntireColumn.AutoFit
End If
End With
End Sub

Metni kaydır özelliği yok ise colonu genişlet.
böyle deneyin bakalım

Selam

Yine önceki gibi genişletiyor ama hücreden çıkınca tek satır olarak gösteriyor.

 

[conari]

Böyle olmayacak örnek bir dosya ekleyebilirmisin.:roll:

 

[kulomer46]

kusura bakmayın. gerçekten "metni kaydır olmasın" notunuz gözümden kaçmış,
ek dosya gönderirseniz çözümü bulan arkadaşlardan bizde faydalanabiliriz..

 

[Mdemir63]

Böyle olmayacak örnek bir dosya ekleyebilirmisin.:roll:

Selam

Sizin verdiğiniz kodlarla bir örnek dosya gönderiyorum.
Sarı renkli hücreye bakabilirsiniz.

 

[Mdemir63]

kusura bakmayın. gerçekten "metni kaydır olmasın" notunuz gözümden kaçmış,
ek dosya gönderirseniz çözümü bulan arkadaşlardan bizde faydalanabiliriz..

Selam,
Arkadaşım olur mu öyle şey takmayın kafanıza
Saygılar

 

[conari]

@Sayın Komutan63
belgenizde sarı hücre birleştirilmiş hücrelerden oluşuyor ve metni kaydır özelliği yok.

Birleştirilmiş hücrelerde Autofit özelliği kullanılamaz..

 

[Mdemir63]

@Sayın Komutan63
belgenizde sarı hücre birleştirilmiş hücrelerden oluşuyor ve metni kaydır özelliği yok.

Birleştirilmiş hücrelerde Autofit özelliği kullanılamaz..

İlginize Teşekkürler

 

[Levent Menteşoğlu]

Aşağıdaki linklerde vermiş olduğum dosyaları inceleyin.

Hücre yüksekliğinin otomatik ayarlanması

hücre satır genişliği hk