- Katılım
- 28 Aralık 2006
- Mesajlar
- 129
- Excel Vers. ve Dili
- excel2000 tr
sevgili arkadaşlar, sorum bir sayfayı başka bir yere kaydetmekle ilgili, sorunun geniş biçimdeki hali dosya içerisindedir. Cevaplandırırsanız mmnun olurum saygılarımla
DOSYA İndirmek/Yüklemek için ÜCRETLİ ALTIN ÜYELİK Gereklidir!
Altın Üyelik Hakkında Bilgi
Formüller kaldırılsın diyorsunuz bu durumda elbette boş gelecektir.Bu nedenle kayıt yaparken formüllerin kaldırılmış olması lazım
Sub kaydet()
Range("B3:B5").Select
Selection.Copy
Range("B3:B5").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
ThisWorkbook.SaveAs "d:\" & [B4] & ".xls"
End Sub