hello, voila j'y connais vraiment pas grand chose en VBA=20
alors si vous pouvez me donner un petit coup de pouce,=20
vous me ferez gagner bcp de temps, alors voila mon pb :
Je travail sur un tableau de chiffre,
j'ai chang=E9 la couleur du fond de certaines cellules=20
lorsqu'elles r=E9pondent aux conditinos ke g fix=E9s...bon,=20
ca ca marche pas de soucis !
mais maintenant, je voudrais ajouter une macro excel qui=20
regarde la couleur de fond de chacune de mes cellule
(blanc ou pas )et ki remplace la valeure de la cellule=20
par une cellule vide ssi le fond est blanc !
ca a l'air plutot simple mais ca fait deja plusieurs=20
jours ke je cherche, sans r=E9sultat ou preske, j'ai qd mem=20
trouv=E9 une fonction qui permet de tester la couleur de=20
fon d'une cellule excel c'est :
ActiveCell.Interior.ColorIndex =3D 0 (je suppose ke 0 =3D=20
blanc ???)
merci a tous ceux ki prendront le temps de m'aider et=20
tout ca pr pas un rond c cooool thx ! vive l'info !
bcp, pb, ke, g, ki, ke, preske, qd, mem, ki, pr, c, thx
MAUDITE PARESSE.
Ci sa fè pelusieurres jourres qu tu chairches, sela norè pas aitai
boquou pelus long d'aiquerire quomme du monde
.
Jacquouille
Tiens tiens tiens, l'Emile, il a pas la même ortogaffe En Glaise que mwé. M'enfin, si ça va, ça va.
-- Bien amicalmement, Vivement conseillé >> http://www.excelabo.net Jacquouille.
"EMiLe" a écrit dans le message de news:
Ben voilà, Tu sélectionnes et c'est parti!!
Sub ConditionCouleur() Dim cel As Range For Each cel In Selection
If cel.Interior.ColorIndex = xlNone Then cel.Formula = "" End If
Next End Sub
MAUDITE PARESSE
"kafel" a écrit dans le message de news:013201c4a0c0$7d98d6f0$ ben ca m'a vraiment l'air pas mal, qd j'utilise ta fonctionsur une cellule, ca marche ! trop fort !
Mais il fo ke je fasse une boucle, pr ke la macro parcoure toutes les cellules de mon tableau.parske si je selectionne plusieurs cellules ben la macro s'arrete des que le programme rencontre une cellule avec un fond blc
voila ma fonction :
Sub ConditionCouleur() If ActiveCell.Interior.ColorIndex = xlNone Then ActiveCell.Formula = "" End If End Sub
dc je v galere encore un peu...
mais merci bcp pr ton aide tu m'a fait faire un grand pas !
-----Message d'origine----- Je crois que tout simplement
If ActiveCell.Interior.ColorIndex = xlNone Then
ActiveCell.Formula = ""
enfin, xlNone veut dire qu'il n'y a pas de couleur...
Voilà voilà
Dis-nous si ça marche
EMiLe
Enfin, je crois non??
hello, voila j'y connais vraiment pas grand chose en
VBA
alors si vous pouvez me donner un petit coup de pouce, vous me ferez gagner bcp de temps, alors voila mon pb :
Je travail sur un tableau de chiffre, j'ai changé la couleur du fond de certaines cellules lorsqu'elles répondent aux conditinos ke g
fixés...bon,
ca ca marche pas de soucis !
mais maintenant, je voudrais ajouter une macro excel
qui
regarde la couleur de fond de chacune de mes cellule (blanc ou pas )et ki remplace la valeure de la cellule par une cellule vide ssi le fond est blanc !
ca a l'air plutot simple mais ca fait deja plusieurs jours ke je cherche, sans résultat ou preske, j'ai qd
mem
trouvé une fonction qui permet de tester la couleur de fon d'une cellule excel c'est :
ActiveCell.Interior.ColorIndex = 0 (je suppose ke 0 > >>>blanc ???)
merci a tous ceux ki prendront le temps de m'aider et tout ca pr pas un rond c cooool thx ! vive l'info !
.
Tiens tiens tiens,
l'Emile, il a pas la même ortogaffe En Glaise que mwé.
M'enfin, si ça va, ça va.
--
Bien amicalmement,
Vivement conseillé >> http://www.excelabo.net
Jacquouille.
j.thiernesseNOSPAM@skynet.be
"EMiLe" <emilefyon@altern.org> a écrit dans le message de
news:e09QeKOoEHA.556@tk2msftngp13.phx.gbl...
Ben voilà,
Tu sélectionnes et c'est parti!!
Sub ConditionCouleur()
Dim cel As Range
For Each cel In Selection
If cel.Interior.ColorIndex = xlNone Then
cel.Formula = ""
End If
Next
End Sub
MAUDITE PARESSE
"kafel" <anonymous@discussions.microsoft.com> a écrit dans le message
de news:013201c4a0c0$7d98d6f0$a301280a@phx.gbl...
ben ca m'a vraiment l'air pas mal, qd j'utilise ta
fonctionsur une cellule, ca marche ! trop fort !
Mais il fo ke je fasse une boucle, pr ke la macro
parcoure toutes les cellules de mon tableau.parske si je
selectionne plusieurs cellules ben la macro s'arrete des
que le programme rencontre une cellule avec un fond blc
voila ma fonction :
Sub ConditionCouleur()
If ActiveCell.Interior.ColorIndex = xlNone Then
ActiveCell.Formula = ""
End If
End Sub
dc je v galere encore un peu...
mais merci bcp pr ton aide tu m'a fait faire un grand
pas !
-----Message d'origine-----
Je crois que tout simplement
If ActiveCell.Interior.ColorIndex = xlNone Then
ActiveCell.Formula = ""
enfin, xlNone veut dire qu'il n'y a pas de couleur...
Voilà voilà
Dis-nous si ça marche
EMiLe
Enfin, je crois non??
hello, voila j'y connais vraiment pas grand chose en
VBA
alors si vous pouvez me donner un petit coup de pouce,
vous me ferez gagner bcp de temps, alors voila mon pb :
Je travail sur un tableau de chiffre,
j'ai changé la couleur du fond de certaines cellules
lorsqu'elles répondent aux conditinos ke g
fixés...bon,
ca ca marche pas de soucis !
mais maintenant, je voudrais ajouter une macro excel
qui
regarde la couleur de fond de chacune de mes cellule
(blanc ou pas )et ki remplace la valeure de la cellule
par une cellule vide ssi le fond est blanc !
ca a l'air plutot simple mais ca fait deja plusieurs
jours ke je cherche, sans résultat ou preske, j'ai qd
mem
trouvé une fonction qui permet de tester la couleur de
fon d'une cellule excel c'est :
ActiveCell.Interior.ColorIndex = 0 (je suppose ke 0 > >>>blanc ???)
merci a tous ceux ki prendront le temps de m'aider et
tout ca pr pas un rond c cooool thx ! vive l'info !
Tiens tiens tiens, l'Emile, il a pas la même ortogaffe En Glaise que mwé. M'enfin, si ça va, ça va.
-- Bien amicalmement, Vivement conseillé >> http://www.excelabo.net Jacquouille.
"EMiLe" a écrit dans le message de news:
Ben voilà, Tu sélectionnes et c'est parti!!
Sub ConditionCouleur() Dim cel As Range For Each cel In Selection
If cel.Interior.ColorIndex = xlNone Then cel.Formula = "" End If
Next End Sub
MAUDITE PARESSE
"kafel" a écrit dans le message de news:013201c4a0c0$7d98d6f0$ ben ca m'a vraiment l'air pas mal, qd j'utilise ta fonctionsur une cellule, ca marche ! trop fort !
Mais il fo ke je fasse une boucle, pr ke la macro parcoure toutes les cellules de mon tableau.parske si je selectionne plusieurs cellules ben la macro s'arrete des que le programme rencontre une cellule avec un fond blc
voila ma fonction :
Sub ConditionCouleur() If ActiveCell.Interior.ColorIndex = xlNone Then ActiveCell.Formula = "" End If End Sub
dc je v galere encore un peu...
mais merci bcp pr ton aide tu m'a fait faire un grand pas !
-----Message d'origine----- Je crois que tout simplement
If ActiveCell.Interior.ColorIndex = xlNone Then
ActiveCell.Formula = ""
enfin, xlNone veut dire qu'il n'y a pas de couleur...
Voilà voilà
Dis-nous si ça marche
EMiLe
Enfin, je crois non??
hello, voila j'y connais vraiment pas grand chose en
VBA
alors si vous pouvez me donner un petit coup de pouce, vous me ferez gagner bcp de temps, alors voila mon pb :
Je travail sur un tableau de chiffre, j'ai changé la couleur du fond de certaines cellules lorsqu'elles répondent aux conditinos ke g
fixés...bon,
ca ca marche pas de soucis !
mais maintenant, je voudrais ajouter une macro excel
qui
regarde la couleur de fond de chacune de mes cellule (blanc ou pas )et ki remplace la valeure de la cellule par une cellule vide ssi le fond est blanc !
ca a l'air plutot simple mais ca fait deja plusieurs jours ke je cherche, sans résultat ou preske, j'ai qd
mem
trouvé une fonction qui permet de tester la couleur de fon d'une cellule excel c'est :
ActiveCell.Interior.ColorIndex = 0 (je suppose ke 0 > >>>blanc ???)
merci a tous ceux ki prendront le temps de m'aider et tout ca pr pas un rond c cooool thx ! vive l'info !
.
twinley
Slt, C'est pas un effort qu'il faut faire, mais une lobotomie pour enlever le mauvais morceau. Comme on a pas d'interpreteur ni de compilateur pour la langue française, autant en profiter. La même liberté et richesse d'expression en VBA et on va pas loin... ||o) -- à+twinley "kafel" a écrit dans le message de news:44c501c4a146$a00325c0$ waaa t supR dur ac moa,
je t'assure ke j'aV fé 1 éfor prtant lol
-----Message d'origine-----
bcp, pb, ke, g, ki, ke, preske, qd, mem, ki, pr, c, thx
MAUDITE PARESSE.
Ci sa fè pelusieurres jourres qu tu chairches, sela norè pas aitai
boquou pelus long d'aiquerire quomme du monde
.
Slt,
C'est pas un effort qu'il faut faire, mais une lobotomie pour enlever le
mauvais morceau.
Comme on a pas d'interpreteur ni de compilateur pour la langue française,
autant en profiter. La même liberté et richesse d'expression en VBA et on va
pas loin...
||o)
--
à+twinley
"kafel" <kafelniko@hotmail.com> a écrit dans le message de
news:44c501c4a146$a00325c0$a501280a@phx.gbl...
waaa t supR dur ac moa,
je t'assure ke j'aV fé 1 éfor prtant lol
-----Message d'origine-----
bcp, pb, ke, g, ki, ke, preske, qd, mem, ki, pr, c,
thx
MAUDITE PARESSE.
Ci sa fè pelusieurres jourres qu tu chairches, sela norè
pas aitai
Slt, C'est pas un effort qu'il faut faire, mais une lobotomie pour enlever le mauvais morceau. Comme on a pas d'interpreteur ni de compilateur pour la langue française, autant en profiter. La même liberté et richesse d'expression en VBA et on va pas loin... ||o) -- à+twinley "kafel" a écrit dans le message de news:44c501c4a146$a00325c0$ waaa t supR dur ac moa,
je t'assure ke j'aV fé 1 éfor prtant lol
-----Message d'origine-----
bcp, pb, ke, g, ki, ke, preske, qd, mem, ki, pr, c, thx
MAUDITE PARESSE.
Ci sa fè pelusieurres jourres qu tu chairches, sela norè pas aitai
