LIKE function in VBA not working

[megahurtz]

Hi All,

I'm facing a problem in executing the following code snippet :

sub strtest()

X = [FACT*]*[!FACT*DM]
tbl_nm = "FACT_TSS_PRDCT_ATTRBTS_ABC"
If tbl_nm Like X Then MsgBox "TRUE"

End Sub

This means that if tbl_nm (Table Name) starts with FACT but does not end with DM, the MSGBOX should pop up (condition be satisfied).

But somehow it's not working. Can someone help me please??

 

[RoryA]

I think you mean:

x = "FACT*[!DM]"

 

[megahurtz]

That Worked!!! Thanks a lot!!

Can someone please help how to compare a string against a list of substrings??

Eg. If a string FACT_CONTROL_ABC is to be compared against FACT*, DIM*, STG* and a match is found against any of them, the condition should be true.
I tried the following code, but all in vain...

sub test()
       tbl_nm = "FACT_CONTROL_ABC"
       if tbl_nm like "[FACT*, DIM*, STG*] then MsgBox "TRUE"
end sub

Please help me...