マクロ 検索について
こんにちは。マクロでの質問ですが、
【大学名リスト】というシートで作成したリストから検索してきたものを【検索ボタン】というシートのセルにコピペするマクロをボタンに登録しました。何度押しても検索してくれてしまうのですが、このボタンに登録したのは１回だけ実行して、もう一つのマクロで次を検索してくれるように作りたいのですが…
Sub Macro1()
'
' Macro1 Macro
'
'
Sheets("A.【大学名リスト】").Select
Cells.Find(What:=Sheets("B.【検索ボタン】").Range("C8"), After:=ActiveCell, LookIn:=xlFormulas, LookAt:= _
xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, MatchCase:=False _
, SearchFormat:=False).Activate
Selection.Copy
Sheets("B.【検索ボタン】").Select
Range("E8").Select
ActiveSheet.Paste
End Sub
数値の検索だと１回だけで止まってくれるのですが、数式にすると何回も可能になってしまうのはなぜなのでしょうか。
あと、実行すると【大学名リスト】のシートで作成したリストから、【検索ボタン】のシートのあるセルにキーワードを入力すると、隣のセルに５つの候補を表示させるマクロも教えていただきたいです。
