当我从写入excel的VB程序输出数据时，我需要增加（这是一个独立的程序而不是VBA）。
我想要的是让细胞递增34个细胞并重新开始。
AR0 = 34
AR1 = "A" + 36 + AR0
所以我想要的答案是AR1现在等于A70。 我怎样才能做到这一点？
完整的代码块
If Tnumber = 2 Then
TextboxNP = TSPlus.TextBox218.Text
TextboxNTC = TSPlus.TextBox189.Text
TextboxNWD = TSPlus.TextBox80.Text
Range1 = AR1 + AR0
Range2 = AR2 + AR0
Range3 = AR3 + AR0
Range4 = AR4 + AR0 '
Range5 = AR5 + AR0
Range6 = AR6 + AR0
Range7 = AR7 + AR0
Range8 = AR8 + AR0
Range9 = AR9 + AR0
Range10 = AR10 + AR0
Range11 = AR11 + AR0
Range12 = AR12 + AR0
Range13 = AR13 + AR0
Range14 = AR14 + AR0
Range15 = AR15 + AR0
Range16 = AR16 + AR0
Range17 = AR17 + AR0
Range18 = AR18 + AR0
Range19 = AR19 + AR0
Range20 = AR20 + AR0
Range21 = AR21 + AR0
Range22 = AR22 + AR0
Range23 = AR23 + AR0
Range24 = AR24 + AR0
Range25 = AR25 + AR0
Range26 = AR26 + AR0
Range27 = AR27 + AR0
Range28 = AR28 + AR0
Range29 = AR29 + AR0
Range30 = AR30 + AR0
Range31 = AR31 + AR0
Range32 = AR32 + AR0
Range33 = AR33 + AR0
Range34 = AR34 + AR0
Range35 = AR35 + AR0
End If
这是片段中的下一个块，我的希望是当时Tnumber = 2，AR1将=“A36”