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

Réponses
16
Affichages
656

Statistiques des forums

Discussions
315 168
Messages
2 116 925
Membres
112 916
dernier inscrit
jujhu90