supprimer des lignes '#ref' par macro

[LaurentG]

Bonjour,

J'ai un classeur Excel avec plein de formules de calcul qui tire les infos pour certains calcul dans la feuille 'Result'.

Cette feuille est importé par une macro à l'ouverture du fichier.

donc dans ma feuille de calcul j'ai 80 lignes qui sont remplit par des formules '=Result!A4+5' des choses comme çà.

Ma feuille result peut n'avoir que 8 lignes. alors dans ma feuille de calculs, les lignes 2 à 8 sont bien remplies, mais les suivantes de 9 à 81, il y a '#Ref'. j'aimerai que ma macro après avoir importé ma feuille result, me supprime les lignes qui ne servent à rien.

Est-ce possible?

Merci

Laurent

 

[SKYMAN]

Bonjour Laurent,

Voici un code a ajouter a la fin de ta macro

    Set Result = Worksheets('Result')
    For ligne = 9 To 81
        Txt = Result.Cells(ligne, 1).Formula
        For l = 1 To Len(Txt)
            If Mid(Txt, l, 5) = '#REF!' Then
                Result.Cells(ligne, 1) = ''
            End If
        Next
    Next

Cela devrais suffir