Sujet Précédent Sujet Suivant

Visual Basic, petite macro Excel

Résolu/Fermé
mkos Messages postés 19 Date d'inscription jeudi 13 août 2009 Statut Membre Dernière intervention 19 octobre 2009 - 16 oct. 2009 à 10:27
michel_m Messages postés 16603 Date d'inscription lundi 12 septembre 2005 Statut Contributeur Dernière intervention 16 décembre 2023 - 16 oct. 2009 à 16:57
Bonjour,

Je travaille avec Excel 2003, je voudrais creer une macro mais ils me manquent quelques commandes...

L'idee:
Il y a un nombre entre 1 et 100 contenu dans une cellule.
A cote, sur la meme ligne, il y a 10 cellules.

Si le nombre rentre dans la premiere cellule est 10.
On colorie la premiere cellule des 10 en verts et les 9 autres en rouge.

Si c'est 20, on colorie les 2 premieres en verte et les 8 autres en rouge...

etc.

Par la suite, j'essaierais de trouver une combine pour "arrondir":
si la cellule contient 33, on laisse 33 dans la cellule mais on ne colorie que les 3 premieres cases en vertes et les 7 autres en rouge.

Voila, si quelqu'un peut me donner quelques pistes !
Merci d'avance!!

Jeremy
A voir également:

8 réponses

Réponse 1 / 8
michel_m Messages postés 16603 Date d'inscription lundi 12 septembre 2005 Statut Contributeur Dernière intervention 16 décembre 2023 3 303
16 oct. 2009 à 12:21
=ENT($B2/10)>=COLONNE()-2

ENT($B2/10) te donne la dizaine du nombre en B2 par ex 17 en B2 renvoie 1; 33 renvoie 3

COlonne() te donne le numero de la colonne de la cellule par ex colonne C=3

la cellule C2 dans mon exemple devant se mettre en vert si la dizaine est >=1 j'écris donc colonne()-2 pour retrouver 1
et en tirant vers la droite on aura 2 en D, 3 en E, 4 en F....


si le nombre à évaluer est en A1, en B1 j'aurais écris
=ENT($A1/10)>=COLONNE()-1

si C1 en D1
=ENT($C1/10)>=COLONNE()-3



1
Réponse 2 / 8
michel_m Messages postés 16603 Date d'inscription lundi 12 septembre 2005 Statut Contributeur Dernière intervention 16 décembre 2023 3 303
16 oct. 2009 à 11:20
bonjour,
une macro ?
regarde cette maquette sans macro, peut-^tre que...
https://www.cjoint.com/?kqltcYJ7pV
0
Réponse 3 / 8
mkos Messages postés 19 Date d'inscription jeudi 13 août 2009 Statut Membre Dernière intervention 19 octobre 2009 3
16 oct. 2009 à 11:26
Oui j'ai vu la mise en forme conditionnelle mais ca ne va pas, on ne peut donner que 3 choix:

Si compris entre X0 et Y0 ...
Si compris entre X1 et Y1 ...
Si compris entre X2 et Y2 ...

Moi il me faut beaucoup plus de si...
Mais merci! :)
0
Réponse 4 / 8
mkos Messages postés 19 Date d'inscription jeudi 13 août 2009 Statut Membre Dernière intervention 19 octobre 2009 3
16 oct. 2009 à 11:31
ah mais nan ! je re essaye ! j'avais pas vu que ton fichier marchait !! :)
J'utilise excel 2003, je vais voir si ca marche aussi !
0

Vous n’avez pas trouvé la réponse que vous recherchez ?

Posez votre question
Réponse 5 / 8
michel_m Messages postés 16603 Date d'inscription lundi 12 septembre 2005 Statut Contributeur Dernière intervention 16 décembre 2023 3 303
16 oct. 2009 à 11:34
bonjour,
une macro ?
regarde cette maquette sans macro, peut-^tre que...
https://www.cjoint.com/?kqltcYJ7pV
0
Réponse 6 / 8
mkos Messages postés 19 Date d'inscription jeudi 13 août 2009 Statut Membre Dernière intervention 19 octobre 2009 3
16 oct. 2009 à 11:59
Merci Michel,
mais est ce que tu peux m'expliquer ta formule?
Car je n'arrive pas a reproduire ton fichier excel en adaptant a mon cas..
0
Réponse 7 / 8
mkos Messages postés 19 Date d'inscription jeudi 13 août 2009 Statut Membre Dernière intervention 19 octobre 2009 3
16 oct. 2009 à 16:16
C'est bon ca marche pour mes 2 premieres conditions.
Juste encore un petit truc!
Si la valeur n'est pas entre 0 et 100, ou alors n'est pas un nombre, je voudrais mettre un fond gris par exemple.
J'ai essaye de mettre une 3eme condition mais ca ne marche pas
(ma cond 1 n'est plus la meme, car j'ai change mon nombre de colonnes a 20)

[B]cond 1) [/B]
=INT($Z31/5)>=COLUMN()-5 = FOND VERT

[B]cond 2) [/B]

Cell value is between 0 et 100 = FOND ROUGE

[B]cond 3) [/B]

Cell value is NOT between 0 et 100 = FOND GRIS

Mais ma troisieme condition ne marche pas...
quelqu'un saurait m'aider a mettre ce fond gris?
0
Réponse 8 / 8
michel_m Messages postés 16603 Date d'inscription lundi 12 septembre 2005 Statut Contributeur Dernière intervention 16 décembre 2023 3 303
16 oct. 2009 à 16:57
....
:-((
0

Discussions similaires

A quoi correspond cette croix sur snapchat
Sbnet -
Lili -

6 réponses