XL 2019 Déplacer et stocker des données importer d'un site internet automatiquement

ThomasBRD · 22 Décembre 2020

Bonjour !

J'importe des données depuis un site internet sur mon classeur Excell.. Les données s'actualisent jour après jour et à la fin du mois les données sont réinitialiser et donc supprimer pour recommencer son cycle mois après mois..

Cependant j'aimerais sous une certaine condition (Le dernier jour du mois) que le tableau soit sauvegarder et déplacer dans une page servant de data..

Comment puis-je faire cela ?

Merci
Thomas

sylvanu · 22 Décembre 2020

Bonsoir Thomas,
Utilisez EoMonth ( End of Month ) pour détecter le dernier jour du mois :

VB:

Sub Sauvegarde()
    If Application.EoMonth(Int(Now), 0) = Int(Now) Then
        ' Faire sauvegarde
    End If
End Sub

sylvanu · 22 Décembre 2020

Bonsoir Thomas,
Utilisez EoMonth ( End of Month ) pour détecter le dernier jour du mois :

VB:

Sub Sauvegarde()
    If Application.EoMonth(Int(Now), 0) = Int(Now) Then
        ' Faire sauvegarde
    End If
End Sub

XL 2019 Déplacer et stocker des données importer d'un site internet automatiquement

ThomasBRD

XLDnaute Nouveau

sylvanu

sylvanu

XLDnaute Barbatruc

Discussions similaires