如何在Excel中自定义文本和数字对齐方式？

Question

我有一个表格，其中包含一个混合了文字和数字值的列。我想自定义这些值的格式，使字符/文本左对齐，数字右对齐。

我该怎么做？由于它是一个超过10,000个值的数据集，我无法手动完成。

感谢您的帮助，谢谢。

Answer 1

考虑：

Sub qwerty()
    Set r1 = Selection.Cells.SpecialCells(xlCellTypeConstants, xlNumbers)
    Set r2 = Selection.Cells.SpecialCells(xlCellTypeConstants, xlTextValues)
    r2.HorizontalAlignment = xlLeft
    r1.HorizontalAlignment = xlRight
End Sub