03/12/2023, 23:15
Formülsüz Vba İle Satır Ve Sütun Eklemeli Excel Çalışması
04/12/2023, 11:59
feraz
Son hali ekte.
Bazı yerleri dizi ile yaptım ve roketlendi ve hata verirse kod duruyordu bunun için eklemeler yaptım.
bana göre tam çalışıyor yinede tam deneyin.
Eğer doğru çalışıyorsa bu dosyadaki kodları deneyin.
Eğer userform istemiyorsanız onu silip çift tıklama kodunuda silin.
Bazı yerleri dizi ile yaptım ve roketlendi ve hata verirse kod duruyordu bunun için eklemeler yaptım.
bana göre tam çalışıyor yinede tam deneyin.
Eğer doğru çalışıyorsa bu dosyadaki kodları deneyin.
Eğer userform istemiyorsanız onu silip çift tıklama kodunuda silin.
04/12/2023, 19:39
hnakis
(04/12/2023, 11:59)feraz yazdı: Son hali ekte.
Bazı yerleri dizi ile yaptım ve roketlendi ve hata verirse kod duruyordu bunun için eklemeler yaptım.
bana göre tam çalışıyor yinede tam deneyin.
Eğer doğru çalışıyorsa bu dosyadaki kodları deneyin.
Eğer userform istemiyorsanız onu silip çift tıklama kodunuda silin.
sayın feraz uygulama gerçekten hızlandı, ama B sütunu yada eklene diğer sütunlarda bazı eklemeler yapmıştım bir önceki uygulamaya. şimdi bu uygulamada hata veriyor.
B sütunundaki seçime göre sütun genişliği eklenen içerik sütunlarının yazı tip vs gibi özellikleri(Kalınlık ve hücre ortalama gibi)
eski kod
syf.Columns(sutunekle).AutoFit
syf.Columns(sutunekle).HorizontalAlignment = xlCenter
syf.Columns(sutunekle).Font.Bold = True
04/12/2023, 20:36
feraz
05/12/2023, 11:01
hnakis
(04/12/2023, 20:36)feraz yazdı:(04/12/2023, 19:39)hnakis yazdı: syf.Columns(sutunekle).AutoFitYanılmıyorsam bu kodları silmiştim çünkü bu kodlar tek tek ekliyordu ama yenide tümünü birden ekliyor.
syf.Columns(sutunekle).HorizontalAlignment = xlCenter
syf.Columns(sutunekle).Font.Bold = True
Hatalı dosyayı yüklerseniz uyarlayayım.
sayın feraz hallettim teşekkürler. kodları inceliyorum öğrenmek için, iyi oluyor.
05/12/2023, 11:19
feraz
Rica ederim,anlamadığınız yer varsa sorabilirsiniz.