Microsoft 365 Sauvegarde

Angus HEYERDAHL

XLDnaute Junior
Bonjour à tous,

Voilà, je recherche une solution pour sauvegarder (via VBA) une solution pour faire une sauvegarde externe de mes données et pouvoir les récupérer, en fait le fichier excel n'aurait pas de données en son sein. j'avais pensé au format JSON, mais je me rend compte que par rapport à mes compétences, j'ai vu trop grand.
Quelqu'un aurait-il une idée?
Merci par avance de vos idées
 

job75

XLDnaute Barbatruc
A mettre où vous voulez :
VB:
Sub CSV()
Dim fichier As Variant
fichier = Application.GetOpenFilename("Fichiers Excel (*.xlsx), *.xlsx")
If fichier = False Then Exit Sub
Application.ScreenUpdating = False
With Workbooks.Open(fichier)
    .SaveAs Left(fichier, Len(fichier) - 4) & "csv", xlCSV, Local:=True
    .Close False
End With
End Sub
 

Discussions similaires

Statistiques des forums

Discussions
312 215
Messages
2 086 314
Membres
103 176
dernier inscrit
jean.yvesjean.yves