supprimer NA

garrec · 1 Juin 2012

Bonjour,

j'aimerais dans le fichier suivant supprimet les NA de la ligne 10 à 45 mais mon code vba ne semble pas fonctionner?

Code:

Sub Supna()

For m = 10 To 45

If Range("A" & m).Value = "#N/A" Then

Range("A" & m).Value = ""
 
End If

Next

end sub

Thanks in advance

🙂

tototiti2008 · 1 Juin 2012

Re : supprimer NA

Bonjour garrec,

peut-être

Code:

For m = 10 To 45

If IsError(Range("A" & m).Value) Then

Range("A" & m).Value = ""
 
End If

Next

Edit : Bonjour Philippe 🙂

phlaurent55 · 1 Juin 2012

Re : supprimer NA

Bonjour garec,

le problème vient des formules contenues dans les cellules

#N/A est un message d'erreur et pas un contenu de cellule, il n'est pas possible de tester comme tu le fais

transforme tes formules directement sur la feuille pour éviter ce #N/A et tu n'auras pas besoin de macro

=si(estna('ta formule");"";'taformule")

à+
Philippe

Edit: Bonjour Tototiti

Edit 2: Le fait de vouloir utiliser la macro telle que vous la concevez va irrémédiablement effacer le contenu de la cellule (la formule contenue) sans aucune possibilité de retour en arrière.
voici la formule modifiée à mettre en A20 (l'écrire sur une seule ligne) et à recopier vers le bas
pour les cellules allant de A10 à A19, je ne vois pas de formules dans le classeur joint

Code:

=SI(ESTNA(RECHERCHEV(B20;'Z:\Gestion de Fonds\[KAM Global Analyzer.xlsm]Report1'!N14:AA948;14;FAUX));"";RECHERCHEV(B20;'Z:\Gestion de Fonds\[KAM Global Analyzer.xlsm]Report1'!N14:AA948;14;FAUX))

garrec · 4 Juin 2012

Re : supprimer NA

Merci laurent et titi je n'avais pas pensé a NA 🙂

supprimer NA

garrec

XLDnaute Occasionnel

Pièces jointes

tototiti2008

XLDnaute Barbatruc

phlaurent55

Nous a quittés en 2020

garrec

XLDnaute Occasionnel

Discussions similaires

supprimer NA

garrec

XLDnaute Occasionnel

Pièces jointes

tototiti2008

XLDnaute Barbatruc

phlaurent55

Nous a quittés en 2020

garrec

XLDnaute Occasionnel

Discussions similaires

Privacy & Transparency

Privacy & Transparency