Question

我是VBA-Excel的新手，目前遇到数字格式问题。每次我运行此代码时，无论执行什么操作，整个工作表都将变为Text，我希望保留工作表的其余部分为General，但将A列更改为Text。

对于

      Columns("A").Select _
      ActiveCell.NumberFormat = "@"

我尝试用几种不同的方式写这本书，我尝试了

 Range("A:A").Select
 Selection.NumberFormat = "@"

我尝试用特定的工作簿编写它，而不是让VBA假定活动的工作表和单元格。在A列上运行格式化后，我什至试图将其他列设置为通用文本。

    Columns("A").Select
Range("A1").Activate
Selection.Delete Shift:=xlToLeft


    Columns("A").Select
ActiveCell.NumberFormat = "@"
Range("A1").Select
ActiveSheet.Paste
Application.CommandBars("Office Clipboard").Visible = False

我希望，如果在我的数字格式之后添加另一行，我将能够使B：ZZ列全部变为General。到目前为止，我还没有收到任何错误消息，只是无法正常工作。预先感谢您的帮助或提示。

Answer 1

只需测试一下，两者都可以。引用受影响的单元格的公式不会计算，引用其他数字单元格的公式将正常计算。

Range("A:A").NumberFormat="@"

Range("A1").EntireColumn.NumberFormat="@"

数字格式无法正常工作

1 个答案: