Excel Forum
ALTIN ÜYELİK Hakkında Bilgi


Geri Git   Excel Forum > EXCEL-Soruları > Excel'e Yeni Başlayanlar
Atatürk
Şifremi Unuttum

DUYURU SİSTEMİ / REKLAM PANOSU

Excel'e Yeni Başlayanlar Excel kullanmaya yeni başladıysanız sorularınızı buraya gönderebilirsiniz.
Dosya ekleyebilirsiniz

Özel Arama


Yanıtla
 
Paylaş Konu Araçları Görünüm Modları
Eski 16-02-2007, 13:07   #1
komutan63
Altın Üye
 
komutan63 kullanıcısının avatarı
 
Giriş: 07/07/2006
Şehir: Ankara
Mesaj: 1,608
Excel Vers. ve Dili:
Excel-2003 Türkçe Excel-2010 Türkçe
Varsayılan Yazımın uzunluğuna göre hücre açılsın

Arkadaşlar merhabalar

hücreye yazdığım metne göre hücre açılsın istiyorum.örneğin iki satır yazdıysam o kadar açılsın daha fazla yazdıysam bu defa o yazdığım kadar açılsın istiyorum. Nasıl yapabilirim?

Not: Forumda aradım orada Biçim>Sütun>En uygun genişlik var ama o benim istediğim gibi değil, Hatta Wordde tabloya yazı yazdığımızda sığmadığında aşağıya doğru açılıyorya aynı onun gibi

Saygılar sunuyorum.
komutan63 Çevrimdışı   Alıntı Yaparak Cevapla
Eski 16-02-2007, 13:37   #2
bilginoz
Altın Üye
 
Giriş: 24/01/2007
Mesaj: 17
Excel Vers. ve Dili:
Türkçe
Varsayılan

Tüm hücreleri seçip herhangi birisinin üzerinde sağ tıklayıp Hücreleri biçimlendire tıkladıktan sonra Hizalama ya tıkla. Buradan altta "Metini Kaydır" kutusunu işaretle. Bu işlem yazdığın metine göre Satır genişlemesini sağlıyor. Ama Sutun genişlemesini sağlamıyor. Sutunun nasıl genişleyeceğini bilmiyorum. Umarım bu işini görür
bilginoz Çevrimdışı   Alıntı Yaparak Cevapla
Eski 16-02-2007, 13:40   #3
komutan63
Altın Üye
 
komutan63 kullanıcısının avatarı
 
Giriş: 07/07/2006
Şehir: Ankara
Mesaj: 1,608
Excel Vers. ve Dili:
Excel-2003 Türkçe Excel-2010 Türkçe
Varsayılan

Alıntı:
bilginoz tarafından gönderildi Mesajı Görüntüle
Tüm hücreleri seçip herhangi birisinin üzerinde sağ tıklayıp Hücreleri biçimlendire tıkladıktan sonra Hizalama ya tıkla. Buradan altta "Metini Kaydır" kutusunu işaretle. Bu işlem yazdığın metine göre Satır genişlemesini sağlıyor. Ama Sutun genişlemesini sağlamıyor. Sutunun nasıl genişleyeceğini bilmiyorum. Umarım bu işini görür
Teşekkürler

işime yaradı

kolay gelsin
komutan63 Çevrimdışı   Alıntı Yaparak Cevapla
Eski 16-02-2007, 13:48   #4
komutan63
Altın Üye
 
komutan63 kullanıcısının avatarı
 
Giriş: 07/07/2006
Şehir: Ankara
Mesaj: 1,608
Excel Vers. ve Dili:
Excel-2003 Türkçe Excel-2010 Türkçe
Varsayılan

Bu defa sadece yazdığım hücreyi genişletiyor ama diğer hücreler geneşlemediği için yazı tabiki net görünmüyor

yani sorun halen devam ediyor bu şekildi sorun kısmen çözülüyor
komutan63 Çevrimdışı   Alıntı Yaparak Cevapla
Eski 16-02-2007, 13:48   #5
Seyit Tiken
Uzman
 
Seyit Tiken kullanıcısının avatarı
 
Giriş: 22/08/2005
Şehir: MARDİN
Mesaj: 3,652
Excel Vers. ve Dili:
Excel : 2010
Varsayılan

Örnek kodu deneyiniz. Hücre Biçimlendirme'de METNİ KAYDIR'ı seçili yapın.

Private Sub Worksheet_Change(ByVal Target As Range)
If Len([A1] = 1) Then [A1].Rows.AutoFit
End Sub
__________________
Sizi, Boş Yere Yarattığımızı ve Bize Döndürülmeyeceğinizi mi Sandınız? (Müminun-115)

Ve Kim Benim Zikrimden Yüz Çevirirse, O Taktirde Mutlaka Onun İçin Sıkıntılı Bir Geçim (Hayat) Vardır. Ve Kıyâmet Günü Onu, Kör Olarak Haşredeceğiz (Tâhâ-124)

İnsanın En Büyük Dostu Allah'tır - (MİHR)
Seyit Tiken Çevrimdışı   Alıntı Yaparak Cevapla
Eski 16-02-2007, 13:58   #6
komutan63
Altın Üye
 
komutan63 kullanıcısının avatarı
 
Giriş: 07/07/2006
Şehir: Ankara
Mesaj: 1,608
Excel Vers. ve Dili:
Excel-2003 Türkçe Excel-2010 Türkçe
Varsayılan

Alıntı:
Seyit Tiken tarafından gönderildi Mesajı Görüntüle
Örnek kodu deneyiniz. Hücre Biçimlendirme'de METNİ KAYDIR'ı seçili yapın.

Private Sub Worksheet_Change(ByVal Target As Range)
If Len([A1] = 1) Then [A1].Rows.AutoFit
End Sub
Hocam harikasın

çok teşekkürler

Kolay gelsin


Not: Sizler varken NO PROBLEM!!!!!!!!!!!!!!
komutan63 Çevrimdışı   Alıntı Yaparak Cevapla
Eski 16-02-2007, 14:09   #7
Seyit Tiken
Uzman
 
Seyit Tiken kullanıcısının avatarı
 
Giriş: 22/08/2005
Şehir: MARDİN
Mesaj: 3,652
Excel Vers. ve Dili:
Excel : 2010
Varsayılan

Bu kod hem Satır hemde Sütun genişliklerini otomatik olarak ayarlıyor.

Private Sub Worksheet_Change(ByVal Target As Range)
If Len([A1] = 1) Then
[A1].Rows.AutoFit
[A1].Columns.AutoFit
End If
End Sub
__________________
Sizi, Boş Yere Yarattığımızı ve Bize Döndürülmeyeceğinizi mi Sandınız? (Müminun-115)

Ve Kim Benim Zikrimden Yüz Çevirirse, O Taktirde Mutlaka Onun İçin Sıkıntılı Bir Geçim (Hayat) Vardır. Ve Kıyâmet Günü Onu, Kör Olarak Haşredeceğiz (Tâhâ-124)

İnsanın En Büyük Dostu Allah'tır - (MİHR)
Seyit Tiken Çevrimdışı   Alıntı Yaparak Cevapla
Eski 16-02-2007, 15:55   #8
komutan63
Altın Üye
 
komutan63 kullanıcısının avatarı
 
Giriş: 07/07/2006
Şehir: Ankara
Mesaj: 1,608
Excel Vers. ve Dili:
Excel-2003 Türkçe Excel-2010 Türkçe
Varsayılan

Alıntı:
Seyit Tiken tarafından gönderildi Mesajı Görüntüle
Örnek kodu deneyiniz. Hücre Biçimlendirme'de METNİ KAYDIR'ı seçili yapın.

Private Sub Worksheet_Change(ByVal Target As Range)
If Len([A1] = 1) Then [A1].Rows.AutoFit
End Sub
Hocam kusura bakmayın ama satırdaki bir kısım hücreyi birleştirdikten sonra içine yazdığım yazıyı tek hücreye yazdığım yazı gibi genişleterek yazmıyor bunun için bir çözümünüz var mı?

Saygılar
komutan63 Çevrimdışı   Alıntı Yaparak Cevapla
Eski 16-02-2007, 16:22   #9
komutan63
Altın Üye
 
komutan63 kullanıcısının avatarı
 
Giriş: 07/07/2006
Şehir: Ankara
Mesaj: 1,608
Excel Vers. ve Dili:
Excel-2003 Türkçe Excel-2010 Türkçe
Varsayılan

Alıntı:
Seyit Tiken tarafından gönderildi Mesajı Görüntüle
Bu kod hem Satır hemde Sütun genişliklerini otomatik olarak ayarlıyor.

Private Sub Worksheet_Change(ByVal Target As Range)
If Len([A1] = 1) Then
[A1].Rows.AutoFit
[A1].Columns.AutoFit
End If
End Sub
Hocam verdiğiniz kodlar la birlikte METNİ KAYDIR seçeneğini işaretliyorum buraya kadar tamam. Ama birkaç tane hücreyi birleştirdiğimde o birleştirdiğim hücreye birşeyler yazdığımda birleştirilmiş hücreyi yazdığım yazı kadar açmıyor. diğer tek hücreler için sorun yok.

Saygılar
komutan63 Çevrimdışı   Alıntı Yaparak Cevapla
Eski 16-02-2007, 17:18   #10
Seyit Tiken
Uzman
 
Seyit Tiken kullanıcısının avatarı
 
Giriş: 22/08/2005
Şehir: MARDİN
Mesaj: 3,652
Excel Vers. ve Dili:
Excel : 2010
Varsayılan

Aşağıdaki kod birleştirilmiş hücredeki krakter sayısına göre satır genişlemesini varsayılan olarak gerçekleştiriyor. Kendi çalışmanıza uydurunuz. Farklı kod satırını ilave edebilirsiniz.

Private Sub Worksheet_Change(ByVal Target As Range)
If Len(Range("A1").Value) < 10 Then [a1].RowHeight = 15
If Len(Range("A1").Value) > 10 Then [a1].RowHeight = 30
End Sub
__________________
Sizi, Boş Yere Yarattığımızı ve Bize Döndürülmeyeceğinizi mi Sandınız? (Müminun-115)

Ve Kim Benim Zikrimden Yüz Çevirirse, O Taktirde Mutlaka Onun İçin Sıkıntılı Bir Geçim (Hayat) Vardır. Ve Kıyâmet Günü Onu, Kör Olarak Haşredeceğiz (Tâhâ-124)

İnsanın En Büyük Dostu Allah'tır - (MİHR)
Seyit Tiken Çevrimdışı   Alıntı Yaparak Cevapla
Yanıtla


Konu Araçları
Görünüm Modları

Gönderme Kuralları
You may not post new threads
You may not post replies
You may not post attachments
You may not edit your posts

BB code is Açık
SimgelerAçık
[IMG] kodu Açık
HTML kodu Kapalı


Saat 14:05


Bu forum Elit NET - www.elitnet.com.tr tarafından sunulmaktadır.

Excel Eğitimi - Mobil Uygulama - Çorlu - Çorlu Web Tasarım -- Beylikdüzü mali müşavir - Lingerie - Dyeing Machine - Karton Bardak- Çorlu Dil Konuşma Terapisti- Çorlu Özel Eğitim- Site Yönetimi- Pronet Tekirdağ- Çorlu Kamera- Pronet Edirne- Pronet Çorlu- Çorlu Araç Takip- Çorlu Su Arıtma- Gebze Emlak- Rampa- Rotary- Çorlu İnternet Sitesi- Çorlu Sürücü Kursu- Çorlu Sürücü Kursu- Şişli Avukat- Edirne Serbest Muhasebeci- Çorlu Etüt- İstanbul Botanik- Çorlu Sigorta- Kağıt Bardak- Kaplan Tekstil- Çorlu Perde- Çorlu Havuz- Makina- Danışmazlar-
Powered by vBulletin Version 3.7.2
Copyright ©2000 - 2018, Jelsoft Enterprises Ltd.
Advertisement System V2.6 By   Branden