Bonsoir
Je souhaite écrire la macro suivante :
Si les cellules sélectionnées ne sont pas dans la colonne A
Msgbox "les données doivent être sélectionnées en A" : exit sub
Merci beaucoup
Michel
Bonsoir, if intersect(target,range("a:a") is nothing then ... devrait pouvoir convenir -- Amicales Salutations XL 97 / 2000 / 2002 Préférez suivre facilement sur le forum : news://msnews.microsoft.com/microsoft.public.fr.excel (Voulez-vous vous abonner ? -> Oui)
"Michel" a écrit dans le message de news: %
Bonsoir Je souhaite écrire la macro suivante : Si les cellules sélectionnées ne sont pas dans la colonne A Msgbox "les données doivent être sélectionnées en A" : exit sub Merci beaucoup Michel
Bonsoir,
if intersect(target,range("a:a") is nothing then
...
devrait pouvoir convenir
--
Amicales Salutations
XL 97 / 2000 / 2002
Préférez suivre facilement sur le forum :
news://msnews.microsoft.com/microsoft.public.fr.excel
(Voulez-vous vous abonner ? -> Oui)
"Michel" <m.hirt@club-internet.fr> a écrit dans le message de news:
%23MRfvXPTFHA.3040@TK2MSFTNGP10.phx.gbl...
Bonsoir
Je souhaite écrire la macro suivante :
Si les cellules sélectionnées ne sont pas dans la colonne A
Msgbox "les données doivent être sélectionnées en A" : exit sub
Merci beaucoup
Michel
Bonsoir, if intersect(target,range("a:a") is nothing then ... devrait pouvoir convenir -- Amicales Salutations XL 97 / 2000 / 2002 Préférez suivre facilement sur le forum : news://msnews.microsoft.com/microsoft.public.fr.excel (Voulez-vous vous abonner ? -> Oui)
"Michel" a écrit dans le message de news: %
Bonsoir Je souhaite écrire la macro suivante : Si les cellules sélectionnées ne sont pas dans la colonne A Msgbox "les données doivent être sélectionnées en A" : exit sub Merci beaucoup Michel
RaMa
Bonsoir
' à placer dans la feuille concernée par l'évènement
Private Sub Worksheet_SelectionChange(ByVal Target As Range) If Target.Column <> 1 Then MsgBox "les données doivent être sélectionnées en A": Exit Sub End Sub
Salutations RaMa
"Michel" a écrit dans le message de news: %
Bonsoir Je souhaite écrire la macro suivante : Si les cellules sélectionnées ne sont pas dans la colonne A Msgbox "les données doivent être sélectionnées en A" : exit sub Merci beaucoup Michel
Bonsoir
' à placer dans la feuille concernée par l'évènement
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Column <> 1 Then MsgBox "les données doivent être sélectionnées en
A": Exit Sub
End Sub
Salutations
RaMa
"Michel" <m.hirt@club-internet.fr> a écrit dans le message de news:
%23MRfvXPTFHA.3040@TK2MSFTNGP10.phx.gbl...
Bonsoir
Je souhaite écrire la macro suivante :
Si les cellules sélectionnées ne sont pas dans la colonne A
Msgbox "les données doivent être sélectionnées en A" : exit sub
Merci beaucoup
Michel
' à placer dans la feuille concernée par l'évènement
Private Sub Worksheet_SelectionChange(ByVal Target As Range) If Target.Column <> 1 Then MsgBox "les données doivent être sélectionnées en A": Exit Sub End Sub
Salutations RaMa
"Michel" a écrit dans le message de news: %
Bonsoir Je souhaite écrire la macro suivante : Si les cellules sélectionnées ne sont pas dans la colonne A Msgbox "les données doivent être sélectionnées en A" : exit sub Merci beaucoup Michel
Michel
Bonsoir Philippe Désolé... Erreur de syntaxe Merci Michel
"Philippe.R" a écrit dans le message de news:
Bonsoir, if intersect(target,range("a:a") is nothing then ... devrait pouvoir convenir -- Amicales Salutations XL 97 / 2000 / 2002 Préférez suivre facilement sur le forum : news://msnews.microsoft.com/microsoft.public.fr.excel (Voulez-vous vous abonner ? -> Oui)
"Michel" a écrit dans le message de news: %
Bonsoir Je souhaite écrire la macro suivante : Si les cellules sélectionnées ne sont pas dans la colonne A Msgbox "les données doivent être sélectionnées en A" : exit sub Merci beaucoup Michel
Bonsoir Philippe
Désolé...
Erreur de syntaxe
Merci
Michel
"Philippe.R" <A_S_rauphil@wanadoo.fr> a écrit dans le message de news:
OnBgFAQTFHA.3652@TK2MSFTNGP15.phx.gbl...
Bonsoir,
if intersect(target,range("a:a") is nothing then
...
devrait pouvoir convenir
--
Amicales Salutations
XL 97 / 2000 / 2002
Préférez suivre facilement sur le forum :
news://msnews.microsoft.com/microsoft.public.fr.excel
(Voulez-vous vous abonner ? -> Oui)
"Michel" <m.hirt@club-internet.fr> a écrit dans le message de news:
%23MRfvXPTFHA.3040@TK2MSFTNGP10.phx.gbl...
Bonsoir
Je souhaite écrire la macro suivante :
Si les cellules sélectionnées ne sont pas dans la colonne A
Msgbox "les données doivent être sélectionnées en A" : exit sub
Merci beaucoup
Michel
Bonsoir Philippe Désolé... Erreur de syntaxe Merci Michel
"Philippe.R" a écrit dans le message de news:
Bonsoir, if intersect(target,range("a:a") is nothing then ... devrait pouvoir convenir -- Amicales Salutations XL 97 / 2000 / 2002 Préférez suivre facilement sur le forum : news://msnews.microsoft.com/microsoft.public.fr.excel (Voulez-vous vous abonner ? -> Oui)
"Michel" a écrit dans le message de news: %
Bonsoir Je souhaite écrire la macro suivante : Si les cellules sélectionnées ne sont pas dans la colonne A Msgbox "les données doivent être sélectionnées en A" : exit sub Merci beaucoup Michel
Philippe.R
Re, Excuse, ce sera mieux ainsi :
If Intersect(Target, Range("a:a")) Is Nothing Then MsgBox "Pas bon, t'es pas colon' a !"
Une parenthèse avait sauté ! -- Amicales Salutations XL 97 / 2000 / 2002 Préférez suivre facilement sur le forum : news://msnews.microsoft.com/microsoft.public.fr.excel (Voulez-vous vous abonner ? -> Oui)
"Michel" a écrit dans le message de news:
Bonsoir Philippe Désolé... Erreur de syntaxe Merci Michel
"Philippe.R" a écrit dans le message de news:
Bonsoir, if intersect(target,range("a:a") is nothing then ... devrait pouvoir convenir -- Amicales Salutations XL 97 / 2000 / 2002 Préférez suivre facilement sur le forum : news://msnews.microsoft.com/microsoft.public.fr.excel (Voulez-vous vous abonner ? -> Oui)
"Michel" a écrit dans le message de news: %
Bonsoir Je souhaite écrire la macro suivante : Si les cellules sélectionnées ne sont pas dans la colonne A Msgbox "les données doivent être sélectionnées en A" : exit sub Merci beaucoup Michel
Re,
Excuse, ce sera mieux ainsi :
If Intersect(Target, Range("a:a")) Is Nothing Then MsgBox "Pas bon, t'es pas colon' a !"
Une parenthèse avait sauté !
--
Amicales Salutations
XL 97 / 2000 / 2002
Préférez suivre facilement sur le forum :
news://msnews.microsoft.com/microsoft.public.fr.excel
(Voulez-vous vous abonner ? -> Oui)
"Michel" <m.hirt@club-internet.fr> a écrit dans le message de news:
eS0EqDQTFHA.2124@TK2MSFTNGP14.phx.gbl...
Bonsoir Philippe
Désolé...
Erreur de syntaxe
Merci
Michel
"Philippe.R" <A_S_rauphil@wanadoo.fr> a écrit dans le message de news:
OnBgFAQTFHA.3652@TK2MSFTNGP15.phx.gbl...
Bonsoir,
if intersect(target,range("a:a") is nothing then
...
devrait pouvoir convenir
--
Amicales Salutations
XL 97 / 2000 / 2002
Préférez suivre facilement sur le forum :
news://msnews.microsoft.com/microsoft.public.fr.excel
(Voulez-vous vous abonner ? -> Oui)
"Michel" <m.hirt@club-internet.fr> a écrit dans le message de news:
%23MRfvXPTFHA.3040@TK2MSFTNGP10.phx.gbl...
Bonsoir
Je souhaite écrire la macro suivante :
Si les cellules sélectionnées ne sont pas dans la colonne A
Msgbox "les données doivent être sélectionnées en A" : exit sub
Merci beaucoup
Michel
If Intersect(Target, Range("a:a")) Is Nothing Then MsgBox "Pas bon, t'es pas colon' a !"
Une parenthèse avait sauté ! -- Amicales Salutations XL 97 / 2000 / 2002 Préférez suivre facilement sur le forum : news://msnews.microsoft.com/microsoft.public.fr.excel (Voulez-vous vous abonner ? -> Oui)
"Michel" a écrit dans le message de news:
Bonsoir Philippe Désolé... Erreur de syntaxe Merci Michel
"Philippe.R" a écrit dans le message de news:
Bonsoir, if intersect(target,range("a:a") is nothing then ... devrait pouvoir convenir -- Amicales Salutations XL 97 / 2000 / 2002 Préférez suivre facilement sur le forum : news://msnews.microsoft.com/microsoft.public.fr.excel (Voulez-vous vous abonner ? -> Oui)
"Michel" a écrit dans le message de news: %
Bonsoir Je souhaite écrire la macro suivante : Si les cellules sélectionnées ne sont pas dans la colonne A Msgbox "les données doivent être sélectionnées en A" : exit sub Merci beaucoup Michel
Michel
OK cela me convient très bien Bonne soirée Michel
"RaMa" a écrit dans le message de news: utH$
Bonsoir
' à placer dans la feuille concernée par l'évènement
Private Sub Worksheet_SelectionChange(ByVal Target As Range) If Target.Column <> 1 Then MsgBox "les données doivent être sélectionnées en A": Exit Sub End Sub
Salutations RaMa
"Michel" a écrit dans le message de news: %
Bonsoir Je souhaite écrire la macro suivante : Si les cellules sélectionnées ne sont pas dans la colonne A Msgbox "les données doivent être sélectionnées en A" : exit sub Merci beaucoup Michel
OK cela me convient très bien
Bonne soirée
Michel
"RaMa" <rmarceauPas2Spam@free.fr> a écrit dans le message de news:
utH$vDQTFHA.1404@TK2MSFTNGP09.phx.gbl...
Bonsoir
' à placer dans la feuille concernée par l'évènement
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Column <> 1 Then MsgBox "les données doivent être sélectionnées
en A": Exit Sub
End Sub
Salutations
RaMa
"Michel" <m.hirt@club-internet.fr> a écrit dans le message de news:
%23MRfvXPTFHA.3040@TK2MSFTNGP10.phx.gbl...
Bonsoir
Je souhaite écrire la macro suivante :
Si les cellules sélectionnées ne sont pas dans la colonne A
Msgbox "les données doivent être sélectionnées en A" : exit sub
Merci beaucoup
Michel
' à placer dans la feuille concernée par l'évènement
Private Sub Worksheet_SelectionChange(ByVal Target As Range) If Target.Column <> 1 Then MsgBox "les données doivent être sélectionnées en A": Exit Sub End Sub
Salutations RaMa
"Michel" a écrit dans le message de news: %
Bonsoir Je souhaite écrire la macro suivante : Si les cellules sélectionnées ne sont pas dans la colonne A Msgbox "les données doivent être sélectionnées en A" : exit sub Merci beaucoup Michel
Michel
Merci Philippe Bonne soirée Michel
"Philippe.R" a écrit dans le message de news:
Re, Excuse, ce sera mieux ainsi :
If Intersect(Target, Range("a:a")) Is Nothing Then MsgBox "Pas bon, t'es pas colon' a !"
Une parenthèse avait sauté ! -- Amicales Salutations XL 97 / 2000 / 2002 Préférez suivre facilement sur le forum : news://msnews.microsoft.com/microsoft.public.fr.excel (Voulez-vous vous abonner ? -> Oui)
"Michel" a écrit dans le message de news:
Bonsoir Philippe Désolé... Erreur de syntaxe Merci Michel
"Philippe.R" a écrit dans le message de news:
Bonsoir, if intersect(target,range("a:a") is nothing then ... devrait pouvoir convenir -- Amicales Salutations XL 97 / 2000 / 2002 Préférez suivre facilement sur le forum : news://msnews.microsoft.com/microsoft.public.fr.excel (Voulez-vous vous abonner ? -> Oui)
"Michel" a écrit dans le message de news: %
Bonsoir Je souhaite écrire la macro suivante : Si les cellules sélectionnées ne sont pas dans la colonne A Msgbox "les données doivent être sélectionnées en A" : exit sub Merci beaucoup Michel
Merci Philippe
Bonne soirée
Michel
"Philippe.R" <A_S_rauphil@wanadoo.fr> a écrit dans le message de news:
u5xw7KQTFHA.3848@TK2MSFTNGP10.phx.gbl...
Re,
Excuse, ce sera mieux ainsi :
If Intersect(Target, Range("a:a")) Is Nothing Then MsgBox "Pas bon, t'es
pas colon' a !"
Une parenthèse avait sauté !
--
Amicales Salutations
XL 97 / 2000 / 2002
Préférez suivre facilement sur le forum :
news://msnews.microsoft.com/microsoft.public.fr.excel
(Voulez-vous vous abonner ? -> Oui)
"Michel" <m.hirt@club-internet.fr> a écrit dans le message de news:
eS0EqDQTFHA.2124@TK2MSFTNGP14.phx.gbl...
Bonsoir Philippe
Désolé...
Erreur de syntaxe
Merci
Michel
"Philippe.R" <A_S_rauphil@wanadoo.fr> a écrit dans le message de news:
OnBgFAQTFHA.3652@TK2MSFTNGP15.phx.gbl...
Bonsoir,
if intersect(target,range("a:a") is nothing then
...
devrait pouvoir convenir
--
Amicales Salutations
XL 97 / 2000 / 2002
Préférez suivre facilement sur le forum :
news://msnews.microsoft.com/microsoft.public.fr.excel
(Voulez-vous vous abonner ? -> Oui)
"Michel" <m.hirt@club-internet.fr> a écrit dans le message de news:
%23MRfvXPTFHA.3040@TK2MSFTNGP10.phx.gbl...
Bonsoir
Je souhaite écrire la macro suivante :
Si les cellules sélectionnées ne sont pas dans la colonne A
Msgbox "les données doivent être sélectionnées en A" : exit sub
Merci beaucoup
Michel
If Intersect(Target, Range("a:a")) Is Nothing Then MsgBox "Pas bon, t'es pas colon' a !"
Une parenthèse avait sauté ! -- Amicales Salutations XL 97 / 2000 / 2002 Préférez suivre facilement sur le forum : news://msnews.microsoft.com/microsoft.public.fr.excel (Voulez-vous vous abonner ? -> Oui)
"Michel" a écrit dans le message de news:
Bonsoir Philippe Désolé... Erreur de syntaxe Merci Michel
"Philippe.R" a écrit dans le message de news:
Bonsoir, if intersect(target,range("a:a") is nothing then ... devrait pouvoir convenir -- Amicales Salutations XL 97 / 2000 / 2002 Préférez suivre facilement sur le forum : news://msnews.microsoft.com/microsoft.public.fr.excel (Voulez-vous vous abonner ? -> Oui)
"Michel" a écrit dans le message de news: %
Bonsoir Je souhaite écrire la macro suivante : Si les cellules sélectionnées ne sont pas dans la colonne A Msgbox "les données doivent être sélectionnées en A" : exit sub Merci beaucoup Michel
jps
bonsoir michel il manque juste une parenthèse fermante à la proc de philippe R... faut dire qu'il n'est pas facile de lui la faire fermer au maître ès scuds
If Intersect(target, Range("a:a")) Is Nothing Then
jps
"Michel" a écrit dans le message de news:
Bonsoir Philippe Désolé... Erreur de syntaxe Merci Michel
"Philippe.R" a écrit dans le message de news:
Bonsoir, if intersect(target,range("a:a") is nothing then ... devrait pouvoir convenir -- Amicales Salutations XL 97 / 2000 / 2002 Préférez suivre facilement sur le forum : news://msnews.microsoft.com/microsoft.public.fr.excel (Voulez-vous vous abonner ? -> Oui)
"Michel" a écrit dans le message de news: %
Bonsoir Je souhaite écrire la macro suivante : Si les cellules sélectionnées ne sont pas dans la colonne A Msgbox "les données doivent être sélectionnées en A" : exit sub Merci beaucoup Michel
bonsoir michel
il manque juste une parenthèse fermante à la proc de philippe R...
faut dire qu'il n'est pas facile de lui la faire fermer au maître ès scuds
If Intersect(target, Range("a:a")) Is Nothing Then
jps
"Michel" <m.hirt@club-internet.fr> a écrit dans le message de
news:eS0EqDQTFHA.2124@TK2MSFTNGP14.phx.gbl...
Bonsoir Philippe
Désolé...
Erreur de syntaxe
Merci
Michel
"Philippe.R" <A_S_rauphil@wanadoo.fr> a écrit dans le message de news:
OnBgFAQTFHA.3652@TK2MSFTNGP15.phx.gbl...
Bonsoir,
if intersect(target,range("a:a") is nothing then
...
devrait pouvoir convenir
--
Amicales Salutations
XL 97 / 2000 / 2002
Préférez suivre facilement sur le forum :
news://msnews.microsoft.com/microsoft.public.fr.excel
(Voulez-vous vous abonner ? -> Oui)
"Michel" <m.hirt@club-internet.fr> a écrit dans le message de news:
%23MRfvXPTFHA.3040@TK2MSFTNGP10.phx.gbl...
Bonsoir
Je souhaite écrire la macro suivante :
Si les cellules sélectionnées ne sont pas dans la colonne A
Msgbox "les données doivent être sélectionnées en A" : exit sub
Merci beaucoup
Michel
bonsoir michel il manque juste une parenthèse fermante à la proc de philippe R... faut dire qu'il n'est pas facile de lui la faire fermer au maître ès scuds
If Intersect(target, Range("a:a")) Is Nothing Then
jps
"Michel" a écrit dans le message de news:
Bonsoir Philippe Désolé... Erreur de syntaxe Merci Michel
"Philippe.R" a écrit dans le message de news:
Bonsoir, if intersect(target,range("a:a") is nothing then ... devrait pouvoir convenir -- Amicales Salutations XL 97 / 2000 / 2002 Préférez suivre facilement sur le forum : news://msnews.microsoft.com/microsoft.public.fr.excel (Voulez-vous vous abonner ? -> Oui)
"Michel" a écrit dans le message de news: %
Bonsoir Je souhaite écrire la macro suivante : Si les cellules sélectionnées ne sont pas dans la colonne A Msgbox "les données doivent être sélectionnées en A" : exit sub Merci beaucoup Michel
jps
j'ai failli le dire jps PS oeuf corse qu'il n'est pas colonna...
"Philippe.R" a écrit dans le message de news:
Re, Excuse, ce sera mieux ainsi :
If Intersect(Target, Range("a:a")) Is Nothing Then MsgBox "Pas bon, t'es pas colon' a !"
Une parenthèse avait sauté ! -- Amicales Salutations XL 97 / 2000 / 2002 Préférez suivre facilement sur le forum : news://msnews.microsoft.com/microsoft.public.fr.excel (Voulez-vous vous abonner ? -> Oui)
"Michel" a écrit dans le message de news:
Bonsoir Philippe Désolé... Erreur de syntaxe Merci Michel
"Philippe.R" a écrit dans le message de news:
Bonsoir, if intersect(target,range("a:a") is nothing then ... devrait pouvoir convenir -- Amicales Salutations XL 97 / 2000 / 2002 Préférez suivre facilement sur le forum : news://msnews.microsoft.com/microsoft.public.fr.excel (Voulez-vous vous abonner ? -> Oui)
"Michel" a écrit dans le message de news: %
Bonsoir Je souhaite écrire la macro suivante : Si les cellules sélectionnées ne sont pas dans la colonne A Msgbox "les données doivent être sélectionnées en A" : exit sub Merci beaucoup Michel
j'ai failli le dire
jps
PS oeuf corse qu'il n'est pas colonna...
"Philippe.R" <A_S_rauphil@wanadoo.fr> a écrit dans le message de
news:u5xw7KQTFHA.3848@TK2MSFTNGP10.phx.gbl...
Re,
Excuse, ce sera mieux ainsi :
If Intersect(Target, Range("a:a")) Is Nothing Then MsgBox "Pas bon, t'es
pas colon' a !"
Une parenthèse avait sauté !
--
Amicales Salutations
XL 97 / 2000 / 2002
Préférez suivre facilement sur le forum :
news://msnews.microsoft.com/microsoft.public.fr.excel
(Voulez-vous vous abonner ? -> Oui)
"Michel" <m.hirt@club-internet.fr> a écrit dans le message de news:
eS0EqDQTFHA.2124@TK2MSFTNGP14.phx.gbl...
Bonsoir Philippe
Désolé...
Erreur de syntaxe
Merci
Michel
"Philippe.R" <A_S_rauphil@wanadoo.fr> a écrit dans le message de news:
OnBgFAQTFHA.3652@TK2MSFTNGP15.phx.gbl...
Bonsoir,
if intersect(target,range("a:a") is nothing then
...
devrait pouvoir convenir
--
Amicales Salutations
XL 97 / 2000 / 2002
Préférez suivre facilement sur le forum :
news://msnews.microsoft.com/microsoft.public.fr.excel
(Voulez-vous vous abonner ? -> Oui)
"Michel" <m.hirt@club-internet.fr> a écrit dans le message de news:
%23MRfvXPTFHA.3040@TK2MSFTNGP10.phx.gbl...
Bonsoir
Je souhaite écrire la macro suivante :
Si les cellules sélectionnées ne sont pas dans la colonne A
Msgbox "les données doivent être sélectionnées en A" : exit sub
Merci beaucoup
Michel
j'ai failli le dire jps PS oeuf corse qu'il n'est pas colonna...
"Philippe.R" a écrit dans le message de news:
Re, Excuse, ce sera mieux ainsi :
If Intersect(Target, Range("a:a")) Is Nothing Then MsgBox "Pas bon, t'es pas colon' a !"
Une parenthèse avait sauté ! -- Amicales Salutations XL 97 / 2000 / 2002 Préférez suivre facilement sur le forum : news://msnews.microsoft.com/microsoft.public.fr.excel (Voulez-vous vous abonner ? -> Oui)
"Michel" a écrit dans le message de news:
Bonsoir Philippe Désolé... Erreur de syntaxe Merci Michel
"Philippe.R" a écrit dans le message de news:
Bonsoir, if intersect(target,range("a:a") is nothing then ... devrait pouvoir convenir -- Amicales Salutations XL 97 / 2000 / 2002 Préférez suivre facilement sur le forum : news://msnews.microsoft.com/microsoft.public.fr.excel (Voulez-vous vous abonner ? -> Oui)
"Michel" a écrit dans le message de news: %
Bonsoir Je souhaite écrire la macro suivante : Si les cellules sélectionnées ne sont pas dans la colonne A Msgbox "les données doivent être sélectionnées en A" : exit sub Merci beaucoup Michel
Philippe.R
;o)))) -- Amicales Salutations
"jps" <enlevezd' a écrit dans le message de news:
j'ai failli le dire jps PS oeuf corse qu'il n'est pas colonna...
"Philippe.R" a écrit dans le message de news:
Re, Excuse, ce sera mieux ainsi :
If Intersect(Target, Range("a:a")) Is Nothing Then MsgBox "Pas bon, t'es pas colon' a !"
Une parenthèse avait sauté ! -- Amicales Salutations XL 97 / 2000 / 2002 Préférez suivre facilement sur le forum : news://msnews.microsoft.com/microsoft.public.fr.excel (Voulez-vous vous abonner ? -> Oui)
"Michel" a écrit dans le message de news:
Bonsoir Philippe Désolé... Erreur de syntaxe Merci Michel
"Philippe.R" a écrit dans le message de news:
Bonsoir, if intersect(target,range("a:a") is nothing then ... devrait pouvoir convenir -- Amicales Salutations XL 97 / 2000 / 2002 Préférez suivre facilement sur le forum : news://msnews.microsoft.com/microsoft.public.fr.excel (Voulez-vous vous abonner ? -> Oui)
"Michel" a écrit dans le message de news: %
Bonsoir Je souhaite écrire la macro suivante : Si les cellules sélectionnées ne sont pas dans la colonne A Msgbox "les données doivent être sélectionnées en A" : exit sub Merci beaucoup Michel
;o))))
--
Amicales Salutations
"jps" <enlevezd'ici@ici> a écrit dans le message de news: e77WrgQTFHA.1384@TK2MSFTNGP09.phx.gbl...
j'ai failli le dire
jps
PS oeuf corse qu'il n'est pas colonna...
"Philippe.R" <A_S_rauphil@wanadoo.fr> a écrit dans le message de
news:u5xw7KQTFHA.3848@TK2MSFTNGP10.phx.gbl...
Re,
Excuse, ce sera mieux ainsi :
If Intersect(Target, Range("a:a")) Is Nothing Then MsgBox "Pas bon, t'es
pas colon' a !"
Une parenthèse avait sauté !
--
Amicales Salutations
XL 97 / 2000 / 2002
Préférez suivre facilement sur le forum :
news://msnews.microsoft.com/microsoft.public.fr.excel
(Voulez-vous vous abonner ? -> Oui)
"Michel" <m.hirt@club-internet.fr> a écrit dans le message de news:
eS0EqDQTFHA.2124@TK2MSFTNGP14.phx.gbl...
Bonsoir Philippe
Désolé...
Erreur de syntaxe
Merci
Michel
"Philippe.R" <A_S_rauphil@wanadoo.fr> a écrit dans le message de news:
OnBgFAQTFHA.3652@TK2MSFTNGP15.phx.gbl...
Bonsoir,
if intersect(target,range("a:a") is nothing then
...
devrait pouvoir convenir
--
Amicales Salutations
XL 97 / 2000 / 2002
Préférez suivre facilement sur le forum :
news://msnews.microsoft.com/microsoft.public.fr.excel
(Voulez-vous vous abonner ? -> Oui)
"Michel" <m.hirt@club-internet.fr> a écrit dans le message de news:
%23MRfvXPTFHA.3040@TK2MSFTNGP10.phx.gbl...
Bonsoir
Je souhaite écrire la macro suivante :
Si les cellules sélectionnées ne sont pas dans la colonne A
Msgbox "les données doivent être sélectionnées en A" : exit sub
Merci beaucoup
Michel
j'ai failli le dire jps PS oeuf corse qu'il n'est pas colonna...
"Philippe.R" a écrit dans le message de news:
Re, Excuse, ce sera mieux ainsi :
If Intersect(Target, Range("a:a")) Is Nothing Then MsgBox "Pas bon, t'es pas colon' a !"
Une parenthèse avait sauté ! -- Amicales Salutations XL 97 / 2000 / 2002 Préférez suivre facilement sur le forum : news://msnews.microsoft.com/microsoft.public.fr.excel (Voulez-vous vous abonner ? -> Oui)
"Michel" a écrit dans le message de news:
Bonsoir Philippe Désolé... Erreur de syntaxe Merci Michel
"Philippe.R" a écrit dans le message de news:
Bonsoir, if intersect(target,range("a:a") is nothing then ... devrait pouvoir convenir -- Amicales Salutations XL 97 / 2000 / 2002 Préférez suivre facilement sur le forum : news://msnews.microsoft.com/microsoft.public.fr.excel (Voulez-vous vous abonner ? -> Oui)
"Michel" a écrit dans le message de news: %
Bonsoir Je souhaite écrire la macro suivante : Si les cellules sélectionnées ne sont pas dans la colonne A Msgbox "les données doivent être sélectionnées en A" : exit sub Merci beaucoup Michel
Philippe.R
Bonjour,
faut dire qu'il n'est pas facile de lui la faire fermer au maître ès scuds T'es gonflé Jean-Paul !
Si on peut plus déconner !?!................ ;o)))) -- Amicales Salutations
"jps" <enlevezd' a écrit dans le message de news:
bonsoir michel il manque juste une parenthèse fermante à la proc de philippe R... faut dire qu'il n'est pas facile de lui la faire fermer au maître ès scuds
If Intersect(target, Range("a:a")) Is Nothing Then
jps
"Michel" a écrit dans le message de news:
Bonsoir Philippe Désolé... Erreur de syntaxe Merci Michel
"Philippe.R" a écrit dans le message de news:
Bonsoir, if intersect(target,range("a:a") is nothing then ... devrait pouvoir convenir -- Amicales Salutations XL 97 / 2000 / 2002 Préférez suivre facilement sur le forum : news://msnews.microsoft.com/microsoft.public.fr.excel (Voulez-vous vous abonner ? -> Oui)
"Michel" a écrit dans le message de news: %
Bonsoir Je souhaite écrire la macro suivante : Si les cellules sélectionnées ne sont pas dans la colonne A Msgbox "les données doivent être sélectionnées en A" : exit sub Merci beaucoup Michel
Bonjour,
faut dire qu'il n'est pas facile de lui la faire fermer au maître ès scuds
T'es gonflé Jean-Paul !
Si on peut plus déconner !?!................
;o))))
--
Amicales Salutations
"jps" <enlevezd'ici@ici> a écrit dans le message de news: ujh7yfQTFHA.740@TK2MSFTNGP10.phx.gbl...
bonsoir michel
il manque juste une parenthèse fermante à la proc de philippe R...
faut dire qu'il n'est pas facile de lui la faire fermer au maître ès scuds
If Intersect(target, Range("a:a")) Is Nothing Then
jps
"Michel" <m.hirt@club-internet.fr> a écrit dans le message de
news:eS0EqDQTFHA.2124@TK2MSFTNGP14.phx.gbl...
Bonsoir Philippe
Désolé...
Erreur de syntaxe
Merci
Michel
"Philippe.R" <A_S_rauphil@wanadoo.fr> a écrit dans le message de news:
OnBgFAQTFHA.3652@TK2MSFTNGP15.phx.gbl...
Bonsoir,
if intersect(target,range("a:a") is nothing then
...
devrait pouvoir convenir
--
Amicales Salutations
XL 97 / 2000 / 2002
Préférez suivre facilement sur le forum :
news://msnews.microsoft.com/microsoft.public.fr.excel
(Voulez-vous vous abonner ? -> Oui)
"Michel" <m.hirt@club-internet.fr> a écrit dans le message de news:
%23MRfvXPTFHA.3040@TK2MSFTNGP10.phx.gbl...
Bonsoir
Je souhaite écrire la macro suivante :
Si les cellules sélectionnées ne sont pas dans la colonne A
Msgbox "les données doivent être sélectionnées en A" : exit sub
Merci beaucoup
Michel
faut dire qu'il n'est pas facile de lui la faire fermer au maître ès scuds T'es gonflé Jean-Paul !
Si on peut plus déconner !?!................ ;o)))) -- Amicales Salutations
"jps" <enlevezd' a écrit dans le message de news:
bonsoir michel il manque juste une parenthèse fermante à la proc de philippe R... faut dire qu'il n'est pas facile de lui la faire fermer au maître ès scuds
If Intersect(target, Range("a:a")) Is Nothing Then
jps
"Michel" a écrit dans le message de news:
Bonsoir Philippe Désolé... Erreur de syntaxe Merci Michel
"Philippe.R" a écrit dans le message de news:
Bonsoir, if intersect(target,range("a:a") is nothing then ... devrait pouvoir convenir -- Amicales Salutations XL 97 / 2000 / 2002 Préférez suivre facilement sur le forum : news://msnews.microsoft.com/microsoft.public.fr.excel (Voulez-vous vous abonner ? -> Oui)
"Michel" a écrit dans le message de news: %
Bonsoir Je souhaite écrire la macro suivante : Si les cellules sélectionnées ne sont pas dans la colonne A Msgbox "les données doivent être sélectionnées en A" : exit sub Merci beaucoup Michel
