强制特定工作表的特定列为2位小数的百分比

Question

任何想法如何用VBA强制称为“额外”的工作表的“B”列具有2位小数的百分比格式？非常感谢。

Answer 1

在“额外”的代码表中，放置此代码。

Private Sub Worksheet_Change(ByVal Target As Range)
    If Not Intersect(Columns("B"), Target) Is Nothing Then
        Intersect(Columns("B"), Target).NumberFormat = "0.00%"
    End If
End Sub