tablo yedekleme

[k0081]

Merhaba arkadaşlar;

F4 ile K50 hücresinde bulunan tabloyu C:\ sürücüsünde herhangi bir yere nasıl yedeklerim..?


yardımcı arkadaşa şimdiden teşkkürler..

 

[nsertoglu]

Sub MlzmSipList_Kaydt()
'
' Aşağıdaki kodları deneyin ve geliştirin..

Sheets("sheet1").Select
Range("F4:K50").Select
Selection.Copy
Workbooks.Add
ActiveSheet.Paste
Range("A1").Select
Application.CutCopyMode = False
ActiveWorkbook.SaveAs Filename:= _
"C:\Documents and Settings\t11632\My Documents\Book6.xls", FileFormat:= _
xlExcel8, Password:="", WriteResPassword:="", ReadOnlyRecommended:=False _
, CreateBackup:=False
ActiveWorkbook.Close
ActiveWindow.ScrollRow = 40
Range("F4").Select
End Sub

 

[k0081]

çok teşekkür ederim hocam. tamadır..