作者ClubT (We will Wii)
看板Visual_Basic
标题Re: [VB6 ] excel表格的复制
时间Thu Aug 7 17:13:12 2008
※ 引述《memory812 (memory LEO)》之铭言：
: 我要将第一列至第二十八列(第一页),选取并复制,然後贴在第二十九列(形成第二页)
: 以下是巨集写出来的.
: 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
应该是改成
objSheet.Rows(
cstr(29*b)+":"+cstr(29*b)).Select
黄色的部份就是要用字串
: 这样子又是不行的.
: 请问有什麽方法,可以使变数加入.
: PS:主要是还是以复制第一列至第二十八列的内容为主。
--
Ｇｏｏｇｌｅ
封条▎███████████████████
ˍˍˍˍˍˍ ˍˍˍˍ
｜Google搜寻｜ ｜好手气｜
所有网页 ￣￣￣￣￣￣ ￣￣￣￣
1.
http://www.deltactn.com/Seal/seals.htm
--
※ 发信站: 批踢踢实业坊(ptt.cc)
◆ From: 220.136.43.137
1F：推 memory812:谢谢你哦,我会再试试看..^^ 08/12 11:53
2F：推 memory812:正解...^^ 08/12 14:48