OVH Cloud OVH Cloud

macro, Execution à l ouverture du fichier

11 réponses
Avatar
Pat
bj
Lorsque j'ouvre un fichier Excel, je souhaite qu'une macro=20
s'execute automatiquement =E0 l'ouverture.
Ou dois je mettre le code, ou comment?
merci

10 réponses

1 2
Avatar
Christian M
Bonjour,
Alt + F11 pour ouvrir VBA
double clique sur This Workbook
dans la fenêtre de droite , en haut clique sur l'ascenceur et choisis
Workbook et à droite choisis Open

--
Christian M
-------------------------------
"Pat" a écrit dans le message de news:
2f6701c3b00a$a6ce5f10$
bj
Lorsque j'ouvre un fichier Excel, je souhaite qu'une macro
s'execute automatiquement à l'ouverture.
Ou dois je mettre le code, ou comment?
merci
Avatar
Christian M
bonjour,

Private Sub Workbook_Open()

End Sub

à mettre dans This Workbook

--
Christian M
-------------------------------
"Pat" a écrit dans le message de news:
2f6701c3b00a$a6ce5f10$
bj
Lorsque j'ouvre un fichier Excel, je souhaite qu'une macro
s'execute automatiquement à l'ouverture.
Ou dois je mettre le code, ou comment?
merci
Avatar
ru-th
Salut

ou dans un module standard

sub auto_open()
'Ton code
end sub


a+
rural thierry
"Pat" a écrit dans le message de news:
2f6701c3b00a$a6ce5f10$
bj
Lorsque j'ouvre un fichier Excel, je souhaite qu'une macro
s'execute automatiquement à l'ouverture.
Ou dois je mettre le code, ou comment?
merci
Avatar
Titus
Bonjour Thierry,
dans le même genre quel est la syntaxe afin d'avoir dans le module standard
un before_close ou un close ?
Merci

"ru-th" a écrit dans le message de news:

Salut

ou dans un module standard

sub auto_open()
'Ton code
end sub


a+
rural thierry
"Pat" a écrit dans le message de
news:

2f6701c3b00a$a6ce5f10$
bj
Lorsque j'ouvre un fichier Excel, je souhaite qu'une macro
s'execute automatiquement à l'ouverture.
Ou dois je mettre le code, ou comment?
merci




Avatar
ru-th
Salut

sub auto_close

a+
rural thierry

"Titus" a écrit dans le message de news:

Bonjour Thierry,
dans le même genre quel est la syntaxe afin d'avoir dans le module
standard

un before_close ou un close ?
Merci

"ru-th" a écrit dans le message de news:

Salut

ou dans un module standard

sub auto_open()
'Ton code
end sub


a+
rural thierry
"Pat" a écrit dans le message de
news:

2f6701c3b00a$a6ce5f10$
bj
Lorsque j'ouvre un fichier Excel, je souhaite qu'une macro
s'execute automatiquement à l'ouverture.
Ou dois je mettre le code, ou comment?
merci








Avatar
ELDER
Et pour appliquer une macro au démarrage sur certaines feuilles mas pas les
autres ????

Je voudrais lancer une macro sur la feuille1 à feuille 7 mais pas sur les
autres !

Merci

"ru-th" a écrit dans le message de
news:
Salut

sub auto_close

a+
rural thierry

"Titus" a écrit dans le message de news:

Bonjour Thierry,
dans le même genre quel est la syntaxe afin d'avoir dans le module
standard

un before_close ou un close ?
Merci

"ru-th" a écrit dans le message de news:

Salut

ou dans un module standard

sub auto_open()
'Ton code
end sub


a+
rural thierry
"Pat" a écrit dans le message de
news:

2f6701c3b00a$a6ce5f10$
bj
Lorsque j'ouvre un fichier Excel, je souhaite qu'une macro
s'execute automatiquement à l'ouverture.
Ou dois je mettre le code, ou comment?
merci












Avatar
Michel Gaboly
Bonjour,

Il faut écrire une macro générique utilisant une feuille comme argument :

Dans le module ThisWorkbook :

Private Sub Workbook_Open()
Dim i as Integer
For i = 1 to 7
TraitementFeuille Worksheets(i)
Next i
End Sub

Private TraitementFeuille(f as Worksheet)
With Worksheets(f)
...
End With
End Sub


La procédure "TraitementFeuille" peur être aussi dans un module standard,
mais dans ce cas, il faut supprimer "Private", pour que sa portée ne soit
pas limitée à ce module.



Et pour appliquer une macro au démarrage sur certaines feuilles mas pas les
autres ????

Je voudrais lancer une macro sur la feuille1 à feuille 7 mais pas sur les
autres !

Merci

"ru-th" a écrit dans le message de
news:
Salut

sub auto_close

a+
rural thierry

"Titus" a écrit dans le message de news:

Bonjour Thierry,
dans le même genre quel est la syntaxe afin d'avoir dans le module
standard

un before_close ou un close ?
Merci

"ru-th" a écrit dans le message de news:

Salut

ou dans un module standard

sub auto_open()
'Ton code
end sub


a+
rural thierry
"Pat" a écrit dans le message de
news:

2f6701c3b00a$a6ce5f10$
bj
Lorsque j'ouvre un fichier Excel, je souhaite qu'une macro
s'execute automatiquement à l'ouverture.
Ou dois je mettre le code, ou comment?
merci











--
Cordialement,

Michel Gaboly
http://www.gaboly.com




Avatar
ELDER
Merci Michel, je pense maintenant y arriver avec cette formule ;-))) en ce
moment j'ai la tête qui va exploser avec toutes les astuces que je découvre
chaque jour. Enfin en ce moment mon plus gros soucis c'est de creer une
macro qui envoi des alertes !!!

Dur dur parfois mais heureusement y a des gens super sur le forum !


"Michel Gaboly" a écrit dans le message de
news:
Bonjour,

Il faut écrire une macro générique utilisant une feuille comme argument :

Dans le module ThisWorkbook :

Private Sub Workbook_Open()
Dim i as Integer
For i = 1 to 7
TraitementFeuille Worksheets(i)
Next i
End Sub

Private TraitementFeuille(f as Worksheet)
With Worksheets(f)
...
End With
End Sub


La procédure "TraitementFeuille" peur être aussi dans un module standard,
mais dans ce cas, il faut supprimer "Private", pour que sa portée ne soit
pas limitée à ce module.



Et pour appliquer une macro au démarrage sur certaines feuilles mas pas
les


autres ????

Je voudrais lancer une macro sur la feuille1 à feuille 7 mais pas sur
les


autres !

Merci

"ru-th" a écrit dans le message de
news:
Salut

sub auto_close

a+
rural thierry

"Titus" a écrit dans le message de news:

Bonjour Thierry,
dans le même genre quel est la syntaxe afin d'avoir dans le module
standard

un before_close ou un close ?
Merci

"ru-th" a écrit dans le message de news:

Salut

ou dans un module standard

sub auto_open()
'Ton code
end sub


a+
rural thierry
"Pat" a écrit dans le
message de





news:
2f6701c3b00a$a6ce5f10$
bj
Lorsque j'ouvre un fichier Excel, je souhaite qu'une macro
s'execute automatiquement à l'ouverture.
Ou dois je mettre le code, ou comment?
merci











--
Cordialement,

Michel Gaboly
http://www.gaboly.com








Avatar
Michel Gaboly
De rien,

N'hésite pas à utiliser le forum. Il y a plein de gens qui seront
ravis de te répondre. ;-))


Merci Michel, je pense maintenant y arriver avec cette formule ;-))) en ce
moment j'ai la tête qui va exploser avec toutes les astuces que je découvre
chaque jour. Enfin en ce moment mon plus gros soucis c'est de creer une
macro qui envoi des alertes !!!

Dur dur parfois mais heureusement y a des gens super sur le forum !

"Michel Gaboly" a écrit dans le message de
news:
Bonjour,

Il faut écrire une macro générique utilisant une feuille comme argument :

Dans le module ThisWorkbook :

Private Sub Workbook_Open()
Dim i as Integer
For i = 1 to 7
TraitementFeuille Worksheets(i)
Next i
End Sub

Private TraitementFeuille(f as Worksheet)
With Worksheets(f)
...
End With
End Sub


La procédure "TraitementFeuille" peur être aussi dans un module standard,
mais dans ce cas, il faut supprimer "Private", pour que sa portée ne soit
pas limitée à ce module.



Et pour appliquer une macro au démarrage sur certaines feuilles mas pas
les


autres ????

Je voudrais lancer une macro sur la feuille1 à feuille 7 mais pas sur
les


autres !

Merci

"ru-th" a écrit dans le message de
news:
Salut

sub auto_close

a+
rural thierry

"Titus" a écrit dans le message de news:

Bonjour Thierry,
dans le même genre quel est la syntaxe afin d'avoir dans le module
standard

un before_close ou un close ?
Merci

"ru-th" a écrit dans le message de news:

Salut

ou dans un module standard

sub auto_open()
'Ton code
end sub


a+
rural thierry
"Pat" a écrit dans le
message de





news:
2f6701c3b00a$a6ce5f10$
bj
Lorsque j'ouvre un fichier Excel, je souhaite qu'une macro
s'execute automatiquement à l'ouverture.
Ou dois je mettre le code, ou comment?
merci











--
Cordialement,

Michel Gaboly
http://www.gaboly.com





--
Cordialement,

Michel Gaboly
http://www.gaboly.com






Avatar
Alain CROS
Bonjour.

Tu peux essayer comme ça.
Dans le module ThisWorkbook

Private Sub Workbook_SheetActivate(ByVal Sh As Object)
On Error Resume Next
If Application.Choose(Sh.Index, 1, 2, 3, 4, 5, 6, 7) > 0 Then
If Err.Number = 0 Then
On Error GoTo 0
MsgBox "bonjour"
End If
On Error GoTo 0
End If
End Sub

Alain CROS.

"ELDER" a écrit dans le message de news: bpl8af$68p$
Et pour appliquer une macro au démarrage sur certaines feuilles mas pas les
autres ????

Je voudrais lancer une macro sur la feuille1 à feuille 7 mais pas sur les
autres !

Merci


1 2