• DİKKAT

    DOSYA İndirmek/Yüklemek için ÜCRETLİ ALTIN ÜYELİK Gereklidir!
    Altın Üyelik Hakkında Bilgi

Çözüldü VERİ DOĞRULAMA İLE OLUŞTURDUĞUM LİSTEDEKİ DEĞERLERİ DAHA BÜYÜK NASIL OLUR

Katılım
8 Haziran 2018
Mesajlar
52
Excel Vers. ve Dili
Microsoft 365 Tr 64 bit
Ekteki dosyada kod sayfasında kodlarım mevcut. liste sayfasında da veri doğrulama ile oluşturduğum kod listesi mevcut. listeye tıkladığım zaman içindeki değerlerin daha büyük görünmesini nasıl yapabilirim. ( yazı karakteri boyutunu büyütmek istiyorum listedeki değerleri seçmeye çalıştığım zaman )
 

Ekli dosyalar

Bildiğim kadar veri doğrulama listesindeki yazıları büyütemezsiniz.Listede büyütme seçeneği yok.
 
Yazı büyütmeye çare olmaz.Diğer istekleriniz için dosya ektedir.
 

Ekli dosyalar

buna benzer birşey kullanıyorum ama listeyi tıkladığımda yazıları büyük olarak gösteremiyorum. Yine de ilginiz için teşekkür ederim

Şaka yapıyorsunuz galiba ..... verdiğim dosyayı makroları etkinleştirerek açtıktan sonra, içinde veri doğrulama olan D3 hücresini tıkladınız mı?





.
 
Son düzenleme:
Şaka yapıyorsunuz galiba ..... verdiğim dosyayı makroları etkinleştirerek açtıktan sonra, içinde veri doğrulama olan D3 hücresini tıkladınız mı?





.
özür dilerim , dikkat etmemişim:)) ben gruplamayı görünce hiç makroya bakmak aklıma gelmedi. bu makroyu orijinal dosyamda deneyip size bilgi vereceğim.
 
Şaka yapıyorsunuz galiba ..... verdiğim dosyayı makroları etkinleştirerek açtıktan sonra, içinde veri doğrulama olan D3 hücresini tıkladınız mı?





.
denedim çalışıyor ama çokkk büyüyor size ekte orjnal dosyayı gönderdim. SıparişFormu çalışma sayfasında B,C,D sütünları liste şeklinde ve çok büyüyor :) toplamda 15 satır liste mantıyla çalışıyor. Bunu sınırlama şansımız var mı ? :) Yani o alanlar sadece 1 kere büyüsün taki liste olmayan alan seçilince küçülsün şeklinde . Kullanıcı tarafından rahat olması açısından.
 

Ekli dosyalar

Önceki kodu silip, dosyanızın SIPARIS FORMU sayfa modulüne aşağıdaki kodları yapıştırıp, deneyin.

Kod:
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    On Error GoTo SafeExit:
        If Target.Validation.Type = xlValidateList Then
            ActiveWindow.Zoom = 125
            Exit Sub
        End If
SafeExit:
    ActiveWindow.Zoom = 40
End Sub

Kodlardaki 125 ve 40 değerlerini isteğinizi karşılayacak şekilde değiştirin.

.
 
Önceki kodu silip, dosyanızın SIPARIS FORMU sayfa modulüne aşağıdaki kodları yapıştırıp, deneyin.

Kod:
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    On Error GoTo SafeExit:
        If Target.Validation.Type = xlValidateList Then
            ActiveWindow.Zoom = 125
            Exit Sub
        End If
SafeExit:
    ActiveWindow.Zoom = 40
End Sub

Kodlardaki 125 ve 40 değerlerini isteğinizi karşılayacak şekilde değiştirin.

.
elinize sağlık tam istediğim gibi (y)(y)(y)(y)(y)(y)(y)(y)
 
Geri
Üst