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

Visual Basic, macro?

Créer une discussion
  • Initiateur de la discussion Initiateur de la discussion mkos
  • 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

mkos

Guest
Bonjour,

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
 
Trier par date Trier par votes
Re : Visual Basic, macro?

bonjour,

tu utilises quelle version excel ?
2003 ou inf, tu peux faire 3 mise en formes conditionnelles
2007 : moultes

sinon il y a VBA qui peut presque tout faire (sauf le café ...)
 
Vote positif 0 Vote négatif
Re : Visual Basic, macro?

Bonjour

Si la cellule qui contient le nombre est en A3:

Sélectionne les dix cellules à droite (B3:K3) appliquer un fond Rouge puis
Format/mise en forme conditionnelle
la formule est : =COLONNE()<=1+ ENT($A$3/10)

A+
 
Vote positif 0 Vote négatif
Re : Visual Basic, macro?

merci pour les reponses,

j'utilise excel 2003,

est ce que tu peux m'expliquer cette formule COLONNE()<=1+ ENT($A$3/10) ?
car je n'arrive pas a l'appliquer a mon cas...

merci bcp !
 
Vote positif 0 Vote négatif
Re : Visual Basic, macro?

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

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

cond 2)

Cell value is between 0 et 100 = FOND ROUGE

cond 3)

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?
 
Vote positif 0 Vote négatif
Re : Visual Basic, macro?

Bonjour mkos, Hacos, mutzik,

Si tu parles de Mise en forme condionnellle, tu choisis la Formule est et tu colles ceci :

=OU($A$1<0;$A$1>100) et ta couleur grise.

Bon après-midi.

Jean-Pierre
 
Vote positif 0 Vote négatif
Re : Visual Basic, macro?

Bonjour,

Jean Pierre,

Je viens d'essayer la formule que tu proposes mais je recois un messsage d'erreur:
"The formula you typed contains an error"

=OU($Z$31<0;$Z$31>100)

Et c'est le zero de la formule qui est selectionne.

Merci a vous,

Jeremy.
 
Vote positif 0 Vote négatif
Re : Visual Basic, macro?

Bonjour Jeremy,

Tu as quelle version d'Excel ?

Peut-être avec : =OR($A$1<0;$A$1>100)

Sinon, dépose un petit fichier exemple avec ce problème.

Bonne journée.

Jean-Pierre
 
Vote positif 0 Vote négatif
Re : Visual Basic, macro?

J'ai Excel 2003, professional edition.
J'ai essaye avec la formule en anglais et en francais, ca ne marche pas non plus 🙁

Je vous joins un petit screenshot du probleme, si vous voulez jeter un oeil 🙂

Merci bien.
 

Pièces jointes

  • screen.jpg
    50.9 KB · Affichages: 63
  • screen.jpg
    50.9 KB · Affichages: 62
  • screen.jpg
    50.9 KB · Affichages: 63
Vote positif 0 Vote négatif
Re : Visual Basic, macro?

Re,

Bien ce que je pensais, mais n'en étant pas sûr....

J'ai simplement inversé la priorité des conditions.

Vois si cela répond à ton problème.

Bon après-midi.

Jean-Pierre
 

Pièces jointes

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
Assurez vous de marquer un message comme solution pour une meilleure transparence.

Discussions similaires

J
  • Question Question
Autres Protection de données
Réponses
6
Affichages
316
TooFatBoy
C
  • Résolu(e)
XL 2010 Modifier les références d'une sélection multizones déjà nommée.
Réponses
7
Affichages
322
ChRouan
C
P
  • Résolu(e)
XL 2021 peut on mettre plusieurs fonctions si erreur index les une à la suite des autres
Réponses
9
Affichages
284
PR.
P
C
  • Résolu(e)
XL 2021 Inventaire automatique
Réponses
14
Affichages
1 K
Constantin
C
P
  • Question Question
XL 2010 VBA mettre en place MFC avec un TCD
Réponses
4
Affichages
605
Poulet
P
O
  • Question Question
Autres recopie de cellules selon la date
Réponses
3
Affichages
373
olivier Clech
O
C
  • Question Question
Microsoft 365 Formule Excel qui additionne la tarification quotidienne
Réponses
2
Affichages
383
TooFatBoy
N
  • Question Question
Microsoft 365 afficher/masquer des lignes en fonction de la valeur d'une cellule qui aura été renseignée par une autre feuille (via un copier/collé automatique)
Réponses
5
Affichages
1 K
Nel'
N
S
  • Question Question
XL 2016 Séquence Numéro loto VBA
Réponses
0
Affichages
888
sigadias
S
C
  • Résolu(e)
XL 2016 Répartir dans des Groupes d'Effectifs Aléatoires ... mais pas trop
Réponses
2
Affichages
601
crocrocro
C
D
  • Question Question
XL 2016 Future date la plus proche d'aujourd'hui + mise en forme conditionnelle
Réponses
8
Affichages
551
vgendron
J
  • Question Question
Microsoft 365 macro qui ouvre des fichiers excel de type "analyze in excel" généré par power bi et met à jour un filtre "mois" sur plusieurs tcd
Réponses
0
Affichages
650
JJ69
J
C
  • Question Question
XL 2013 Copie de formules
Réponses
4
Affichages
597
Cattitude
C
D
  • Résolu(e)
Microsoft 365 Comment réduire efficacement cette formule trop importante pour Excel
Réponses
6
Affichages
595
dacunha
D
S
  • Question Question
XL 2021 suite de nombre avec changement tous les 5
Réponses
9
Affichages
751
mapomme
M
  • Résolu(e)
XL 2013 Macross supprimant les données de cellule en dehors d'une période définie dans deux autres cellules
Réponses
9
Affichages
810
MarineU
M
M
  • Résolu(e)
Microsoft 365 Formule - Simulation dépense - grilles tarifaires 24 VS 23
Réponses
7
Affichages
676
mcfv
M
  • Résolu(e)
XL 2021 recherche supprimer les espaces '"si valeur cherchée est numérique" sinon NON
Réponses
7
Affichages
880
Usine à gaz
O
  • Question Question
XL 2016 Compter des cellules dont les données sont consécutives
Réponses
9
Affichages
1 K
piga25
G
  • Question Question
Microsoft 365 Export données
Réponses
4
Affichages
906
GClaire
G
Menu
Connexion
S'inscrire
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…