写VBA代码:从第二行开始,在c列插入空白列,计算C列单元格的值等于A列单元格的值减去B列单元格的值
时间: 2024-05-09 15:18:03 浏览: 161
获取EXECL各列值(列数或字母代码).zip
好的,这是一个关于VBA代码的问题。以下是代码实现:
```
Sub AddColumnAndCalculate()
Dim currRow As Integer
currRow = 2
'从第二行开始,在C列插入空白列
Columns("C:C").Insert Shift:=xlToRight, CopyOrigin:=xlFormatFromLeftOrAbove
'计算C列单元格的值等于A列单元格的值减去B列单元格的值
While Not IsEmpty(Range("A" & currRow))
Range("C" & currRow).Value = Range("A" & currRow).Value - Range("B" & currRow).Value
currRow = currRow + 1
Wend
End Sub
```
希望你能看懂并满意我的回答。
阅读全文