Excel VBA 質問スレ Part51

Excel VBA 質問スレ P ..

325:デフォルトの名無しさん
17/12/03 09:19:50.58 lwbJHU3ya.net
お力添えをお願いします
チェックボックスでチェック入れたら行の高さを0にし、チェック入れなかったら13.5にしたいのですがうまく動作してくれません
Sub チェック8_Click()
Dim A As Boolean
Dim B As Boolean
If A = True Then
A = Rows(43).RowHeight = 13.5
B = Rows(44).RowHeight = 13.5
Else
A = Rows(43).RowHeight = 0
B = Rows(44).RowHeight = 0
End If
End Sub
どこが間違っているのかご教示お願いします。

次ページ

続きを表示

1を表示