Récupérer uniquement les enregistrements non vides d'une variable tableau

Bonjour,

J'enregistre par une boucle les adresses de cellules qui correspondent à une valeur précise de cellule dans un tableau:

A la sortie de la boucle j'ai donc un enregistrement d'adresses de cellules dans mon tableau comme suit :

Tab(1) = $C$1 , Tab(2)=0, Tab(3)=$C$3, Tab(4)=0 .....

Ensuite je veux utiliser ces adresses dans une formule comme suit dans une cellule donnée :

Cells(24, 4).Formula = "=Feuil1" & tab(1) & "+" & "Feuil1" & tab(2)& "+" & "Feuil1" & tab(3)& "+" & "Feuil1" & tab(4)....

Le problème est que les enregistrements vides me font foirer la ligne de code.

Ma question est donc comment écarter les enregistrements vide de mon tableau pour n'utiliser que les enregistrements nécessaires de manière simple svp?

Bonjour,

Essaie (non testé) :

Dim tabl(), Txt As String
Txt = "=Feuil1"
For i = 1 To 4
  If tabl(i) <> "" Then
    Txt = Txt & tabl(i)
  End If
Next i
Cells(24, 4).Formula = Txt

Daniel

Oups, j'ai oublié les Feuil1. Vérifie que le "!" précède bien tes adresses.

Daniel

Bonjour, Merci pour ta réponse mais

De cette manière j'obtiens un truc de la sorte : =Feuil1!$C$1$C$3 et j'ai donc une erreur

alors que je voudrais : =Feuil1!$C$1 + Feuil1!$C$3

Alors :

Dim tabl(), Txt As String
For i = 1 To 4
  If tabl(i) <> "" Then
    Txt = Txt & "+Feuil1!" & tabl(i)
  End If
Next i
Cells(24, 4).Formula = "=" & Right(Txt, Len(Txt) - 1)

Daniel

Ca a l'air super ! Merci beaucoup, j'aurais pu y penser mais c'est moins fatiguant sans réfléchir!!