enlever les case vide grace a une formule

[Mr Guizz]

Salut a tous !
J'aimerai trouvé une formule ( j'insiste sur le fait que je veux absolument une formule) qui me permettrait de supprimer les case vides d'une liste . Voici un exemple pour mieux m'expliquer

Partons de cette liste (A1:F1)
A Toto
B Tata
C
D Titi
E
F Tutu

Resultat attendu (en H1:M1)
H Toto
I Tata
J Titi
K Tutu
L
M

Je sais qu'il est possible de le faire avec les filtres mais j'aimerai aussi avoir une solution avec une formule!
Merci pour votre aide

 

[JBOBO]

Bonjour,
A tester en H1 et tirer vers la droite : =SIERREUR(INDIRECT(ADRESSE(1;SOMMEPROD(PETITE.VALEUR(($A$1:$F$1<>"")*COLONNE($A$1:$F$1);COLONNE()-7+NB.SI($A$1:$F$1;"")))));"")

 

[JHA]

Bonjour à tous,

Un fichier aurait été le bienvenu.

JHA

 

[Modeste]

Bonjour Mr Guizz,
Salut JBOBO

Une autre solution pour H1:

=SIERREUR(INDEX($A$1:$A$30;PETITE.VALEUR(SI($A$1:$A$30<>"";LIGNE($A$1:$A$30));LIGNES($1:1)));"")

Valider avec Ctrl+Shift+Enter

[Edit:] Salut JHA
[Edit bis:] avec la plage de départ en A1:F1, il faut plutôt utiliser:

=SIERREUR(INDEX($A$1:$F$1;PETITE.VALEUR(SI($A$1:$F$1<>"";COLONNE($A$1:$F$1));LIGNES($1:1)));"")

 

[Mr Guizz]

Merci pour vos reponse !
Du coup je joint un fichier pour vous montrer reelement ce que je veux ! (resultat a la verticale )
( cela dit , j'ai juste a adapter l'horizontal avec la verticale!)
merci

[EDIT]( cela dit , j'ai juste a adapter l'horizontal avec la verticale!) euh.... en fait ca a pas l'air si simple que ca .....

 

[Modeste]

Re-bonjour,

Ma première proposition répondait à ce cas de figure ... avec juste une modification de n° de ligne:

=SIERREUR(INDEX($A$1:$A$30;PETITE.VALEUR(SI($A$3:$A$30<>"";LIGNE($A$3:$A$30));LIGNES($1:1)));"")

 

[JHA]

Bonjour à tous,
Bonjour Modeste, JBOBO

A essayer,

JHA

 

[JBOBO]

Bonjour à tous,
Bonjour JHA, Modeste,

toujours avec sommeprod en D3: =SIERREUR(INDIRECT(ADRESSE(SOMMEPROD(PETITE.VALEUR(($A$3:$A$8<>"")*LIGNE($A$3:$A$8);LIGNE()-2+NB.SI($A$3:$A$8;"")));1));"")

 

[Mr Guizz]

OK! Merci a tous ! Probleme resolu