Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

XL 2019 Actualisation d'un fichier excel sans l'ouvrir

T

Thomas10m

XLDnaute Nouveau
Bonjour à tous,

Je cherche à actualiser un fichier excel sans l'ouvrir. Mon but était d'automatiser complètement une campagne de relance par mail. J'ai commencé par prendre des données de mon entreprise par Power Query, que j'ai mise sur un fichier excel. Ensuite j'ai mis des formules et des filtres spécifiques pour mes envoies de mails. Puis j'ai créé un flux sur Power Automate pour que ma campagne de relance soit automatique. La seule chose que je n'ai pas rendu automatique est l'actualisation de mes données excel sans ouvrir un fichier.
Quelqu'un sait comment actualiser un fichier excel sans l'ouvrir?

Dans l'attente d'une réponse.

Cordialement,

Thomas
 
Trier par date Trier par votes

sylvanu

XLDnaute Barbatruc
Supporter XLD
Bonjour Thomas, et bienvenu sur XLD,
Regardez ces liens :

Lire et écrire dans les classeurs Excel fermés

Lire et écrire dans les classeurs Excel fermés
silkyroad.developpez.com

VBA Excel mise à jour fichier sans l'ouvrir

Meilleure réponse: Bonjour, Tu peux utiliser une connexion ADO pour lire ou ecrire dans un fichier Excel fermé. Sub ADOcnx_XL_Close() 'Cochez la ligne "Microsoft ActiveX Data Objects x.x Library". 'dans Outils > Références... ...
forums.commentcamarche.net
Le plus simple est de figer l'écran par un "Application.ScreenUpdating = false" d'ouvrir le fichier, le modifier, l'enregistrer et le fermer.
C'est invisible et rapide.
 
Vote positif 0 Vote négatif
T

Thomas10m

XLDnaute Nouveau
Bonjour,
Merci de votre réponse.
J'ai déja vu ces deux forums auparavant mais je n'ai pas réussi à utiliser leurs conseils.
Comment je dois faire pour utiliser votre méthode car je ne maitrise pas trop le VBA.
 
Vote positif 0 Vote négatif

sylvanu

XLDnaute Barbatruc
Supporter XLD
Thomas10m à dit:
car je ne maitrise pas trop le VBA.
Cliquez pour agrandir...
Un ex simple en PJ où s'est détaillé, avec en VBA :
VB: 
Sub ModifierFichier()
    Application.ScreenUpdating = False                      ' Fige l'écran
    NomFichier = [C3] & [C4]                                ' Construction du chemin du fichier concerné
    Feuille = [C5]                                          ' Nom de la feuille à modifier
    Addresse = [C6]                                         ' Adresse de la cellule à modifier
    Valeur = [C7]                                           ' Valeur à écrire
    Workbooks.Open NomFichier                               ' Ouvre le fichier
    ActiveWorkbook.Sheets(Feuille).Range(Addresse) = Valeur ' Ecrit la valeur à l'adresse indiquée
    ActiveWorkbook.Close SaveChanges:=True                  ' Ferme le fichier en enregistrant.
End Sub
Evidemment optimisable suivant votre appli, le nombre d'écriture à effectuer ....
 

Pièces jointes

  • ModifFichier.xlsm
    15.4 KB · Affichages: 15
Vote positif 0 Vote négatif

sylvanu

XLDnaute Barbatruc
Supporter XLD
Evidemment, la ligne en rouge est incompréhensible en VBA.
D'abord cela doit être une chaine de caractères, donc commençant et finissant par ".
Ensuite il faut lui dire ce que c'est, par exemple Chemin=" ....... "

Pourquoi, en premier, ne pas tester ma PJ ? Ce serait plus simple, surtout si vous ne maitrisez pas le VBA.
Vous renseignez les cellules C3 à C7 puis appuyez sur le bouton.
Ensuite, si vous voulez que tout se passe en VBA, testez cette PJ. Il faut modifier la première partie

VB: 
Sub ModifierFichier()
'--------------------------------------------------------------------------------------------------------------------
' Partie à modifier
    NomFichier = "C:\Users\PC_PAPA\OneDrive\Classeur_à_modifier.xlsx"   ' Modifiez chemin et nom fichier
    Feuille = "Feuil1"                                                  ' Modifiez la feuille à modifier
    Addresse = "A1"                                                     ' Modifiez l'Adresse de la cellule à modifier
    Valeur = 123456789                                                  ' Modifiez Valeur à écrire
'--------------------------------------------------------------------------------------------------------------------
    Application.ScreenUpdating = False                                  ' Fige l'écran
    Workbooks.Open NomFichier                                           ' Ouvre le fichier
    ActiveWorkbook.Sheets(Feuille).Range(Addresse) = Valeur             ' Ecrit la valeur à l'adresse indiquée
    ActiveWorkbook.Close SaveChanges:=True                              ' Ferme le fichier en enregistrant.
End Sub
 

Pièces jointes

  • ModifFichier V2.xlsm
    15.3 KB · Affichages: 18
Vote positif 0 Vote négatif
Identifiez-vous ou inscrivez-vous pour participer.

Discussions similaires

P
  • Question
Microsoft 365 lancer une macro excel tous les jour sans ouvrir le fichier
Réponses
6
Affichages
1 K
patricktoulon
C
  • Question
Microsoft 365 Synchronisation formules Excel sans ouvrir le fichier Excel
Réponses
3
Affichages
212
cdric78
C
R
  • Question
Microsoft 365 actualisation cube olap et vba
Réponses
4
Affichages
424
Dudu2
C
  • Question
Microsoft 365 Activer et exécuter une macro Excel d'un fichier partagé
Réponses
4
Affichages
204
CHAY150A1
C
T
  • Question
XL 2019 Ouvrir et modifier un fichier Excel dans un autre
Réponses
4
Affichages
359
Theca
T
I
  • Résolu(e)
Microsoft 365 Ouvrir un fichier Excel rapidement en VBA
3 4 5
Réponses
61
Affichages
3 K
iliess
I
G
  • Question
XL 2016 définir un fichier source en fonction d'une cellule
Réponses
3
Affichages
308
scraper
S
R
  • Question
Microsoft 365 Fichier organisation volley-ball
Réponses
1
Affichages
223
halecs93
J
  • Résolu(e)
XL 2013 Créer une macro avec un fichier pour envoyer par mail
Réponses
7
Affichages
307
TooFatBoy
  • Résolu(e)
XL 2021 ouvrir un fichier vba excel 2021 dans les versions ulterieires
Réponses
4
Affichages
340
eriiic
Menu
Connexion
S'inscrire
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…