Wild Card in VBA??

[sharon9999]

Hi

I am importing a report, however sometimes there is a large space within the heading, eg..."Account_Number ", sometimes there isn't, eg..."Account_Number"

Rather than having to change the code every time to accommodate this space, is there a wild card I can use in VBA?

Hope this makes sense..

Thanks

SC

 

[Norie]

SC

What do you mean by 'heading'?

A header on a sheet?

 

[Fluff]

What code do you have at the moment?

 

[sharon9999]

Yeah a heading on the sheet.
The code i have at the moment is the code to select the heading for example Account_Number.
I wanted to know if I can out "*" or something to pickup the space within the cell as well?

Basically the report is this 'Account_Number ' - with space
but sometimes the report comes through without a space.
Dont want to keep changing the code.

 

[Fluff]

Without being able to see your actual code, it's difficult to give an answer.

 

[sharon9999]

here you go.....

Set foundCell = Cells.Find(what:="ACCOUNT_NUMBER ", After:=Range("A1"), LookIn:=xlValues, Lookat _
:=xlWhole, Searchorder:=xlByRows, SearchDirection:=xlNext, MatchCase:= _
False, Searchformat:=False)
colACCOUNT_NUMBER = foundCell.Column

 

[Norie]

If you want to find the column the header is in try this, change Rows(1) to reflect the row the headers are actually in.

colACCOUNT_NUMBER = Application.Match("Account*Number", Rows(1), 0)

 

[sharon9999]

thats great thanks.