VBA If with Like Operator not working

[RickyGerbilFace]

Hi I have the below bit of code but the If DateStr Like "*March*" Then MonthNumber = "/03/" Else MonthNumber = ""lines are not working, any ideas?

I'm getting the output:
12 March
12


I am hoping for:
12 March
12
/03/

Please Login or Register  to view this content.

[Fluff13]

You either have to use an If...ElseIf.. statement, or a Select case

Please Login or Register  to view this content.

You can also simply the replace section with

Please Login or Register  to view this content.

[AliGW]

Why have you opened this thread? Are you not being assisted with this in the commercial services forum?

[RickyGerbilFace]

That's brilliant, thank you so much your help is greatly appreciated

[Marc L]

As a VBA beginner starter :

Sub FixDateString()
  Const F = "00"
    Dim M$(), DateStr$, V
        M = Split("January February March April May June July August September October November December")
        DateStr = "12th March"
        V = Split(DateStr)
        V(0) = Format(Val(V(0)), F)
    If UBound(V) > 0 Then
        V(1) = Application.Match(V(1), M, 0)
        If IsError(V(1)) Then V(1) = F Else V(1) = Format(V(1), F)
        If UBound(V) > 1 Then If Not IsNumeric(V(2)) Then V(2) = F
    End If
        Debug.Print DateStr; "  ->  "; Join(V, "/")
End Sub 

► Do you like it ? ► ► So thanks to click on bottom left star icon « ★ Add Reputation » !

[Fluff13]

You're welcome & thanks for the feedback

[AliGW]

Please answer the question in post #3. Thanks.