
excel
Sub AddCharacter()Dim i As IntegerFor i = 1 To Range("A1").End(xlUp).Row If Range("A" & i).Value = "" Then Range("A" & i).Value = "措支家点修派灯几个字符" End IfNext iEnd Sub以上代码会在A列中所有空白的单元格后面加上“措支家点修派灯几个字符”。如果你需要在其他列中加入字符,只需要将代码中的“A1”修改为对应列的列号即可。请注意,在运行VBA之前,请确保已经开启了开发者选项卡,并且正在一个工作表中执行此代码。希望以上内容对您有所帮助!Copyright © 2025 IZhiDa.com All Rights Reserved.
知答 版权所有 粤ICP备2023042255号