Bonjour,
J'ai utilisé du VBA pour extraire des données d'un tableau brute (dosimétrie reçus du personnel pour un mois) (que je copie - colle d'un autre fichier) pour créer un autre tableau avec les données et une mise en forme soignée, ce code d'exécute classiquement avec un bouton déclencheur.
J'ai créé un entête au dessus de ce tableau qui réalise des mesures, exemple nombre de personne entrées ou non en zone, donc case vide ou n'ayant reçu aucune dose.
Mon problème se situe précisément dans le calcul des trois dose les plus élevées reçu, les données sont de type 0.000 , je remplace le point par une virgule mais rien n'y fait les valeur MAX et MAX2 et MAX 3 ne s'affiche que si je double clique dans chaque case .
Avez vous une idée pour résoudre ce problème ?
merci, j'ai tout essayé...
With wsDest
'D5
.Range("D5").Formula = "=MAX(D9:D" & lastRow & ")" 'Problème
'E5
.Range("E5").Formula = "=IFERROR(LARGE(D9:D" & lastRow & ",2),"""")" 'Problème
'F5
.Range("F5").Formula = "=IFERROR(LARGE(D9:D" & lastRow & ",3),"""")" 'Problème
'C5
.Range("C5").Formula = "=INDEX(A9:A" & lastRow & ", MATCH(D5, D9:D" & lastRow & ", 0))"
End With