这是我的公式:
= RSLINX | AIR_TESTER_DATA' AIR_TESTER_EXCEL_CHASSIS_STRing [14,I],L1,C1'
!i需要从500行中的1到500。同一栏。我有一个搜索和替换功能,适用于14.我只是不知道如何顺序将i从1更改为500?感谢您的帮助。
答案 0 :(得分:0)
以下示例将在单元格A1到A500
上写入数字1,2,3,4 ....编辑:在单元格B1到B500上,这将添加以下公式= 5 * i,它将乘以循环生成的数字的5倍(1到500)。
Sub TestLoop()
Dim i As Long
Dim formulaText As String
For i = 1 To 500
formulaText = "=5*" & i & "&" & """ Is The product of 5 * " & i & """"
Range("A" & i).Value = "Number: " & i
Range("B" & i).Formula = formulaText
Next
End Sub