J
jean michel
Guest
bonsoir
J'affiche la boîte de dialogue standard " Enregistrer sous " par le code ci dessous trouvé dans l'aide tout se passe bien sauf que le fichier n'est jamais enregistrer ,je ne vois pas ce qu'il manque
merci de votre aide
bonne soiree à tous
Sub Macro22()
fileSaveName = Application.GetSaveAsFilename( _
fileFilter:="Text Files (*.xls), *.xls")
If fileSaveName <> False Then
MsgBox "Votre fichier a été enregistrer sous" & fileSaveName
End If
End Sub
J'affiche la boîte de dialogue standard " Enregistrer sous " par le code ci dessous trouvé dans l'aide tout se passe bien sauf que le fichier n'est jamais enregistrer ,je ne vois pas ce qu'il manque
merci de votre aide
bonne soiree à tous
Sub Macro22()
fileSaveName = Application.GetSaveAsFilename( _
fileFilter:="Text Files (*.xls), *.xls")
If fileSaveName <> False Then
MsgBox "Votre fichier a été enregistrer sous" & fileSaveName
End If
End Sub