作者：乔山办公网日期：
返回目录：excel表格制作
Sub a()
Dim i, j As Integer
For i = 0 To 9 '行数zhidao-1
For j = 0 To 13 '列数-1
Range("O1").Offset(i, 0).Value = Range("O1").Offset(i, 0).Value & Range("A1").Offset(i, j).Value
Next
Next
End Sub
i 的值根专据你要多少行减一就行属
j 的值根据你要多少列减一就行
这个用宏貌似不行，宏没法确定你所选单元格是哪个……
用VBA还差不多。先获取所选单元格的值，然后将3与4列与其比较，小的就黑~
excel中批量加入“-”步骤如抄下：
一般的套路：点录制宏，处理一家，停止录制，编辑刚才的录制代码，一般是增加while或者for的循环，完成所有数据的处理。