在不选纸的情况下，在不同的纸上增加一个

我有一个macros在活动工作表上增加一个单元格，但我需要更改代码，以增加不同的工作表上的数字，而不select我想增加数量

例如：我有5张相同的纸张并运行相同的macros，而我的第6张纸有一个发票号码，我需要增加1而不select它

这是我现在使用的代码

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

我试过了

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

但它只是使单元格值1

Answer 1

如果单元没有任何东西或零，它会把1放在单元格中。 如果单元格有一个数字，它将把数字+1。如果单元格有文本，它会带来一个错误。

请注意，打字Range("O2")将取自代码所在的工作表范围。 这不一定是“表6”。 （所以如果在那张表里这个值是空的，就会导致1）

在作业的两边使用表格（“sheet6”）。

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