how to write cell with wild cards

[Jake975]

im using this code to fill a number on a different sheet. But how can i fill a cell with wild cards as I cant define the end if the filename prior to the extension?

    For Each rng In WS2.Range("C2", WS2.Range("C" & WS2.Rows.Count).End(xlUp))
        Set fnd = WS1.Range("A:A").Find(rng, LookIn:=xlValues, lookat:=xlPart)
        If Not fnd Is Nothing Then
            fnd.Offset(, 1) = rng.Offset(, 1)
        End If
    Next rng

search name	example file name	correct name	final order	packet a	packet b
logo_folio	logo_folio3763012.pdf	logo_folio3763012.pdf	100​		3​
RM	RM9006.pdf	RM9006.pdf	100​		3​

 

[johnnyL]

Not sure what you are asking for exactly, but a 'wildcard' of '?' equates to one wild card character, a '*' as a wildcard equates to any amount of characters. That help?

 

[Jake975]

My apologies I didn't think I would put wildcards in the location like that I will test it tonight to make sure it docent interfere with another part of the application when it renames files to the correct filename.
one other question is if I have more then one file with a similar name it isn't providing a return value for the subsequent files how can I correct this?

search name	example file name	correct name	final order	packet a	packet b
logo_folio	logo_folio3763012.pdf logo_folio3794357.pdf	logo_folio*.pdf	100		3
RM	RM9006.pdf RM9500.pdf	RM*.pdf	100		3

 

[johnnyL]

@Jake975 If you are asking for the wildcard solutions ...

The following should yield the same results:
logo_folio376????.pdf
&
logo_folio376*.pdf

Also:
logo_folio379????.pdf
&
logo_folio379*.pdf


Other file:
RM90??.pdf
&
RM90*.pdf

Also:
RM95??.pdf
&
RM95*.pdf

 

[Jake975]

update
Unfortunately can't use wildcards in the file name like that as the other part of the application tries to name the file with the wildcard I will create a new post when I can think of how to rephrase the question to get a better direction.
Thank you for your help and time