在Excel中增加每个文件的保存次数

我在Excel中创build一个应用程序生成帐单，并将数据保存在同一个Excel文件中的其他工作表。

现在我需要增加帐单上发票号码的价值。 我的发票号码是2016-17/12345 ，节省了账单，这个值应该是这个2016-17/12346 。

 Dim CustomerInvoice As Long Range("H10").Value = Range("H10") + 1 - - CustomerInvoice = Range("H10") - - ActiveCell.Value = CustomerInvoice ActiveCell.Offset(0, 1).Select 

Answer 1

尝试这个

 Range("H10").Value = Split(Range("H10").Value, "/")(0) & _ "/" & _ Val(Split(Range("H10").Value, "/")(1)) + 1 

我的假设 ： Range("H10").Value的当前值，值为2016-17/12345