Logo GNT
Actualités Tests & Guides Bons Plans
Twitter iPhone pliant OnePlus 11 PS5 Disney+ Orange Livebox Windows 11
Entraide Applications Microsoft Office Excel mise en forme conditionnelle + déplacement cellule vers la droite

mise en forme conditionnelle + déplacement cellule vers la droite

7 réponses
Avatar
Pascal
bonsoir,
ai 2 petites questions
1) concerne un simple déplacement d'une colonne à une autre
j'ai ceci qui me positionne sur la première cellule vide de la colonne A
je souhaiterai simplement me positionner, juste après sur la même ligne mais
en colonne B
c'est ridicule mais je sèche........
Range("a" & Range("a5000").End(xlUp).Row + 1) =
Me.lstNomJoueur.List(Me.lstNomJoueur.ListIndex)


2)j'aimerai faire une mise en forme conditionnelle (ou dans Sub
Worksheet_Change ?)sur la colonne A3:A5000 qui me colorerai la cellule SI
celle ci contiendrai le mot FACTURE ou facture ou Facture, le petit "hic"
c'est que ces cellules contiennent non seulement le mot facture mais serai
suivie d'un numéro (Facture 1258 par ex)donc je ne peux dire si cellule =
facture
une petite piste bienvenue

Pascal
Signaler un problème avec ce contenu

7 réponses

Supprimer
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire

Veuillez sélectionner un problème

Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Avatar
Jacky
Bonsoir,
une petite piste bienvenue



1-
Range("b" & Range("a5000").End(xlUp).Row) = .......

2-
Selection de A3:A5000
Mfc
Condition1
La formule est: =TROUVE("FACTURE";MAJUSCULE(A3))
Format etc....

--
Salutations
JJ


"Pascal" ,com> a écrit dans le message de news:

bonsoir,
ai 2 petites questions
1) concerne un simple déplacement d'une colonne à une autre
j'ai ceci qui me positionne sur la première cellule vide de la colonne A
je souhaiterai simplement me positionner, juste après sur la même ligne
mais en colonne B
c'est ridicule mais je sèche........
Range("a" & Range("a5000").End(xlUp).Row + 1) =
Me.lstNomJoueur.List(Me.lstNomJoueur.ListIndex)


2)j'aimerai faire une mise en forme conditionnelle (ou dans Sub
Worksheet_Change ?)sur la colonne A3:A5000 qui me colorerai la cellule SI
celle ci contiendrai le mot FACTURE ou facture ou Facture, le petit "hic"
c'est que ces cellules contiennent non seulement le mot facture mais serai
suivie d'un numéro (Facture 1258 par ex)donc je ne peux dire si cellule =
facture
une petite piste bienvenue

Pascal





Avatar
Pascal
hello jacky
pour la MFC Super nickel je t'en remercie

pour la solution 1, le problème est justement que je ne connais pas la ligne
je suis positionné en colonne à la première ligne vide..........
merci pour ton aide
Pascal

"Jacky" a écrit dans le message de groupe de discussion :
#
Bonsoir,
une petite piste bienvenue



1-
Range("b" & Range("a5000").End(xlUp).Row) = .......

2-
Selection de A3:A5000
Mfc
Condition1
La formule est: =TROUVE("FACTURE";MAJUSCULE(A3))
Format etc....

--
Salutations
JJ


"Pascal" ,com> a écrit dans le message de news:

bonsoir,
ai 2 petites questions
1) concerne un simple déplacement d'une colonne à une autre
j'ai ceci qui me positionne sur la première cellule vide de la colonne A
je souhaiterai simplement me positionner, juste après sur la même ligne
mais en colonne B
c'est ridicule mais je sèche........
Range("a" & Range("a5000").End(xlUp).Row + 1) =
Me.lstNomJoueur.List(Me.lstNomJoueur.ListIndex)


2)j'aimerai faire une mise en forme conditionnelle (ou dans Sub
Worksheet_Change ?)sur la colonne A3:A5000 qui me colorerai la cellule SI
celle ci contiendrai le mot FACTURE ou facture ou Facture, le petit "hic"
c'est que ces cellules contiennent non seulement le mot facture mais
serai suivie d'un numéro (Facture 1258 par ex)donc je ne peux dire si
cellule = facture
une petite piste bienvenue

Pascal









Avatar
Pascal
rehello,
en fait comment récupérer la ligne en cours?
merci
Pascal

"Pascal" ,com> a écrit dans le message de groupe de
discussion :
hello jacky
pour la MFC Super nickel je t'en remercie

pour la solution 1, le problème est justement que je ne connais pas la
ligne
je suis positionné en colonne à la première ligne vide..........
merci pour ton aide
Pascal

"Jacky" a écrit dans le message de groupe de discussion
: #
Bonsoir,
une petite piste bienvenue



1-
Range("b" & Range("a5000").End(xlUp).Row) = .......

2-
Selection de A3:A5000
Mfc
Condition1
La formule est: =TROUVE("FACTURE";MAJUSCULE(A3))
Format etc....

--
Salutations
JJ


"Pascal" ,com> a écrit dans le message de news:

bonsoir,
ai 2 petites questions
1) concerne un simple déplacement d'une colonne à une autre
j'ai ceci qui me positionne sur la première cellule vide de la colonne A
je souhaiterai simplement me positionner, juste après sur la même ligne
mais en colonne B
c'est ridicule mais je sèche........
Range("a" & Range("a5000").End(xlUp).Row + 1) =
Me.lstNomJoueur.List(Me.lstNomJoueur.ListIndex)


2)j'aimerai faire une mise en forme conditionnelle (ou dans Sub
Worksheet_Change ?)sur la colonne A3:A5000 qui me colorerai la cellule
SI celle ci contiendrai le mot FACTURE ou facture ou Facture, le petit
"hic" c'est que ces cellules contiennent non seulement le mot facture
mais serai suivie d'un numéro (Facture 1258 par ex)donc je ne peux dire
si cellule = facture
une petite piste bienvenue

Pascal












Avatar
Jacky
Re....
pour la solution 1, le problème est justement que je ne connais pas la
ligne


J'ai pas compris...
tu dis utiliser ceci:
Range("a" & Range("a5000").End(xlUp).Row + 1) =
Me.lstNomJoueur.List(Me.lstNomJoueur.ListIndex)


et tu souhaites te positionner sur la colonne B de cette ligne, ce que fait
le code proposé
non ???
Mais il y a peut-être quelque chose qui m'échappe. ;o))

--
Salutations
JJ


"Pascal" ,com> a écrit dans le message de news:

hello jacky
pour la MFC Super nickel je t'en remercie

pour la solution 1, le problème est justement que je ne connais pas la
ligne
je suis positionné en colonne à la première ligne vide..........
merci pour ton aide
Pascal

"Jacky" a écrit dans le message de groupe de discussion
: #
Bonsoir,
une petite piste bienvenue



1-
Range("b" & Range("a5000").End(xlUp).Row) = .......

2-
Selection de A3:A5000
Mfc
Condition1
La formule est: =TROUVE("FACTURE";MAJUSCULE(A3))
Format etc....

--
Salutations
JJ


"Pascal" ,com> a écrit dans le message de news:

bonsoir,
ai 2 petites questions
1) concerne un simple déplacement d'une colonne à une autre
j'ai ceci qui me positionne sur la première cellule vide de la colonne A
je souhaiterai simplement me positionner, juste après sur la même ligne
mais en colonne B
c'est ridicule mais je sèche........
Range("a" & Range("a5000").End(xlUp).Row + 1) =
Me.lstNomJoueur.List(Me.lstNomJoueur.ListIndex)


2)j'aimerai faire une mise en forme conditionnelle (ou dans Sub
Worksheet_Change ?)sur la colonne A3:A5000 qui me colorerai la cellule
SI celle ci contiendrai le mot FACTURE ou facture ou Facture, le petit
"hic" c'est que ces cellules contiennent non seulement le mot facture
mais serai suivie d'un numéro (Facture 1258 par ex)donc je ne peux dire
si cellule = facture
une petite piste bienvenue

Pascal












Avatar
Jacky
Re..
en fait comment récupérer la ligne en cours?



MsgBox ActiveCell.Row ' ligne
MsgBox ActiveCell.Column ' Colonne
[a1] = ActiveCell.Row
[b1] = ActiveCell.Column

--
Salutations
JJ


"Pascal" ,com> a écrit dans le message de news:

rehello,
en fait comment récupérer la ligne en cours?
merci
Pascal

"Pascal" ,com> a écrit dans le message de groupe de
discussion :
hello jacky
pour la MFC Super nickel je t'en remercie

pour la solution 1, le problème est justement que je ne connais pas la
ligne
je suis positionné en colonne à la première ligne vide..........
merci pour ton aide
Pascal

"Jacky" a écrit dans le message de groupe de
discussion : #
Bonsoir,
une petite piste bienvenue



1-
Range("b" & Range("a5000").End(xlUp).Row) = .......

2-
Selection de A3:A5000
Mfc
Condition1
La formule est: =TROUVE("FACTURE";MAJUSCULE(A3))
Format etc....

--
Salutations
JJ


"Pascal" ,com> a écrit dans le message de news:

bonsoir,
ai 2 petites questions
1) concerne un simple déplacement d'une colonne à une autre
j'ai ceci qui me positionne sur la première cellule vide de la colonne
A
je souhaiterai simplement me positionner, juste après sur la même ligne
mais en colonne B
c'est ridicule mais je sèche........
Range("a" & Range("a5000").End(xlUp).Row + 1) =
Me.lstNomJoueur.List(Me.lstNomJoueur.ListIndex)


2)j'aimerai faire une mise en forme conditionnelle (ou dans Sub
Worksheet_Change ?)sur la colonne A3:A5000 qui me colorerai la cellule
SI celle ci contiendrai le mot FACTURE ou facture ou Facture, le petit
"hic" c'est que ces cellules contiennent non seulement le mot facture
mais serai suivie d'un numéro (Facture 1258 par ex)donc je ne peux dire
si cellule = facture
une petite piste bienvenue

Pascal















Avatar
Pascal
hello jacky,
merci en fait cela fonctionne très bien c'est moi qui ai omis de rajouter
select
Range("b" & Range("a5000").End(xlUp).Row).select






je te remercie et m'excuse de ma "fainéantise" (simple copier/coller de ta
réponse sans chercher)
Pascal

"Jacky" a écrit dans le message de groupe de discussion :
#
Re....
pour la solution 1, le problème est justement que je ne connais pas la
ligne


J'ai pas compris...
tu dis utiliser ceci:
Range("a" & Range("a5000").End(xlUp).Row + 1) =
Me.lstNomJoueur.List(Me.lstNomJoueur.ListIndex)


et tu souhaites te positionner sur la colonne B de cette ligne, ce que
fait le code proposé
non ???
Mais il y a peut-être quelque chose qui m'échappe. ;o))

--
Salutations
JJ


"Pascal" ,com> a écrit dans le message de news:

hello jacky
pour la MFC Super nickel je t'en remercie

pour la solution 1, le problème est justement que je ne connais pas la
ligne
je suis positionné en colonne à la première ligne vide..........
merci pour ton aide
Pascal

"Jacky" a écrit dans le message de groupe de
discussion : #
Bonsoir,
une petite piste bienvenue



1-
Range("b" & Range("a5000").End(xlUp).Row) = .......

2-
Selection de A3:A5000
Mfc
Condition1
La formule est: =TROUVE("FACTURE";MAJUSCULE(A3))
Format etc....

--
Salutations
JJ


"Pascal" ,com> a écrit dans le message de news:

bonsoir,
ai 2 petites questions
1) concerne un simple déplacement d'une colonne à une autre
j'ai ceci qui me positionne sur la première cellule vide de la colonne
A
je souhaiterai simplement me positionner, juste après sur la même ligne
mais en colonne B
c'est ridicule mais je sèche........
Range("a" & Range("a5000").End(xlUp).Row + 1) =
Me.lstNomJoueur.List(Me.lstNomJoueur.ListIndex)


2)j'aimerai faire une mise en forme conditionnelle (ou dans Sub
Worksheet_Change ?)sur la colonne A3:A5000 qui me colorerai la cellule
SI celle ci contiendrai le mot FACTURE ou facture ou Facture, le petit
"hic" c'est que ces cellules contiennent non seulement le mot facture
mais serai suivie d'un numéro (Facture 1258 par ex)donc je ne peux dire
si cellule = facture
une petite piste bienvenue

Pascal
















Avatar
Pascal
oui...tellement simple en plus!
merci à toi
Pascal


"Jacky" a écrit dans le message de groupe de discussion :
#
Re..
en fait comment récupérer la ligne en cours?



MsgBox ActiveCell.Row ' ligne
MsgBox ActiveCell.Column ' Colonne
[a1] = ActiveCell.Row
[b1] = ActiveCell.Column

--
Salutations
JJ


"Pascal" ,com> a écrit dans le message de news:

rehello,
en fait comment récupérer la ligne en cours?
merci
Pascal

"Pascal" ,com> a écrit dans le message de groupe de
discussion :
hello jacky
pour la MFC Super nickel je t'en remercie

pour la solution 1, le problème est justement que je ne connais pas la
ligne
je suis positionné en colonne à la première ligne vide..........
merci pour ton aide
Pascal

"Jacky" a écrit dans le message de groupe de
discussion : #
Bonsoir,
une petite piste bienvenue



1-
Range("b" & Range("a5000").End(xlUp).Row) = .......

2-
Selection de A3:A5000
Mfc
Condition1
La formule est: =TROUVE("FACTURE";MAJUSCULE(A3))
Format etc....

--
Salutations
JJ


"Pascal" ,com> a écrit dans le message de news:

bonsoir,
ai 2 petites questions
1) concerne un simple déplacement d'une colonne à une autre
j'ai ceci qui me positionne sur la première cellule vide de la colonne
A
je souhaiterai simplement me positionner, juste après sur la même
ligne mais en colonne B
c'est ridicule mais je sèche........
Range("a" & Range("a5000").End(xlUp).Row + 1) =
Me.lstNomJoueur.List(Me.lstNomJoueur.ListIndex)


2)j'aimerai faire une mise en forme conditionnelle (ou dans Sub
Worksheet_Change ?)sur la colonne A3:A5000 qui me colorerai la cellule
SI celle ci contiendrai le mot FACTURE ou facture ou Facture, le petit
"hic" c'est que ces cellules contiennent non seulement le mot facture
mais serai suivie d'un numéro (Facture 1258 par ex)donc je ne peux
dire si cellule = facture
une petite piste bienvenue

Pascal