Private Sub Worksheet_Activate() MsgBox "feuil2" End Sub
Pour chaque feuile du classeur:
Private Sub Workbook_SheetActivate(ByVal Sh As Object) MsgBox Sh.Name End Sub
http://cjoint.com/?gthWOuh4rE
JB
On 19 juin, 07:24, "thomas" <nomail> wrote:
En fait c'est une fonction que je voudrais activer à l'activation d'une feuille, pas uen macro
"thomas" <nomail> a écrit dans le message de groupe de discussion : # Bonjour,
Quand une macro s'appelle autoexec ou autoclose elle s'exécute automatiquement à l'ouverture ou à la fermeture du classeur
Comment faut-il appeler la macro pour qu'elle s'exécute quand on active une feuille?
Merci
thomas
Merci
"MichDenis" a écrit dans le message de groupe de discussion : Les suggestions faites me semble-t-il sont incomplètes....
Suppose que tu as 2 classeurs d'ouverts, si tu en fermes un et que tu te retrouves sur ladite feuil1 où tu dois activer ton truc.... cette sub "Private Sub Worksheet_Activate()" ne s'exécutera pas... il faudra que tu ajoutes ceci dans le ThisWorkbook de ton classeur :
'------------------------------ Private Sub Workbook_WindowActivate(ByVal Wn As Window)
'Pour un choix précis d'une feuille 'CodeName = Nom de ta feuille visible dans la fenêtre de l'éditeur 'de code et non l'onglet de la feuille... If Wn.ActiveSheet.CodeName = "Feuil1" Then MsgBox "Ok" End If
'OU selon les besoins de ton application.
'Peu importe la feuille en autant que le classeur 'devienne la fenêtre active If Wn.Parent.Name = ThisWorkbook.Name Then MsgBox "ok ok" End If End Sub '------------------------------
Édivemment, cette dernière doit s'ajouter à Private Sub Worksheet_Activate() du module de la feuille pour rendre ta procédure complète !
"thomas" <nomail> a écrit dans le message de news: % Bonjour,
Quand une macro s'appelle autoexec ou autoclose elle s'exécute automatiquement à l'ouverture ou à la fermeture du classeur
Comment faut-il appeler la macro pour qu'elle s'exécute quand on active une feuille?
Merci
Merci
"MichDenis" <michdenis@hotmail.com> a écrit dans le message de groupe de
discussion : ud3DxTf0IHA.4572@TK2MSFTNGP03.phx.gbl...
Les suggestions faites me semble-t-il sont incomplètes....
Suppose que tu as 2 classeurs d'ouverts, si tu en fermes un
et que tu te retrouves sur ladite feuil1 où tu dois activer
ton truc.... cette sub "Private Sub Worksheet_Activate()"
ne s'exécutera pas... il faudra que tu ajoutes ceci dans le
ThisWorkbook de ton classeur :
'------------------------------
Private Sub Workbook_WindowActivate(ByVal Wn As Window)
'Pour un choix précis d'une feuille
'CodeName = Nom de ta feuille visible dans la fenêtre de l'éditeur
'de code et non l'onglet de la feuille...
If Wn.ActiveSheet.CodeName = "Feuil1" Then
MsgBox "Ok"
End If
'OU selon les besoins de ton application.
'Peu importe la feuille en autant que le classeur
'devienne la fenêtre active
If Wn.Parent.Name = ThisWorkbook.Name Then
MsgBox "ok ok"
End If
End Sub
'------------------------------
Édivemment, cette dernière doit s'ajouter à
Private Sub Worksheet_Activate() du module de la feuille
pour rendre ta procédure complète !
"thomas" <nomail> a écrit dans le message de news:
%23itDltc0IHA.2064@TK2MSFTNGP05.phx.gbl...
Bonjour,
Quand une macro s'appelle autoexec ou autoclose elle s'exécute
automatiquement à l'ouverture ou à la fermeture du classeur
Comment faut-il appeler la macro pour qu'elle s'exécute quand on active une
feuille?
"MichDenis" a écrit dans le message de groupe de discussion : Les suggestions faites me semble-t-il sont incomplètes....
Suppose que tu as 2 classeurs d'ouverts, si tu en fermes un et que tu te retrouves sur ladite feuil1 où tu dois activer ton truc.... cette sub "Private Sub Worksheet_Activate()" ne s'exécutera pas... il faudra que tu ajoutes ceci dans le ThisWorkbook de ton classeur :
'------------------------------ Private Sub Workbook_WindowActivate(ByVal Wn As Window)
'Pour un choix précis d'une feuille 'CodeName = Nom de ta feuille visible dans la fenêtre de l'éditeur 'de code et non l'onglet de la feuille... If Wn.ActiveSheet.CodeName = "Feuil1" Then MsgBox "Ok" End If
'OU selon les besoins de ton application.
'Peu importe la feuille en autant que le classeur 'devienne la fenêtre active If Wn.Parent.Name = ThisWorkbook.Name Then MsgBox "ok ok" End If End Sub '------------------------------
Édivemment, cette dernière doit s'ajouter à Private Sub Worksheet_Activate() du module de la feuille pour rendre ta procédure complète !
"thomas" <nomail> a écrit dans le message de news: % Bonjour,
Quand une macro s'appelle autoexec ou autoclose elle s'exécute automatiquement à l'ouverture ou à la fermeture du classeur
Comment faut-il appeler la macro pour qu'elle s'exécute quand on active une feuille?
Merci
thomas
merci
"JB" a écrit dans le message de groupe de discussion :
Pour une feuille:
Private Sub Worksheet_Activate() MsgBox "feuil2" End Sub
Pour chaque feuile du classeur:
Private Sub Workbook_SheetActivate(ByVal Sh As Object) MsgBox Sh.Name End Sub
http://cjoint.com/?gthWOuh4rE
JB
On 19 juin, 07:24, "thomas" <nomail> wrote:
En fait c'est une fonction que je voudrais activer à l'activation d'une feuille, pas uen macro
"thomas" <nomail> a écrit dans le message de groupe de discussion : # Bonjour,
Quand une macro s'appelle autoexec ou autoclose elle s'exécute automatiquement à l'ouverture ou à la fermeture du classeur
Comment faut-il appeler la macro pour qu'elle s'exécute quand on active une feuille?
Merci
merci
"JB" <boisgontier@hotmail.com> a écrit dans le message de groupe de
discussion :
9e7b6e7a-92a7-4b84-a64d-ef4177fd3a3c@s50g2000hsb.googlegroups.com...
Pour une feuille:
Private Sub Worksheet_Activate()
MsgBox "feuil2"
End Sub
Pour chaque feuile du classeur:
Private Sub Workbook_SheetActivate(ByVal Sh As Object)
MsgBox Sh.Name
End Sub
http://cjoint.com/?gthWOuh4rE
JB
On 19 juin, 07:24, "thomas" <nomail> wrote:
En fait c'est une fonction que je voudrais activer à l'activation d'une
feuille, pas uen macro
"thomas" <nomail> a écrit dans le message de groupe de discussion :
#itDltc0IHA.2...@TK2MSFTNGP05.phx.gbl...
Bonjour,
Quand une macro s'appelle autoexec ou autoclose elle s'exécute
automatiquement à l'ouverture ou à la fermeture du classeur
Comment faut-il appeler la macro pour qu'elle s'exécute quand on active
une
feuille?