Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

syntaxe coloration dans plage de cellule

Créer une discussion
  • Initiateur de la discussion Initiateur de la discussion mumu
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

S'inscrire
M

mumu

XLDnaute Occasionnel
Salut le forum,

Comme d'hab' je reviens avec un problème de syntaxe.....
Je voudrais colorier une plage de cellule dans laquelle j'ai des chiffres sup à 0.
Je mets un exemple. Des qu'une cellule est différente de 0 je colorie jusqu'à la dernière ligne où il y a une données sup à 0.
J'ai écrit :

Code: 
Dim val As Range
For Each val In Range("BG40:BO120")
    If val.Value >= 1 Then val.Row.Interior.ColorIndex = 40
Next val

Mais bien sur, c'est pas comme ça que ça s'écrit..... J'ai pas réussi à trouver mon bonheur sur le forum.

Quelqu'un aurait-il une petite solution?

D'avance merci !!

Mumu
 

Pièces jointes

Trier par date Trier par votes
Re : syntaxe coloration dans plage de cellule

bonjour mumu,

1. j'aurais utilisé une mise en forme conditionnelle
2. sinon, enleve le .row
3. sinon (bis) si tu veux toute la ligne, essaie val.entirerow. ...
 
Vote positif 0 Vote négatif
Re : syntaxe coloration dans plage de cellule

Salut Mutzik,

Merci de me donner un coup de main.
Pour ce qui concerne la mise en forme conditionnelle, je ne sais pas trop comment ça marche mais je dois absolument l'écrire dans une macro.
Ensuite le EntireRow ne me convient pas car je voudrais vraiment ne colorier que les lignes dans la plage de cellule.

Je vais continuer à chercher.....

@ +
 
Vote positif 0 Vote négatif
Re : syntaxe coloration dans plage de cellule

Si c'est le cas, il te faut utiliser l' offset ...
mais dans la mesure où tu visites toutes les cellules tu vas repeindre chaque ligne autant de fois que sur cette ligne ta condition sera remplie ...
pas très efficace ...

A+
 
Vote positif 0 Vote négatif
Re : syntaxe coloration dans plage de cellule

Mumu,

Voilà une macro point de départ ... à tester ... 😉

Code: 
Sub TestMumu()
Dim val As Range
Dim i As Integer ' Ligne 40 à 120
Dim j As Integer ' Colonne 59 à 67
For i = 40 To 120
    For j = 59 To 67
    If Cells(i, j).Value >= 1 Then
        Range(Cells(i, 59), Cells(i, 67)).Interior.ColorIndex = 40
    End If
    Next j
Next i
End Sub

A+
 
Vote positif 0 Vote négatif
Re : syntaxe coloration dans plage de cellule

Finalement, j'ai suivi un peu ta piste James007 et j'ai écrit en rajoutant une colonne total à la fin de mon tableau :

Code: 
Range("BP40").Select
Do While ActiveCell.Value <> ""
If ActiveCell.Value >= 1 Then Range(ActiveCell.Offset(0, -1), ActiveCell.Offset(0, -8)).Interior.ColorIndex = 39
ActiveCell.Offset(1, 0).Activate
Loop

Ce qui répond à mon pb.

Merci à vous et @ +

Mumu
 
Vote positif 0 Vote négatif
Re : syntaxe coloration dans plage de cellule

Nous avons posté en même temps....

Je viens de tester ta proposition et elle marche également !!! C'est super !
Je te remercie beaucoup !

@ +

Mumu
 
Vote positif 0 Vote négatif
Re : syntaxe coloration dans plage de cellule

mumu à dit:
Nous avons posté en même temps....
Je viens de tester ta proposition et elle marche également !!! C'est super !
Je te remercie beaucoup !
@ +
Mumu
Cliquez pour agrandir...

De rien ... tout le monde sur le forum tient à ce que tu conserves ta superbe chevelure ...😉 ce qui nous pousse à en faire un max ...

A+ 🙂
 
Vote positif 0 Vote négatif
Identifiez-vous ou inscrivez-vous pour participer.
Rejoins nos membres "Supporter XLD" et booste ton expérience Excel !
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

J
  • Résolu(e)
Microsoft 365 Première cellule vide ou égal zéros dans une plage définie
Réponses
11
Affichages
492
juju91
J
  • Résolu(e)
XL 2016 XLS - Comment déterminer les zones présentent au niveau d'une cellule ?
Réponses
2
Affichages
874
Lu76Fer
  • Résolu(e)
Autres Copier/ Coller plage de données dans une autre cellule d'un même onglet
Réponses
6
Affichages
477
fenec
  • Résolu(e)
XL 2019 Extraction de données dans une autre plage !
Réponses
6
Affichages
605
Caninge
J
  • Question Question
Microsoft 365 VBA Sum.if - Application de la formule dans la cellule et non pas sa valeur
Réponses
6
Affichages
458
JeanPi37
J
K
  • Résolu(e)
XL 2013 Modifier noms de plage par lots
Réponses
6
Affichages
677
Kostrovit
K
Z
  • Question Question
XL 2010 tableau pour comparer deux colonnes et écrire le résultat dans une troisième colonne
2
Réponses
28
Affichages
3 K
zephir94
Z
I
  • Question Question
XL 2019 (RESOLU) Date de dernière modification d'une plage de cellule
Réponses
3
Affichages
1 K
patricktoulon
  • Résolu(e)
XL 2013 (RESOLU)Nombre de cellule non vide et sans doublon
Réponses
2
Affichages
791
chaelie2015
P
  • Question Question
XL 2019 VBA Erreur d'exécution "9" dans une plage de tableau
Réponses
2
Affichages
641
piskely
P
S
  • Résolu(e)
Microsoft 365 VBA pour copier/coller une plage de cellule dans un autre onglet en fonction de la date
Réponses
8
Affichages
1 K
Sylvain. B
S
B
  • Résolu(e)
XL 2019 Mise en forme conditionnelle d'ensemble de cellule en fonction de la cellule juste au dessus de l'ensemble
Réponses
7
Affichages
876
buches
B
S
  • Résolu(e)
Microsoft 365 Effacer le contenu de cellule sur la même ligne d'une autre feuille
Réponses
6
Affichages
1 K
Robert
  • Question Question
XL 2010 Sélectionner une plage de cellules à partir d'une cellule nommée
Réponses
4
Affichages
928
Efgé
M
  • Question Question
XL 2013 Déplacement de plage dans base de donnée
Réponses
0
Affichages
800
mikepers
M
A
  • Question Question
Microsoft 365 Augmenter tous les Z négatifs de la valeur x dans un GCode
2
Réponses
21
Affichages
2 K
Aloha
A
C
  • Question Question
XL pour MAC Sélection plage de cellules avec variable dans macro
Réponses
3
Affichages
1 K
Staple1600
M
  • Question Question
XL 2013 VBA-Envoyer par email "Plage de cellules collée dans un nouveau classeur en gardant formules de certaines cellules
Réponses
2
Affichages
1 K
MONTREAL2020
M
S
  • Résolu(e)
Microsoft 365 Effacer une même plage de cellule sélectionnée sur plusieurs feuille
Réponses
6
Affichages
1 K
ShrekL
S
F
  • Question Question
XL 2019 Recherche en ligne dans matrice et ramener cellule de la même ligne
Réponses
12
Affichages
1 K
TooFatBoy
Menu
Connexion
S'inscrire
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…