[엑셀 VBA] Find 함수 써 놓은 거 복.붙 가능.

 

▼아래는 복붙

Sub test2()

 

Dim Data_All As Range, Find_Cell As Range
Dim Find_Str As String

 

'■ 기본 Data 설정 ===========================
Set Data_All = Columns(1).SpecialCells(2) '찾고자 하는 범위 입력
Find_Str = "Data" '찾으려는 문자열 입력 하면 됨.
'==========================================

 

Set Find_Cell = Data_All.Find(Find_Str, Lookat:=xlPart)

Find_Cell.Select

'부분일치는 : xlPart,  모두일치는 : xlWhole

 

 

포스팅 중, Find 함수 관련이 검색이 많이 되서 복붙 가능하도록 써놓음.