bonjour a tous
voila mon soucis:
A1=1
B3=xy
je souhaiterais enregistrer le fichier sous le nom '1xy' ?????
comment faire ?!
pour enregistrer sous le nom de A1 c bon je connais la macro :
Sub Sauvegarde()
With Sheets('Feuil1').Range('A1')
If .Value <> '' Then
ThisWorkbook.SaveAs ThisWorkbook.Path & '\\' & .Value & '.xls'
Else
MsgBox 'Nom inexistant'
End If
End With
End Sub
Merci d'avance
voila mon soucis:
A1=1
B3=xy
je souhaiterais enregistrer le fichier sous le nom '1xy' ?????
comment faire ?!
pour enregistrer sous le nom de A1 c bon je connais la macro :
Sub Sauvegarde()
With Sheets('Feuil1').Range('A1')
If .Value <> '' Then
ThisWorkbook.SaveAs ThisWorkbook.Path & '\\' & .Value & '.xls'
Else
MsgBox 'Nom inexistant'
End If
End With
End Sub
Merci d'avance