作者memory812 (memory LEO)
看板Visual_Basic
标题[VB6 ] excel表格的复制
时间Thu Aug 7 14:08:26 2008
我要将第一列至第二十八列(第一页),选取并复制,然後贴在第二十九列(形成第二页)
以下是巨集写出来的.
objSheet.Rows("1:28").Select
objExcelApp.Selection.Copy
objSheet.Rows("29:29").Select
objExcelApp.ActiveSheet.Paste
objExcelApp.Application.CutCopyMode = False
但是,我会因为资料的不同,而决定要不要形成第三页或第四页出来...
如果我要将变数加入objSheet.Rows("29*b:29*b").Select
这样子又是不行的.
请问有什麽方法,可以使变数加入.
PS:主要是还是以复制第一列至第二十八列的内容为主。
--
※ 发信站: 批踢踢实业坊(ptt.cc)
◆ From: 210.202.202.98