Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object, ByVal Target As Range) MsgBox "coucou je suis sur " & Sh.Name & " - " & Target.Address End Sub
--
Bien cordialement,
Joël GARBE www.joelgarbe.fr "Tijani" a écrit dans le message de news:25ae001c460e8$8dc147f0$
Comment je peux afficher un message lors du passage par chaque cellule ou en cliquant sur chaque cellule?
Bonjour,
Dans le module privé ThisWorkbook :
Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object, ByVal Target
As Range)
MsgBox "coucou je suis sur " & Sh.Name & " - " & Target.Address
End Sub
--
Bien cordialement,
Joël GARBE
www.joelgarbe.fr
"Tijani" <tijanisellami@yahoo.fr> a écrit dans le message de
news:25ae001c460e8$8dc147f0$a401280a@phx.gbl...
Comment je peux afficher un message lors du passage par
chaque cellule ou en cliquant sur chaque cellule?
Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object, ByVal Target As Range) MsgBox "coucou je suis sur " & Sh.Name & " - " & Target.Address End Sub
--
Bien cordialement,
Joël GARBE www.joelgarbe.fr "Tijani" a écrit dans le message de news:25ae001c460e8$8dc147f0$
Comment je peux afficher un message lors du passage par chaque cellule ou en cliquant sur chaque cellule?
docm
Bonjour Tijani.
Clic droit sur l'onglet de la feuille et
Private Sub Worksheet_SelectionChange(ByVal Target As Excel.Range) reponse = MsgBox(Target.Address) End Sub
"Tijani" wrote in message news:25ae001c460e8$8dc147f0$
Comment je peux afficher un message lors du passage par chaque cellule ou en cliquant sur chaque cellule?
Bonjour Tijani.
Clic droit sur l'onglet de la feuille et
Private Sub Worksheet_SelectionChange(ByVal Target As Excel.Range)
reponse = MsgBox(Target.Address)
End Sub
"Tijani" <tijanisellami@yahoo.fr> wrote in message
news:25ae001c460e8$8dc147f0$a401280a@phx.gbl...
Comment je peux afficher un message lors du passage par
chaque cellule ou en cliquant sur chaque cellule?
C'est exact. Cela ne fonctionne que pour une seule feuille "lors du passage par chaque cellule ou en cliquant sur chaque cellule."
Merci de la précision.
"Joel" wrote in message news:cc6e06$s1h$
Bonjour,
Heu ... Tu es sûr que ça marche sur toutes les feuilles?
C'est vrai que ce n'était pas pécisé, mais le saura-t-on un jour ? --
Bien cordialement,
Joël GARBE www.joelgarbe.fr "docm" a écrit dans le message de news:%
Bonjour Tijani.
Clic droit sur l'onglet de la feuille et
Private Sub Worksheet_SelectionChange(ByVal Target As Excel.Range) reponse = MsgBox(Target.Address) End Sub
"Tijani" wrote in message news:25ae001c460e8$8dc147f0$
Comment je peux afficher un message lors du passage par chaque cellule ou en cliquant sur chaque cellule?
michdenis
Bonjour Joël,
Copie ceci dans le ThisWorkbook de ton classeur : cela va fonctionner à la sélection de chaque nouvelle cellule dans toutes les feuilles de ton classeur.
'------------------- Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object, ByVal Target As Range)
MsgBox "Bonjour"
End Sub '-------------------
Salutations!
"Joel" a écrit dans le message de news:cc6e06$s1h$ Bonjour,
Heu ... Tu es sûr que ça marche sur toutes les feuilles?
C'est vrai que ce n'était pas pécisé, mais le saura-t-on un jour ? --
Bien cordialement,
Joël GARBE www.joelgarbe.fr "docm" a écrit dans le message de news:%
Bonjour Tijani.
Clic droit sur l'onglet de la feuille et
Private Sub Worksheet_SelectionChange(ByVal Target As Excel.Range) reponse = MsgBox(Target.Address) End Sub
"Tijani" wrote in message news:25ae001c460e8$8dc147f0$
Comment je peux afficher un message lors du passage par chaque cellule ou en cliquant sur chaque cellule?
Bonjour Joël,
Copie ceci dans le ThisWorkbook de ton classeur : cela va fonctionner à la sélection de chaque nouvelle cellule dans
toutes les feuilles de ton classeur.
'-------------------
Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object, ByVal Target As Range)
MsgBox "Bonjour"
End Sub
'-------------------
Salutations!
"Joel" <joel-garbe@wanadoo.fr> a écrit dans le message de news:cc6e06$s1h$1@news-reader2.wanadoo.fr...
Bonjour,
Heu ... Tu es sûr que ça marche sur toutes les feuilles?
C'est vrai que ce n'était pas pécisé, mais le saura-t-on un jour ?
--
Bien cordialement,
Joël GARBE
www.joelgarbe.fr
"docm" <docmarti@spamcolba.net> a écrit dans le message de
news:%23dLiOOQYEHA.3988@tk2msftngp13.phx.gbl...
Bonjour Tijani.
Clic droit sur l'onglet de la feuille et
Private Sub Worksheet_SelectionChange(ByVal Target As Excel.Range)
reponse = MsgBox(Target.Address)
End Sub
"Tijani" <tijanisellami@yahoo.fr> wrote in message
news:25ae001c460e8$8dc147f0$a401280a@phx.gbl...
Comment je peux afficher un message lors du passage par
chaque cellule ou en cliquant sur chaque cellule?
Copie ceci dans le ThisWorkbook de ton classeur : cela va fonctionner à la sélection de chaque nouvelle cellule dans toutes les feuilles de ton classeur.
'------------------- Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object, ByVal Target As Range)
MsgBox "Bonjour"
End Sub '-------------------
Salutations!
"Joel" a écrit dans le message de news:cc6e06$s1h$ Bonjour,
Heu ... Tu es sûr que ça marche sur toutes les feuilles?
C'est vrai que ce n'était pas pécisé, mais le saura-t-on un jour ? --
Bien cordialement,
Joël GARBE www.joelgarbe.fr "docm" a écrit dans le message de news:%
Bonjour Tijani.
Clic droit sur l'onglet de la feuille et
Private Sub Worksheet_SelectionChange(ByVal Target As Excel.Range) reponse = MsgBox(Target.Address) End Sub
"Tijani" wrote in message news:25ae001c460e8$8dc147f0$
Comment je peux afficher un message lors du passage par chaque cellule ou en cliquant sur chaque cellule?
Joel
Bonjour Denis,
Cela ressemble à ce que j'ai écrit précédemment ? à 12h40 !
Mais entre temps, tu as du prendre l'apéro ;-)
Bon dimanche ... --
Bien cordialement,
Joël GARBE www.joelgarbe.fr "michdenis" a écrit dans le message de news:
Bonjour Joël,
Copie ceci dans le ThisWorkbook de ton classeur : cela va fonctionner à la sélection de chaque nouvelle cellule dans
toutes les feuilles de ton classeur.
'------------------- Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object, ByVal Target As Range)
MsgBox "Bonjour"
End Sub '-------------------
Salutations!
"Joel" a écrit dans le message de news:cc6e06$s1h$
Bonjour,
Heu ... Tu es sûr que ça marche sur toutes les feuilles?
C'est vrai que ce n'était pas pécisé, mais le saura-t-on un jour ? --
Bien cordialement,
Joël GARBE www.joelgarbe.fr "docm" a écrit dans le message de news:%
Bonjour Tijani.
Clic droit sur l'onglet de la feuille et
Private Sub Worksheet_SelectionChange(ByVal Target As Excel.Range) reponse = MsgBox(Target.Address) End Sub
"Tijani" wrote in message news:25ae001c460e8$8dc147f0$
Comment je peux afficher un message lors du passage par chaque cellule ou en cliquant sur chaque cellule?
Bonjour Denis,
Cela ressemble à ce que j'ai écrit précédemment ? à 12h40 !
Mais entre temps, tu as du prendre l'apéro ;-)
Bon dimanche ...
--
Bien cordialement,
Joël GARBE
www.joelgarbe.fr
"michdenis" <michdenis@hotmail.com> a écrit dans le message de
news:uJmiwaSYEHA.1048@tk2msftngp13.phx.gbl...
Bonjour Joël,
Copie ceci dans le ThisWorkbook de ton classeur : cela va fonctionner à la
sélection de chaque nouvelle cellule dans
toutes les feuilles de ton classeur.
'-------------------
Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object, ByVal Target
As Range)
MsgBox "Bonjour"
End Sub
'-------------------
Salutations!
"Joel" <joel-garbe@wanadoo.fr> a écrit dans le message de
news:cc6e06$s1h$1@news-reader2.wanadoo.fr...
Bonjour,
Heu ... Tu es sûr que ça marche sur toutes les feuilles?
C'est vrai que ce n'était pas pécisé, mais le saura-t-on un jour ?
--
Bien cordialement,
Joël GARBE
www.joelgarbe.fr
"docm" <docmarti@spamcolba.net> a écrit dans le message de
news:%23dLiOOQYEHA.3988@tk2msftngp13.phx.gbl...
Bonjour Tijani.
Clic droit sur l'onglet de la feuille et
Private Sub Worksheet_SelectionChange(ByVal Target As Excel.Range)
reponse = MsgBox(Target.Address)
End Sub
"Tijani" <tijanisellami@yahoo.fr> wrote in message
news:25ae001c460e8$8dc147f0$a401280a@phx.gbl...
Comment je peux afficher un message lors du passage par
chaque cellule ou en cliquant sur chaque cellule?
Cela ressemble à ce que j'ai écrit précédemment ? à 12h40 !
Mais entre temps, tu as du prendre l'apéro ;-)
Bon dimanche ... --
Bien cordialement,
Joël GARBE www.joelgarbe.fr "michdenis" a écrit dans le message de news:
Bonjour Joël,
Copie ceci dans le ThisWorkbook de ton classeur : cela va fonctionner à la sélection de chaque nouvelle cellule dans
toutes les feuilles de ton classeur.
'------------------- Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object, ByVal Target As Range)
MsgBox "Bonjour"
End Sub '-------------------
Salutations!
"Joel" a écrit dans le message de news:cc6e06$s1h$
Bonjour,
Heu ... Tu es sûr que ça marche sur toutes les feuilles?
C'est vrai que ce n'était pas pécisé, mais le saura-t-on un jour ? --
Bien cordialement,
Joël GARBE www.joelgarbe.fr "docm" a écrit dans le message de news:%
Bonjour Tijani.
Clic droit sur l'onglet de la feuille et
Private Sub Worksheet_SelectionChange(ByVal Target As Excel.Range) reponse = MsgBox(Target.Address) End Sub
"Tijani" wrote in message news:25ae001c460e8$8dc147f0$
Comment je peux afficher un message lors du passage par chaque cellule ou en cliquant sur chaque cellule?
sabatier
ah! joel, ne cherche pas des bosses à mon copain michel : peut pas être partout à la fois, et à l'apéro et à regarder les réponses précedentes, notre québécois et ne le vexe pas car tu sais comme ils sont irascibles là-bas et alors garbe à toi... jps
Joel a écrit:
Bonjour Denis,
Cela ressemble à ce que j'ai écrit précédemment ? à 12h40 !
Mais entre temps, tu as du prendre l'apéro ;-)
Bon dimanche ...
ah! joel, ne cherche pas des bosses à mon copain michel : peut pas être
partout à la fois, et à l'apéro et à regarder les réponses précedentes,
notre québécois et ne le vexe pas car tu sais comme ils sont irascibles
là-bas et alors garbe à toi...
jps
Joel a écrit:
Bonjour Denis,
Cela ressemble à ce que j'ai écrit précédemment ? à 12h40 !
ah! joel, ne cherche pas des bosses à mon copain michel : peut pas être partout à la fois, et à l'apéro et à regarder les réponses précedentes, notre québécois et ne le vexe pas car tu sais comme ils sont irascibles là-bas et alors garbe à toi... jps
Joel a écrit:
Bonjour Denis,
Cela ressemble à ce que j'ai écrit précédemment ? à 12h40 !
Mais entre temps, tu as du prendre l'apéro ;-)
Bon dimanche ...
Joel
;-)
Promis, j'le referai pu
--
Bien cordialement,
Joël GARBE www.joelgarbe.fr "sabatier" a écrit dans le message de news:
ah! joel, ne cherche pas des bosses à mon copain michel : peut pas être partout à la fois, et à l'apéro et à regarder les réponses précedentes, notre québécois et ne le vexe pas car tu sais comme ils sont irascibles là-bas et alors garbe à toi... jps
Joel a écrit:
Bonjour Denis,
Cela ressemble à ce que j'ai écrit précédemment ? à 12h40 !
Mais entre temps, tu as du prendre l'apéro ;-)
Bon dimanche ...
;-)
Promis, j'le referai pu
--
Bien cordialement,
Joël GARBE
www.joelgarbe.fr
"sabatier" <biscotteUnScudJpsabatdelaile@wanadoo.fr> a écrit dans le message
de news:40E7B338.8060203@wanadoo.fr...
ah! joel, ne cherche pas des bosses à mon copain michel : peut pas être
partout à la fois, et à l'apéro et à regarder les réponses précedentes,
notre québécois et ne le vexe pas car tu sais comme ils sont irascibles
là-bas et alors garbe à toi...
jps
Joel a écrit:
Bonjour Denis,
Cela ressemble à ce que j'ai écrit précédemment ? à 12h40 !
Joël GARBE www.joelgarbe.fr "sabatier" a écrit dans le message de news:
ah! joel, ne cherche pas des bosses à mon copain michel : peut pas être partout à la fois, et à l'apéro et à regarder les réponses précedentes, notre québécois et ne le vexe pas car tu sais comme ils sont irascibles là-bas et alors garbe à toi... jps
Joel a écrit:
Bonjour Denis,
Cela ressemble à ce que j'ai écrit précédemment ? à 12h40 !
Quand tu as la chance de vivre sous de grands espaces, Il est peut être plus difficile d'accepter de se faire marcher sur les pieds !!! Personnellement, je t'avoue que j'ai la grosse orteil plutôt sensible ! :-)
Je connais pourtant de ces gens tout à fait débonnaires qui ont la réminescence facile lorsqu'il s'agit d'un certain Doc office (éminence grise de chez Microsoft !).....
....c'est vrai, on ne peut pas taxer les gens qui possèdent une bonne mémoire d'irascible ? alors garbe à toi !
;-))
Salutations !
"sabatier" a écrit dans le message de news: ah! joel, ne cherche pas des bosses à mon copain michel : peut pas être partout à la fois, et à l'apéro et à regarder les réponses précedentes, notre québécois et ne le vexe pas car tu sais comme ils sont irascibles là-bas et alors garbe à toi... jps
Joel a écrit:
Bonjour Denis,
Cela ressemble à ce que j'ai écrit précédemment ? à 12h40 !
Mais entre temps, tu as du prendre l'apéro ;-)
Bon dimanche ...
Bonjour JPS,
"ils sont irascibles"
Quand tu as la chance de vivre sous de grands espaces, Il est peut être plus difficile d'accepter de se faire marcher
sur les pieds !!! Personnellement, je t'avoue que j'ai la grosse orteil plutôt sensible ! :-)
Je connais pourtant de ces gens tout à fait débonnaires qui ont la réminescence facile lorsqu'il s'agit d'un certain Doc
office (éminence grise de chez Microsoft !).....
....c'est vrai, on ne peut pas taxer les gens qui possèdent une bonne mémoire d'irascible ? alors garbe à toi !
;-))
Salutations !
"sabatier" <biscotteUnScudJpsabatdelaile@wanadoo.fr> a écrit dans le message de news:40E7B338.8060203@wanadoo.fr...
ah! joel, ne cherche pas des bosses à mon copain michel : peut pas être
partout à la fois, et à l'apéro et à regarder les réponses précedentes,
notre québécois et ne le vexe pas car tu sais comme ils sont irascibles
là-bas et alors garbe à toi...
jps
Joel a écrit:
Bonjour Denis,
Cela ressemble à ce que j'ai écrit précédemment ? à 12h40 !
Quand tu as la chance de vivre sous de grands espaces, Il est peut être plus difficile d'accepter de se faire marcher sur les pieds !!! Personnellement, je t'avoue que j'ai la grosse orteil plutôt sensible ! :-)
Je connais pourtant de ces gens tout à fait débonnaires qui ont la réminescence facile lorsqu'il s'agit d'un certain Doc office (éminence grise de chez Microsoft !).....
....c'est vrai, on ne peut pas taxer les gens qui possèdent une bonne mémoire d'irascible ? alors garbe à toi !
;-))
Salutations !
"sabatier" a écrit dans le message de news: ah! joel, ne cherche pas des bosses à mon copain michel : peut pas être partout à la fois, et à l'apéro et à regarder les réponses précedentes, notre québécois et ne le vexe pas car tu sais comme ils sont irascibles là-bas et alors garbe à toi... jps
Joel a écrit:
Bonjour Denis,
Cela ressemble à ce que j'ai écrit précédemment ? à 12h40 !
