abyul.com > Excel > Question & Answer

엑셀에 대해서 궁금한 것이 있으시면 마음껏 질문해주세요.

이 게시판은 아별닷컴 회원만 질문을 올릴 수 있습니다. 회원에게 주어지는 특권인셈이지요. 회원이 아닌 분들은 열람만 가능합니다.

2009.07.03 00:12

1. vlookup() 함수 사용하시면 될 것 같습니다.

굳이 매크로로 작성하시려면, 매크로 기록으로 vlookup으로 찾는 과정을 기록하고,

생성된 코드를 수정해서 사용하시면 됩니다.

2. 음.. 이건 매크로 기록을 하시면 코드가 나옵니다.

그런 다음 해당 코드를 수정해서 사용하시는게 편할 것 같습니다.

Ctrl+F눌러서 "치즈"를 검색한 다음, Ctrl+Space바 를 눌러 선택셀이 있는 열 전체를 선택하고 복사한 다음, L열에 붙여넣는 작업을 매크로 기록으로 기록한 결과입니다.

Sub find_userWord()
    Cells.Find(What:="치즈", After:=ActiveCell, LookIn:=xlFormulas, LookAt:= _
        xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, MatchCase:=False _
        , MatchByte:=False, SearchFormat:=False).Activate
    Columns("B:B").Select
    Selection.Copy
    Columns("L:L").Select
    ActiveSheet.Paste
End Sub

"치즈"는 input박스로 받은 변수로 대체하면 될 것이고,
Columns("B:B").Select 는 Selection.EntireColumn.Select 로 대체하시고,
Columns("L:L").Select 는 카멜님이 원하시는 위치를 정해주신 코드로 대체시키면 됩니다.

매크로.. 처음 부터 다 코딩으로 해결하려고 생각하시면 너무 어렵습니다.

일단 매크로 기록으로 먼저 기록하고, 결과물을 수정해서 사용하세요.