ｴｸｾﾙ VBA初心者です｡
VBAの作り方と方法についてお教えください｡
Mac 2011
ｴｸｾﾙで表を作成しました｡
これが縦にｴﾝﾄﾞﾚｽに長いのですが､
A列のｾﾙ中に2という数字が入った場合､
非表示をして印刷をかけたいと思うのですが
その場合のVBAの書き方をお教えください｡
行4 7 10 13 の行が非表示にしたいのですが｡
自分なりに調べたのですが
ｱﾄﾞﾊﾞｲｽいただけると幸いです｡
Option Explicit
Private Sub Cmd隠す_Click()
Dim 行番号 As Long
'行を隠す
For 行番号 = 4 To 13
If Cells(行番号, 1).Value = "2" Then
Cells(行番号, 1).EntireRow.Hidden = True
End If
Next 行番号
End Sub
Private Sub Cmd表示する_Click()
'表全体を再表示する
Cells.Select
Selection.EntireRow.Hidden = False
Selection.EntireColumn.Hidden = False
Cells(1, 1).Select
End Sub
