sevensuleyman
Altın Üye
- Katılım
- 9 Kasım 2012
- Mesajlar
- 198
- Excel Vers. ve Dili
- office 2010
- Altın Üyelik Bitiş Tarihi
- 08-12-2027
merhaba ; aşağıda bulunan vba koldarı ile excell sayafamı kopyalıyorum. bu excell sayfasında formüllerim mevcut formülleri boş olarka göstermekteyim. b sütunu boş ise tüm satırı silmesini istiyorum. kopyalama yaparken boş satırları silmesi için kodu nasıl düzenlemem gerekir. yardımcı olursanız sevinirim.
Range("B1").Select
Application.CutCopyMode = False
Sheets("ürünler").Copy
Application.DisplayAlerts = False
ActiveWorkbook.SaveAs ThisWorkbook.Path & "\" & "N11 güncelleme_FİYAT_" & Format(Now, "( dd.mm.yyyy )") & ".xlsx", 51
ActiveWorkbook.Close
Application.DisplayAlerts = True
MsgBox "Aktarım Bitti.", vbInformation
Range("B1").Select
Application.CutCopyMode = False
Sheets("ürünler").Copy
Application.DisplayAlerts = False
ActiveWorkbook.SaveAs ThisWorkbook.Path & "\" & "N11 güncelleme_FİYAT_" & Format(Now, "( dd.mm.yyyy )") & ".xlsx", 51
ActiveWorkbook.Close
Application.DisplayAlerts = True
MsgBox "Aktarım Bitti.", vbInformation
