[VBA] Lancer une macro automatiquement

Fermé

DeWaRs Messages postés 72 Date d'inscription jeudi 8 novembre 2007 Statut Membre Dernière intervention 7 novembre 2012 - 11 févr. 2009 à 11:22
olivier - 23 févr. 2011 à 13:06

Bonjour à tous,

Dans le cadre d'un petit projet d'entreprise, je doit créer une macro qui se lance au démarage de chaque fichier word que j'ouvre. Comment faire ? Je sais associer une macro a un document, mais pas au word.

De plus, je souhaiterais faire une recherche dans le document ouvert mais je ne sais pas non plus comment faire.

Merci d'avance a ceux qui pourrons m'aider.

Amicalement.

DeWaRs.

A voir également:

[VBA] Lancer une macro automatiquement
Telecharger macro convertir chiffre en lettre excel - Télécharger - Tableur
Comment lancer un programme automatiquement au démarrage de windows - Guide
Jitbit macro recorder - Télécharger - Confidentialité
Macro word - Guide
Excel remplir automatiquement une cellule en fonction d'une autre ✓ - Forum Excel

4 réponses

Réponse 1 / 4

R.Elliot Messages postés 6 Date d'inscription vendredi 21 novembre 2008 Statut Membre Dernière intervention 23 février 2009 2
23 févr. 2009 à 21:32

salut, tu px normalement :

- Nommer la macro AutoExec -> Demarrage automatique a chaque nouvelle session de Word.

- Plus sioux, a partir de la ligne de commande ou d'un fichier .bat
ajouter a la ligne Winword.exe ....
la commande suivante
/mmacroname

ou alors,

utiliser du VBA, avec la barre d'outil Visual Basic tu peux atteindre le code et faire une fonction Private Sub Document_Open()
avec ton code VBA
End Sub

a plus,

Réponse 2 / 4

DeWaRs Messages postés 72 Date d'inscription jeudi 8 novembre 2007 Statut Membre Dernière intervention 7 novembre 2012 13
11 févr. 2009 à 11:31

Sauf que ca c'est pour le document en cours, pas pour tous les document word si ?

Psyk974 Messages postés 551 Date d'inscription lundi 2 février 2009 Statut Membre Dernière intervention 30 mars 2010 51
11 févr. 2009 à 11:43

Ahhhh peut importe le document tu veux executer la meme macro c ça ?

Dans ce cas impossible

Réponse 3 / 4

Psyk974 Messages postés 551 Date d'inscription lundi 2 février 2009 Statut Membre Dernière intervention 30 mars 2010 51
11 févr. 2009 à 11:25

Dans le code de ton "ThisDocument" en VBA tu dois utiliser cette procédure.

Private Sub Document_Open()
'Placer ici les macro à exécuter au lancement du document.
End Sub

Réponse 4 / 4

olivier
23 févr. 2011 à 13:06

bonjour

quand bien même, je met un CALL maSuperMacro,
celle ci ne se lance pas automatiquement :-(

merci
olivier

Word 2007et >

Discussions similaires

"L'indice n'appartient à la sélection" + VBA

Bonjour,
Nous avons un problème dans la programmation de notre VBA. Voici notre programme:

Sub Bloucle1Bull()
Dim a, k As Integer

k = 2
Do While Worksheets("formulaire").Cells(2, 2) Worksheets("formulaire").Cells(k, 4)
k = k + 1
Loop

a = 2
Do While Worksheets("formulaire").Cells(k + 1, 4) Worksheets("BDD Call").Cells(a, 1) Or (Worksheets("BDD Call").Cells(a, 4) = (Worksheets("Bullspread").Cells(2, 3) + 100)) Or Worksheets("BDD Call").Cells(a, 7) Worksheets("bullspread").Cells(2, 7)
a = a + 1
Loop

''''''''''''on recopie la ligne du premier call trouvé pour le jour 2 ...

Remplir une cellule (texte) en fonction d'une autre (texte).

Bonjour à tous,

Je vais encore vous embêter aujourd'hui avec mon registre/rapport.

Ma question est simple (enfin je crois).
J'ai une liste de client :
- Autocars truc
- Bidule Autocars
- ... etc

J'ai une adresse pour chaque client (sous forme de liste) :
- Pont de Ernest
- Chemin Départemental 6
- ... etc

J'ai un code poste pour chaque client (sous forme de liste) :
- 99548
- ... etc

Ma question est : Si en D18 je récupère l'information du nom de mon client, je veux en D19 son adresse, en E20 son code postal et en M20 sa ville en fonction des listes d'ad...

Erreur d'exécution 13 Incompatibilité de type

Bonjour,

Je ne comprend pas pourquoi j'ai une erreur d'execution 13 : incompatibilité de type car mon code marchait très bien avant...Je met en gras la ligne où il y a l'erreur

'affichage des feuilles concernées et vérification des champs Sheets("Recap").Visible = True If Cathégories = "" Then MsgBox "Sélectionnez une catégorie de défauts dans la liste déroulante" ElseIf défauts = "" Then MsgBox "Sélectionnez un défauts qualité dans la liste déroulante" Exit Sub End If Dim i As Integer Dim n As Integer n = 3 i = 2 MsgBox "Veuillez patienter pendant le traitement..." Application.Cursor = xlWait 'affiche le sablier 'Suppression des don...

Durée d'une diapositive animée

Bonjour,

Je souhaite créer un diaporama entièrement automatisé (sans clic) sous PowerPoint 2010. J'ai donc établi les différent paramètres d'animation (durée, effet d'apparition, de disparition...) pour les titres, photos dans chacune de mes diapos (onglet animation). J'ai également choisi mes transitions entre chaque diapo (onglet transition). Jusqu'ici tout va bien.

Mon souci est la durée de chacune des diapositives. Je souhaiterai que le changement de diapo se fasse directement après la dernière animation de la diapo sans laps de temps.
Voici le problème :

Dans l'onglet transition, j'ai indiqué "passer à la diapositive suivante après ...

Arrêt d'exécution d'un code vba

Bonjour,

je suis bloqué dans cette astuce , j'ai déjà eu la solution dans le forum mais ca ne marche pas dans mon cas je m'adresse à vous pour m'aider en vous remerciant d'avance.en effet ma problème est que fréquament l'exécution de mon code vba s'pprend de temps et je pense qu'il se bloque dans je reste en attente pour plusieurs munites , je vous prie de me donner une solution pour arrêter l'éxecution sachant que mon pc est portable et j'ai déjà fait:

shift+ctrl+fin+inser
shift+fin+inser

merci d'avance

Configuration: Windows / Chrome 56.0.2924.87