Question

第A列中的

文件格式与000000000050000402类似，但应该像50000402我可以在VBA Range("A2").Value = CLng(Range("A2").Value)中使用此文件。我想要的是将它整合到整个专栏，但我不知道如何。

感谢您的帮助。

我正在使用Excel 2010

解决！

Answer 1

这是我用过的一个。这将在运行时将当前活动列转换为数字：

Sub Conv_Col_To_No()
On Error Resume Next

    ' Take copy of a normal cell (taken from far right of sheet)
    Range("AAA1").Copy

    ' Paste special (add) to convert data in column to number
    Range(ActiveCell.Address, Selection.End(xlDown)).Select
    Selection.PasteSpecial Paste:=xlAll, Operation:=xlAdd, SkipBlanks:=False _
        , Transpose:=False
End Sub

进一步检查。这实际上将数字格式应用于当前列的当前行的所有单元格（即活动单元格上方的任何单元格将保持不变）。

Answer 2

我有解决方案对我有用:-)但我要感谢任何想要帮助我的人

    With ActiveSheet
lastRow = .Cells(.Rows.Count, "A").End(xlUp).row
    End With

Set a = Range(("A2:A") & lastRow)
For Each b In a.Rows
   b.Value = CLng(b.Value)

Next

如何使用VBA将数字格式填充到Excel中的整列？

2 个答案: