' [131.xls]



' [Module1] のコード
'★★☆　数値の前に0を付けて3桁表示するための書式を設定する　☆★★

Option Explicit

Sub start()

    With Selection
        If .NumberFormatLocal = "000" Then
            .NumberFormatLocal = "G/標準"
        Else
            .NumberFormatLocal = "000"
        End If
    End With
        
End Sub