Rename Sheet with date and string

[KerahJoy]

My code for renaming sheet using date in a range works but I can't seem to modify it correctly to also include a text string.

Please Login or Register  to view this content.

"8/1/23" date is in A7. "Meet&Greet" is string is in G7:

Current code works and renames sheet "Sep23" but I want it to read "Aug23-Meet&Greet".

Thank you for your help!

[Mumps1]

Try:

Please Login or Register  to view this content.

[Marc L]

I want it to read "Aug23-Meet&Greet".

So removing the useless :

Private Sub Worksheet_Change(ByVal Target As Range)
    If Target.Address = "$A$7" Then Name = IIf(IsEmpty(Target), "Event" & Index - 1, Format(Target, "mmmyy-") & [G7])
End Sub 

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

[KerahJoy]

That worked thanks Mumps

[KerahJoy]

Thanks Marc

[Mumps1]

Glad to help.