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

Vba code couleur

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

asset

Guest
BONJOUR,

j'ai deja defini via mon onglet BDI les codes couleur automatique selon la réferance de l'article dans mon onglet saisie.

Est ce que vous pouvez m'aider a ce que les couleurs s'active toujours si je décide de changer de couleur dans mon BDI ?

Par ailleurs petite précision j'ai deja mis un code VBA, le seul probleme c'est quand les personnes font des copie coller de leurs réferance article, les codes couleurs ne ce font pas automatiquement, je suis obligé a chaque fois de faire ligne par ligne pour que le VBA s'active

et par ailleurs faire une somme selon les codes couleurs merci d'avance.

j'ai joint un fichier d'exemple

merci d'avance de votre aide
 

Pièces jointes

Dernière modification par un modérateur:
Trier par date Trier par votes
Re : Vba code couleur

Bonsoir asset,

Si j'ai bien compris, tes couleurs sont attribuées (par macro) en fonction de la lettre qui figure en colonne A ... une simple fonction SOMME.SI() devrait donc te permettre d'additionner les valeurs. Comme tu utilises déjà SOMMEPROD, j'en viens à me demander si tu ne cherches pas autre chose ... mais quoi?
Pour les changements de couleurs, tu pourrais aussi travailler avec l'événement Activate de ta feuille saisie:
VB: 
Private Sub Worksheet_Activate()
For Each c In Range("A2:A" & [A65000].End(xlUp).Row)
c.Resize(, 5).Interior.ColorIndex = [BDI_CODE_ARTICLE].Find(c, LookAt:=xlWhole).Interior.ColorIndex
Next c
End Sub
 
Vote positif 0 Vote négatif
Re : Vba code couleur

j'ai un petit probleme avec ton code, c'est a dire :

Private Sub Worksheet_Activate()
For Each c In Range("b2:b" & [b65000].End(xlUp).Row)
c.Resize(, 6).Interior.ColorIndex = [BDI_CODE_ARTICLE].Find(c, LookAt:=xlWhole).Interior.ColorIndex
Next c
End Sub

Comme tu peux le voir ma zone de couleur s'active suivant la colonne B, je n'arrive pas a faire activer la zone de couleur de la colonne A jusqu'au F
 
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

D
  • Résolu(e)
Microsoft 365 carte choroplèthe et conditionner la couleur selon une liste déroulante de choix
Réponses
8
Affichages
790
Daniel200666
D
W
  • Résolu(e)
XL 2019 Colorer la partie d'entêtes d'un pavé de cellules selon clic-doit sur une cellule interne
Réponses
5
Affichages
562
Nicolas JACQUIN
F
  • Résolu(e)
XL 2016 [VBA] connaître les couleurs d'un format conditionnel 'nuance de couleurs'
2
Réponses
15
Affichages
509
F22Raptor
F
D
  • Résolu(e)
XL 2016 Classeur en page web
2
Réponses
15
Affichages
642
TooFatBoy
S
  • Question Question
XL 2016 Conserver la police et couleur
Réponses
4
Affichages
224
SVI
S
K
  • Question Question
Microsoft 365 Couleur cellule recherche
Réponses
4
Affichages
190
fanfan38
A
  • Question Question
XL 2019 Demande d'aide pour une formule
Réponses
6
Affichages
280
Abdessadeq
A
A
  • Résolu(e)
Microsoft 365 Afficher Masquer tableau selon critères + MàJ Autom. TCD en VBA
Réponses
8
Affichages
660
Amilo
A
E
  • Question Question
Microsoft 365 Couleurs de fichiers qui changent
Réponses
1
Affichages
467
mapomme
A
  • Question Question
XL 2010 problème lors pour la selection dans un combobox
Réponses
2
Affichages
208
gbinforme
G
  • Résolu(e)
XL 2021 Un BackColor selon un RAL connu
Réponses
11
Affichages
606
GGI
G
C
  • Question Question
Microsoft 365 je cherche un code excel pour copier la couleur d'une cellule, à toutes les cellules qui ont la même valeur dans mon tableau.
Réponses
1
Affichages
500
sylvanu
H
  • Question Question
XL 2016 Données dans un feuille à partir d'un formulaire
Réponses
6
Affichages
799
TooFatBoy
P
  • Question Question
XL 2021 Macro de découpage suivant une clé
Réponses
14
Affichages
521
job75
L
  • Question Question
XL 2021 Mise en forme conditionnelle à partir d'autre colonne
Réponses
7
Affichages
356
CHRIS1945
C
  • Résolu(e)
Microsoft 365 Récupération d'une valeur particulière dans un tableau...
Réponses
13
Affichages
416
nightswan
G
  • Question Question
XL 2010 Modifier couleur de texte de zonetexte par vba
Réponses
3
Affichages
238
patricktoulon
J
  • Résolu(e)
XL 2016 tri automatique pour mettre en couleur sans condition
Réponses
4
Affichages
351
julien81
J
F
  • Question Question
XL 2016 Fusion 1 onglet de plusieurs fichiers EXCEL
Réponses
1
Affichages
220
chris
T
  • Question Question
Microsoft 365 Recherche d'un formule
2
Réponses
18
Affichages
538
Tibewan
T
Menu
Connexion
S'inscrire
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…