Makro - Kontrol om filnavn indeholder tekst fra celle

If Filename Like "*" & Worksheets("Info").Range("C3") & "*" Then

Bak> synes ikke rigtig jeg kan få det til at virke efter hensigten. Det jeg skal have den til er at hvis filen findes i forvejen, skal den gemme oven i, ellers skal den gemmes i ovennævnte format.

Jeg har gjort det med følgende:

If Filename Like "*" & Worksheets("Info").Range("C3") & "*" Then
 
ActiveWorkbook.Save
 
Else

..

Hvad er forkert?

prøv:
fnavn = Format(Now, "yyyy-mm-") & Sheets("Info").Range("C3")
ActiveWorkbook.SaveAs Filename:=fnavn

Excelent> Det dur ikke, for yyyy-mm er = det år og måned hvor det er gemt første gang. Det kan jo være den åbnes en anden måned/år og efterfølgende rettes i den. Hvis der så gemmes med din ide, vil der bliver lavet en ny fil.
Hvis SaveAs bruges og gemmes oveni så bliver der spurgt om man vil overskrive - Det vil jeg gerne undgå!

Derfor er det vigtigt at Save bruges og der kun undersøges om filen har været gemt før med værdien "C3".

ok så må jeg lige ha den igen
1 undersøg om den aktuelle projektmappe's filnavn indeholder værdien i Info-C3
eller
2 undersøg om der er gemt en fil hvor værdi i aktuelle projektmappe-Info-C3 indgår

Ikke helt
Undersøge om den aktuelle projektmappe's filnavn indeholder værdien I Info-C3 og så gemme den
Hvis ikke så... (Har den del)

Sub tst()
Dim filnavn, C3navn
filnavn = ActiveWorkbook.Name: C3navn = Sheets("Info").Range("C3").Value
If filnavn Like "*" & C3navn & "*" Then MsgBox ("") & filnavn
End Sub

MsgBox ("") & filnavn ændres til save....

ja det er omtrent det samme som bak foreslog kan jeg se
og det virker ikke efter hensigten
arbejder på sagen....

If InStr(1, Filename, Worksheets("Info").Range("C3").Text) > 0 Then

sådan kabbak

mangler måske lige at nævne at
Filename = ActiveWorkbook.Name

If InStr(1, ActiveWorkbook.Name, Worksheets("Info").Range("C3").Text) > 0 Then

sådan

Tak for hjælpen.
Kabbak du skal have nogle point, men måske skal excelent også have lidt for den sidste rettelse.

meget rimelig ;-))

ok :-)

tak for point ;-))

Det er mig der siger tak! :-)