抽出方法を教えて下さい。

質問

複数条件での抽出(表示)方法を教えて下さい。

　　A　　　　　B　　　　C　　　　D
1　旧姓　　　氏　　　名　　　住所
2　 く　　　　 か　　　　さ　　 　た
3　　　　　　　き　　　　し　　 　ち
4　 き　　　　 く　　　　す　　　 つ
5　 く　　　　 け　　　　せ　　　 て
6　 　　　　　 こ　　　　そ　　　 と

上記のように住所録を作成し「旧姓 く」及び「氏　く」の人を抽出(それ以外に人は非表示)して印刷をしたいのですが、抽出(表示)方法を教えて下さい。

回答No.2

imogasi

http://okwave.jp:80/qa4418582.html
先ほどの質問とほぼ同じではないのですか。
私の回答など読んでくれまたか。
前の質問と、内容が違うなら、違う点を注記するとかすべきでしょう。

回答No.1

pkh4989

マクロでは、如何ですか。

Sub test()
　　With ActiveSheet
　　　　.Cells.EntireRow.Hidden = False
　　　　mR = .Cells(Rows.Count, "C").End(xlUp).Row
　　　　For wR = 2 To mR
　　　　　　If .Cells(wR, 1) = "く" Or _
　　　　　　　 .Cells(wR, 2) = "く" Then
　　　　　　Else
　　　　　　　　.Rows(wR).EntireRow.Hidden = True
　　　　　　End If
　　　　Next
　　End With
End Sub

お礼

ありがとうございます。
しかし、初心者の為マクロの作成の方法を知りません。
良ければ教えて下さい。