标题:VB中如何选择工作表
只看楼主
lx5656
Rank: 1
等 级:新手上路
帖 子:29
专家分:0
注 册:2015-4-15
得分:0 
WB.Sheets.Add
    WB.Sheets("Sheet1").Activate
    WB.Sheets("Sheet1").Name = "1"
 Set sht = WB.Worksheets("总表")
    sht.Activate
    WB.Sheets("总表").Activate
    sht.Cells.Activate
  WB.Sheets("总表").Copy
Set sht = WB.Worksheets("1")
   WB.Sheets("1").Activate
  sht.Paste
这句错误,我用了很多方法都出错,我总感觉粘贴和复制都有错误,但是有不知道错误是什么。。。
2015-05-20 21:49
HVB6
Rank: 7Rank: 7Rank: 7
等 级:贵宾
威 望:15
帖 子:320
专家分:561
注 册:2013-10-30
得分:0 
回复 11楼 lx5656
WB.Sheets.Add
    WB.Sheets("Sheet1").Activate
    WB.Sheets("Sheet1").Name = "1"
Set sht = WB.Worksheets("总表")
    sht.Activate
    WB.Sheets("1").Activate
    sht.Copy WB.Sheets("1")

2015-05-21 16:08



参与讨论请移步原网站贴子:https://bbs.bccn.net/thread-445537-1-1.html




关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.406974 second(s), 7 queries.
Copyright©2004-2025, BCCN.NET, All Rights Reserved