EXCEL两个工作簿间表的复制,该如何解决

EXCEL两个工作簿间表的复制
worksheet copy after:=...这样的命令似乎只能在单个工作表里面进行表的复制。
但是我复制数据到另一个表（包含格式）
该怎么做呢？
谢相助

[解决办法]
录制宏，你就知道了
[解决办法]
复制是没错，但粘贴的时候注意选择【选择性粘贴】
 Selection.PasteSpecial Paste:=xlPasteAll, Operation:=xlNone, SkipBlanks:= _
False, Transpose:=False
[解决办法]
录制宏
[解决办法]

VB code

Dim ExcelApp As Object       'Excel程序对象Dim SourceBook As Object     '源   工作薄Dim DesBook As Object        '目标 工作薄Dim ExcelSheet As Object     '工作表Set ExcelApp = CreateObject("Excel.Application")Set SourceBook = ExcelApp.Workbooks.Open("C:\test.xls")    '打开源工作薄Set ExcelSheet = SourceBook.Worksheets("sheet1")           '设定当前要复制的工作表ExcelSheet.Copy After:=DesBook.sheets(1)   '把源工作表复制到 目标工作薄的第1个工作表