在不选择纸张的情况下,在不同的纸张上增加一个

时间:2015-07-13 20:25:04

标签: excel vba excel-vba

我有一个宏在活动工作表上将单元格增加1但我需要更改代码以增加不同工作表上的数字而不选择我想要增加数字的工作表

示例:我有5张相同的页面并运行相同的宏,而我的第6张纸张上有一张发票号码,我需要将其增加1而不选择它

这是我现在使用的代码

Range("X1").Value = Range("X1").Value + 1

我已经尝试了

Sheets("sheet6").Range("O2").Value = Range("O2").Value + 1

但它只是使单元格值为1

1 个答案:

答案 0 :(得分:1)

如果单元格没有任何内容或零,则它将在单元格中放置1。如果单元格有数字,则将数字设置为1.如果单元格有文本,则会出现错误。

请注意,输入Range("O2")将从代码的工作表中获取范围。它不一定是"表6和#34;。 (因此,如果在该表中该值为空,则将导致1)

在作业的两面使用表格("表6和#34;)。

Sheets("sheet6").Range("O2").Value = Sheets("sheet6").Range("O2").Value + 1