VBAで質問です
T列が終了の時、U列を解約の表示にしたいのですが、U列以外の列にも解約の表示がされてしまします。
VBAの書き方がどこが間違っているのかがわかりません。
Sub 終了を解約に変更() Range("A3").AutoFilter 19, "終了" With Range("A3").CurrentRegion.Offset(2, 0) For Each R In .Resize(.Rows.Count - 2).SpecialCells(xlCellTypeVisible).Rows R.Range("U1") = "解約" Next R End With '絞り込みクリア ActiveSheet.ShowAllData End Sub
まだ回答がついていません
会員登録して回答してみよう