<< マイクロソフト(Microsoft)提供のパスワードの安全度チェック | main | Excel 2003 を終了時にエラーが発生するのを意外な方法で解決 >>
2012.01.12 Thursday

Excel VBAで特定の文字が入力されたセルを一括で選択する方法

0
    JUGEMテーマ:PC関連

     
    例えば,各セルの値が次のようなとき,「コアラ」と入力されたセルだけを
    一括で選択する方法です.

    A1:ゴリラ
    B1:ライオン
    C1:コアラ
    D1:リス
    E1:コアラ
    F1:コアラ
    G1:サル

    Public Sub CellSelectAll(byval arg as string)
        Application.ScreenUpdating = False
        Range("A65536").Select
        Selection.End(xlUp).Select
        r = Selection.Row
        Range("A1").Select
        Selection.AutoFilter
        Selection.AutoFilter field:=1, Criteria1:=arg
        Rows("2:" & Mid(Str(r), 2)).Select
        Selection.Delete Shift:=xlUp
        Selection.AutoFilter field:=1
        Range("A1").Select
        Selection.AutoFilter
        Application.ScreenUpdating = True
    End Sub

    使用例
    Sub ボタン1_Click()
        CellSelectAll("コアラ")
    End Sub

    コメント
    コメントする








     
    Sponsored Link
    Amazon
    Selected Entries
    Categories
    Archives
    Recent Comment
    • Windows7でタスクバーの時計が消えてしまった時に再び時計を表示する方法
      たろ (03/20)
    • ブラウザを立ち上げると勝手にhttp://ad.yieldmanager.com/の広告が表示されるときの対処法
      paromares (10/06)
    • ブラウザを立ち上げると勝手にhttp://ad.yieldmanager.com/の広告が表示されるときの対処法
      paromares (10/06)
    • ブラウザを立ち上げると勝手にhttp://ad.yieldmanager.com/の広告が表示されるときの対処法
      paromares (10/05)
    • ブラウザを立ち上げると勝手にhttp://ad.yieldmanager.com/の広告が表示されるときの対処法
      これで・・・ (06/14)
    • ブラウザを立ち上げると勝手にhttp://ad.yieldmanager.com/の広告が表示されるときの対処法
      撲滅迷惑アド (06/01)
    • ブラウザを立ち上げると勝手にhttp://ad.yieldmanager.com/の広告が表示されるときの対処法
      撲滅迷惑アド (05/29)
    • ブラウザを立ち上げると勝手にhttp://ad.yieldmanager.com/の広告が表示されるときの対処法
      nabe (05/12)
    • Excel 2003 を終了時にエラーが発生するのを意外な方法で解決
      ちゅらのひと (01/23)
    • Excel 2003 を終了時にエラーが発生するのを意外な方法で解決
      ディステル (01/18)
    Links
    Profile
    Search this site.
    Others
    Mobile
    qrcode
    Powered by
    30days Album
    無料ブログ作成サービス JUGEM