Hi :
I have some code that looks for a very specific column header on a download file from the mainframe (column headers are only unique by 1 or 2 letters, account, account_roll, etc...). So I have to make sure, I selecting the proper column. Thus Use the Cell.Find (Download column structure isn't always).
Problem is after the macros run - The edit.find settings are lookat = xlwhole & matchcase:=True
Would love to find some code that would reset these defaults to the defaults lookat = xlPart and Matchcase:=False.
Below is how I'm planning to get around this one, but there must be a cleaner way.
Selection.Find(What:=string_acct, After:=ActiveCell, LookIn:=xlFormulas, _
LookAt:=xlWhole, SearchOrder:=xlByRows, SearchDirection:=xlNext, _
MatchCase:=True).Activate
string_b = ActiveCell.Address
''a little code to reset the lookat & matchcase
Selection.Find(What:=string_acct, After:=ActiveCell, LookIn:=xlFormulas, _
LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, _
MatchCase:=False).Activate
I have some code that looks for a very specific column header on a download file from the mainframe (column headers are only unique by 1 or 2 letters, account, account_roll, etc...). So I have to make sure, I selecting the proper column. Thus Use the Cell.Find (Download column structure isn't always).
Problem is after the macros run - The edit.find settings are lookat = xlwhole & matchcase:=True
Would love to find some code that would reset these defaults to the defaults lookat = xlPart and Matchcase:=False.
Below is how I'm planning to get around this one, but there must be a cleaner way.
Selection.Find(What:=string_acct, After:=ActiveCell, LookIn:=xlFormulas, _
LookAt:=xlWhole, SearchOrder:=xlByRows, SearchDirection:=xlNext, _
MatchCase:=True).Activate
string_b = ActiveCell.Address
''a little code to reset the lookat & matchcase
Selection.Find(What:=string_acct, After:=ActiveCell, LookIn:=xlFormulas, _
LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, _
MatchCase:=False).Activate