【エクセルマクロ】オートフィルタの可視セルに値入力:動画あり

ExcelVBA-オートフィルタ可視セルに値入力-アイキャッチ ExcelVBA

エクセルマクロで、オートフィルタの可視セルに値入力するVBAコードをご紹介します。

このページのマクロコードは、コピペで使えます。
ぜひお試しください!

オートフィルタの可視セルに値入力

以下のExcelVBAを実行すると、オートフィルタ抽出結果に文字を入力します。


Sub オートフィルタ可視セルのみ文字列入力()

    'フィルターでデータ抽出
    Range("A1").CurrentRegion.AutoFilter _
        Field:=3, _
        Criteria1:="埼玉県"

    '可視セルだけ値入力
    Range("D1").Offset(1, 0). _
    Resize(Range("A1").CurrentRegion.Rows.Count - 1) = "OK"

End Sub

 

マクロ実行後

オートフィルタで絞り込んだデータに値を入力します。

特定列(D列)に ”OK” と転記します。


 

オートフィルタを手動で解除した後の状態です。


 

動画の解説

動画ではコードの作り方・動作を確認できます。

クリックすると、このブログ上で再生されます^^

 
この記事がお役に立ちますと幸いです。
 
・【エクセルマクロ】オートフィルタ処理を自動化する使用例まとめ
 

【エクセルマクロ】オートフィルタ処理を自動化:超便利27選
...

 

「たった1秒で仕事が片づくExcel自動化の教科書【増強完全版】」
「5時間かかる作業が3時間でできます」ではなく「1秒で終わらせます」へ
毎日の業務を瞬時に終わらせるしくみを解説