VBA形式のセルを一般に

Question

Excelファイルを「一般」にフォーマットしたいのですが、すべてのセルで機能しません（一部はカスタム、pourcentage ...）。ここに私のコードがあります：

With ActiveSheet.Range("A1").Resize(LineIndex, 1)
    .Value = WorksheetFunction.Transpose(strLine)
    .NumberFormat = "General"
    'DEFINE THE OPERATION FULLY!!!!
    .TextToColumns Destination:=.Cells(1), DataType:=xlDelimited, _
                   TextQualifier:=xlDoubleQuote, ConsecutiveDelimiter:=False, _
                   Tab:=False, Semicolon:=False, Comma:=False, Space:=False, _
                   Other:=True, OtherChar:="|"

助けてください。

Answer 1

all cells toGeneralにフォーマットする場合は、次のようなものを使用します。

Sub dural()
    ActiveSheet.Cells.NumberFormat = "General"
End Sub