VBA 列の幅が標準であるかを判定する
VBAで、列の幅が標準であるかを判定するコードを記述してます。
環境
- OS windows10 64bit
列の幅が標準であるかを判定
列の幅が標準であるかを判定するには、「UseStandardWidth」の戻り値が「真偽値」なのでこれを使用します。
適当なボタンを用意して、以下のソースコードを記述します。
Private Sub CommandButton1_Click()
' 幅を20に設定
Cells(1, 1).ColumnWidth = 20
If Not Cells(1, 1).UseStandardWidth Then
Cells(1, 1).Value = "標準の幅以外です"
End If
' 標準の幅に設定
Cells(1, 2).UseStandardWidth = True
If Cells(1, 2).UseStandardWidth Then
Cells(1, 2).Value = "標準の幅です"
End If
End Sub
実行してみます。
判定できていることが確認できます。
-
前の記事
javascript エラー「Uncaught SyntaxError: Unexpected end of input」の解決方法 2022.06.25
-
次の記事
Linux CSVから指定したカラムのデータを抽出する 2022.06.25
コメントを書く