EXCEL VBA范围内给列输入固定内容

1.AK14：DK113范围

2025-04-07 12:03:51

推荐回答（2个）

回答1：

Sub s()
    For i = 0 To 9
    For j = 0 To 9
    For k = 0 To 9
        Cells(j * 10 + k + 14, i * 2 + 37) = i & j & k & "X"
        Cells(j * 10 + k + 14, i * 2 + 57) = i & j & "X" & k
        Cells(j * 10 + k + 14, i * 2 + 77) = i & "X" & j & k
        Cells(j * 10 + k + 14, i * 2 + 97) = "X" & i & j & k
    Next: Next: Next
End Sub

回答2：

比如输入 ABC，代码如下：
range("AK14:DK113")="ABC"