如何用VBA 实现excel 中改变所有单元格宽度为27
发布网友
发布时间：2023-11-21 13:47
共1个回答
热心网友
时间：2024-10-27 23:33
With ActiveSheet.Cells
.ColumnWidth = 2
.RowHeight = 15
Range("R9:Z9").Select
Selection.Value = "老婆我爱你，么么！"
End With
End Sub追问我要实现一个单元格显示一个字，比如说：R9=老、S9=婆·······Z9=！
追答With ActiveSheet.Cells
.ColumnWidth = 2
.RowHeight = 15
i = 1
For Each c In Range("R9:Z9")
c.Value = Mid("老婆我爱你，么么！", i, 1)
i = i + 1
Next
End With
