0

他のソフトウェアの入力として使用されるprnとしてファイルを出力するための小さなマクロに取り組んでいます。私はすべて正常に動作しましたが、唯一の問題は、他のソフトウェアではすべての整数を小数点付きで出力する必要があることです。

ところでExcel 2007を使用

つまり、セルの値が 0 の場合は、「0」として出力する必要があります。空白ではありません。同様に、値が 8 の場合は、「8」と出力する必要があります。ほとんどの値は 123.45765 などであるため、これはほとんどの問題ではありません。

このコードは、4 行目の .NumberFormat(""0."") の小数点の後に ) が必要であることを示しています。

Windows("bdf_generator").Activate
With Worksheets(2).Range("E2:H9592").FormatConditions _
.Add(xlCellValue, xlBetween, "=0", "=9")
FormatConditions(1).NumberFormat=(""0."")
With Selection.FormatConditions(1).StopIfTrue = False
End With
End With
4

1 に答える 1

0

あなたの場合、を囲むFormatConditions(1).NumberFormat=(""0."")2つの二重引用符（）が原因で、行が正しくありません。また、先頭に追加する必要があることに注意してください。そうしないと、実行時にエラーがスローされます。代わりにこれを試してください。より明確であると私は信じています（そしてあなたはインテリセンスを得る）：""0.FormatConditions(1).NumberFormat = "0."Selection.

Windows("bdf_generator").Activate
Dim r As Excel.Range
Set r = Worksheets(2).Range("E2:H9592")
Dim fc As Excel.FormatCondition
Set fc = r.FormatConditions.Add(xlCellValue, xlBetween, "=0", "=9")
fc.NumberFormat = "0."
fc.StopIfTrue = False
于 2012-08-30T18:11:11.303 に答える