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

Macro remplacement %

Créer une discussion

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
T

titiborregan5

XLDnaute Accro
Bonjour à tous,

je ne sais pas si ma demande a déjà été traitée mais je n'ai aucune idée de comment formuler ma recherche... donc je me permets d'ouvrir ce post...


J'ai reçu des fichiers excel de centaines d'agents, ou chacun devait répartir un total = 100% sur différents codes (1 ou plusieurs)!
Bien sur, certains n'ont pas respecté cela et je me retrouve donc avec des totaux différents de 100%!

J'aimerais via macro, pouvoir corriger cela en prenant le pourcentage de "(pourcentage actuel / total pourcentage nom)*100"...

Et je ne sais pas comment écrire mon code...

Je vous ai mis un fichier exemple, car pas sûr d'avoir donné des explications claires...

Merci d'avance pour vos réponses,

Tibo
 

Pièces jointes

Trier par date Trier par votes
Re : Macro remplacement %

Bonjour titiborregan5,

Une méthode très simple, à adapter bien sûr :

Code: 
Sub Corrige()
Dim N As Range, P As Range, R As Range, a1$, a2$
Set N = [A2:A26]: Set P = [B2:B26] 'plages à adapter
Set R = [I2:I26] 'plage des résultats, à adapter
a1 = Application.ConvertFormula(N.Address, xlA1, xlR1C1)
a2 = Application.ConvertFormula(P.Address, xlA1, xlR1C1)
R.NumberFormat = "0%"'format à adapter
R.FormulaR1C1 = "=RC2/SUMIF(" & a1 & ",RC1," & a2 & ")"
R = R.Value 'ne garde que les valeurs
End Sub
Edit : bonjour Pierre, heureux de te croiser 🙂

A+
 
Dernière édition:
Vote positif 0 Vote négatif
Re : Macro remplacement %

Pierrejean, job,
je suis bluffé... merci beaucoup...

Pour des questions de retransposition je vais utiliser la formule de job, que je comprends un petit mieux...
Mais vu la complexité (pour moi) de vos codes, je comprends mieux pourquoi je n'y arrivais pas tout seul...

Un grand merci à vous, il me reste à l'adapter à mon fichier réel...

Que serais-je sans XLD ?????

Edit:
Après qq essais infructueux, j'ai réussi à adapter le code de Job... J'avais un #valeur, il fallait que je retravaille la formule de la fin du code pour prendre les bonnes colonnes également...

Merci pour votre aide!
 
Dernière édition:
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

C
  • Question Question
Autres Apprentissage d'une langue : adapter la couleur des cellules en fonction du pourcentage d'évaluation
Réponses
2
Affichages
629
crocrocro
C
S
  • Question Question
XL 2019 Comment savoir la valeur à appliquer pour rejoindre courbe de tendance
Réponses
7
Affichages
1 K
sukkoi
S
S
  • Question Question
XL 2010 VBA - macro avec 1 boucle qui alterne 1 action à conditions et 1 action sans conditions
2 3 4
Réponses
58
Affichages
9 K
Scorp0211
S
F
  • Question Question
XL 2016 VBA Comparaison fichier
Réponses
1
Affichages
1 K
AtTheOne
N
  • Résolu(e)
XL pour MAC Refonte complete d'un fichier, besoin d'idées
8 9 10
Réponses
147
Affichages
14 K
Staple1600
P
  • Question Question
Microsoft 365 Comparaison de tableaux !
Réponses
1
Affichages
3 K
Patrosso
P
  • Question Question
XL 2016 Macro VBA pour créer une BdD à partir de plusieurs fichiers
Réponses
2
Affichages
2 K
surgeon84fr
J
  • Question Question
XL 2016 Recherche de code VBA pour macro complexe entre fichier
Réponses
2
Affichages
1 K
Justine B
J
Y
  • Question Question
XL 2016 Aide Pour Macro
Réponses
4
Affichages
1 K
YesWeExcel
Y
N
  • Question Question
Macro VBA "Remplacer par" amélioré
2
Réponses
15
Affichages
6 K
nicopat
N
L
  • Question Question
realisation d'une macro avec plusieurs variables
2 3 4
Réponses
53
Affichages
4 K
lao31
L
N
  • Question Question
Dupliquer une macro
Réponses
10
Affichages
2 K
Dranreb
R
  • Question Question
camembert n'affichant pas les informations nulles (sans faire de macro)
Réponses
8
Affichages
2 K
ROGER2327
E
  • Question Question
Remplacement de dates au format " déc. " par "/12/" par macro
Réponses
6
Affichages
1 K
excelentille
E
M
  • Question Question
Macro "Recherche dans Windows"
Réponses
2
Affichages
3 K
Mastho
M
R
  • Question Question
Moyenne par partie MAcro VBA pour exel
Réponses
6
Affichages
1 K
reve20
R
Y
  • Question Question
Macro filtre avec condition extract 2 le retour du filtre perdu.
Réponses
4
Affichages
1 K
Yukkah
Y
T
  • Question Question
Personnalisation des sous-totaux d'un TCD
Réponses
4
Affichages
2 K
TedLavie
T
K
  • Question Question
Regroupement de colonnes automatisé par macro VBA
Réponses
0
Affichages
3 K
kokosei
K
O
  • Question Question
Commentaires de cellules, limite de feuilles, de classeurs ?
Réponses
1
Affichages
2 K
Orodreth
O
Menu
Connexion
S'inscrire
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…