Font İsimleri A Sütununda Online Eğitimler sadece 49,99 TL. Hem de ikinci eğitim ücretsiz! Makroyu Kopyala 'Excel Makro (VBA) online eğitimleri için: https://www.excelsizeyeter.com/excelsizeyeter.com/udemy_giris.php adresine tıklayınız. Bir eğitim alana bir eğitim bedavadır. İkinci eğitim olarak Excel, Excel pratik çözümler, finans eğitimleri vb. alabilirsiniz. Sub SchriftAuslesen() Dim cnt As CommandBarControl Dim intCounter As Integer Application.ScreenUpdating = False Set cnt = Application.CommandBars.FindControl(ID:=1728) For intCounter = 1 To cnt.ListCount With Cells(intCounter, 1) .Value = cnt.List(intCounter) .Font.Name = cnt.List(intCounter) End With Next intCounter Columns(1).AutoFit Application.ScreenUpdating = True End Sub Bu makro ile ilgili sorun bildir Bu makro çalışmıyor. Kodlarda bir hata var. Diğer Hata ile ilgili görüşlerinizi aşağıdaki kutuya yazabilirsiniz. Hata bildir TÜM MAKROLAR Youtube Kanalımız Aşağıdaki makrolar işinize yarayabilir. Benzer Sonuçlar NoMakro Adı 1 font isimleri a sütununda 2 b sütunundaki isimleri a sütunu ile karşılaştırır aynı olanları a sütunundan siler 3 excelde kendi eklenti ve fonksiyonlarınızı oluşturun 4 d, e sütununda tek tıklamayla check atma 5 sayfa1 a sütununda sıralı olmayan isimleri aynı anda sayfa2 a sütununda a-z ye sıralar 6 verileri isim sırasına göre dizer 7 verileri isim sırasına göre dizer 8 c sütunundakileri karşılaştırıp kaç tane olduğunu bulur ve diğer sayfaya aktarır 9 aktif sayfada aynı verilerin kontrolü 10 microsoft outlookdan uyarı e-maili göndersin 11 a1 sütununda çift kayıt girmek yasak (hücreye elle girersen siler) 12 kapali durumdaki c: est.xls dosyası açılacak ve içine c:userform1.frm ilave edildikten sonra kaydedilerek kapatilacaktir 13 menü çubuğunun silinmesi ve özel bir menünün oluşturulması 14 a,b,c,d sütunundaki verilerden H1'e yaz I1'de bulsun 15 sayfa isimlerini mesajla saydırma 16 a sütunundakiler combboxta, combobox seçilince b,c,d dekiler textboxta 17 sütunu seç kırmızı renkli rakamları a1 e toplasın 18 birden fazla isimlileri harcamalarıyla birlikte tek isim altında toplatma 19 süzme sütunda kırmızıları (butonla) 20 a1:af12 hücreleri arasındaki veriler yanıp söner