ahmed_ummu
Altın Üye
- Katılım
- 28 Mart 2011
- Mesajlar
- 741
- Excel Vers. ve Dili
- Excel 2010 Professional Plus 64 Bit
- Altın Üyelik Bitiş Tarihi
- 15-10-2026
Merhaba arkadaşlar.
Sheets("veri").Select
ActiveSheet.Copy
Application.Dialogs(xlDialogSaveAs).Show
ActiveWorkbook.Close
Yukarıdaki kod ile "veri" sayfasını bilgisayara kaydediyorum. Bu işimi görüyordu şimdi ise "PA_EK" "PA" "LÜZUMBELGESİ" ve "MTKK" sayfalarını da kaydetmem gerekiyor.
Bu sayfaları bir kitap içine kaydedebilir miyim. Bir de kitabın adını, MTKK sayfasının B6 hücresi ile PA sayfasındaki E5 hücresindeki verileri birleştirerek, masaüstündeki "SATINAMLA" klasörüne Farklı Kaydet diyalog kutusu çıkmadan kaydedilebilinir mi. Yardımcı olursanız çok sevinirim.
Sheets("veri").Select
ActiveSheet.Copy
Application.Dialogs(xlDialogSaveAs).Show
ActiveWorkbook.Close
Yukarıdaki kod ile "veri" sayfasını bilgisayara kaydediyorum. Bu işimi görüyordu şimdi ise "PA_EK" "PA" "LÜZUMBELGESİ" ve "MTKK" sayfalarını da kaydetmem gerekiyor.
Bu sayfaları bir kitap içine kaydedebilir miyim. Bir de kitabın adını, MTKK sayfasının B6 hücresi ile PA sayfasındaki E5 hücresindeki verileri birleştirerek, masaüstündeki "SATINAMLA" klasörüne Farklı Kaydet diyalog kutusu çıkmadan kaydedilebilinir mi. Yardımcı olursanız çok sevinirim.