Re : Combinaison index et equiv et erreurs N/A
Bonsoir modeste,
ton astuce de convertir les données fonctionne bien sur 1 onglet, mais si je veux appliquer cette conversion sur 100 onglets importés,
je ne peux as car excel ne me permet pas d'appliquer a conversion sur 100 onglet en mm temps, à moins qu'il y a une astuce !
J'ai trouvé CDec qui m'aide, en fait au départ de l'import, les cellules du tableau sont au format %, puis dans mon code VBA je passe la plage en :
donc, je me retrouve au départ "28,2%" puis
Selection.NumberFormat = "General"
je me retrouve avec un numéric "0.282", ensuite avec le code VBA ci-dessous, j'ai le résultat "28.2", y peut-etre plus simple?
For Each cel3 In Worksheets(nomFeuil).Range("E2:E16").Cells
Cpt = Cpt + 1
If IsNumeric(cel3) Then Worksheets(nomFeuil).Cells(1 + Cpt, 5) = CDec(cel3.Value) * 100
If cel3.Font.Bold = True And IsNumeric(cel3) Then
Worksheets(nomFeuil).Cells(1 + Cpt, 11) = 1
Else
If cel3.Value = Empty Then
Else
Worksheets(nomFeuil).Cells(1 + Cpt, 11) = "MG"
End If
End If
Next
Merci