复制时未从a1单元格执行

RedMountain · 发表于 2018-8-17 00:18

大家帮我看下附件内的代码执行后，输出的结果为什么sheet1下a1和a2单元格为空呢？谢谢！

vbee · 发表于 2018-8-17 09:15

Sheets("sheet1")
不是
Sheets("Sheet1")

jnsxmt · 发表于 2018-8-17 09:17

If sht.Name <> "Sheet1" Then这句的“sheet1”中的“s”改成大写的“S”

lsc900707 · 发表于 2018-8-17 09:30

本帖最后由 lsc900707 于 2018-8-17 09:31 编辑

咦，另一个帖也是这个问题。另外thisworkbook 都可以省略的。

If sht.Name <> "Sheet1" Then

复制代码

RedMountain · 发表于 2018-8-18 22:28

本帖最后由 RedMountain 于 2018-8-18 22:45 编辑

lsc900707 发表于 2018-8-17 09:30
咦，另一个帖也是这个问题。另外thisworkbook 都可以省略的。

没有吧？你说的是我发的帖子吗？

还有我想问下这个sheet加双引号作为name时要区分大小写吗？
那为什么“ThisWorkbook.Sheets("sheet1").Cells.ClearContents”这句执行时，“sheet1”就是指的的“Sheet1”呀？
A: 上面看样子是sheet1单独拿出来时，要同工作薄中的一模一样。

还有个就是：<> "sheet1"(这样写的时候)怎么就多出一个单元格呢？

RedMountain · 发表于 2018-8-18 22:30

vbee 发表于 2018-8-17 09:15
Sheets("sheet1")
不是
Sheets("Sheet1")

谢谢！您好像写反了！应该是反过来的！

lsc900707 · 发表于 2018-8-18 22:55

RedMountain 发表于 2018-8-18 22:28
没有吧？你说的是我发的帖子吗？

还有我想问下这个sheet加双引号作为name时要区分大小写吗？

是另外一个帖子。这里是作为字符串比较，所以要区分大小写！

		自动登录	找回密码
密码			免费注册

[求助] 复制时未从a1单元格执行

评分