Autres (RESOLU)première cellule non vide dans une colonne

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

chaelie2015

XLDnaute Accro
Bonsoir forum
Je cherche une formule dans la cellule d2 pour la colonne de d3 au D13 (ces cellules contient des formules )
je cherche une formule qui affiche dans D2 le contenu de la première cellule non vide.
J'ai essayé : =INDEX(D3 : d13;EQUIV(VRAI;D3😀13<>"";0);1) mais ça marche pas
Merci
 
Solution
Bonjour @chaelie2015

Par vba je te propose ceci :

VB:
Sub Mon_Adresse()
Columns("D").SpecialCells(xlCellTypeBlanks)(1).Select 'Selectionne la cellule
MsgBox Columns("D").SpecialCells(xlCellTypeBlanks)(1).Address 'Adresse de la cellule
End Sub

Et par formule

Code:
{=INDEX(D4:D13;EQUIV(VRAI;D4:D13<>"";0))}
A valider par Ctrl + Maj + Entrée

*La formule te donneras la valeur de la cellule mais pas son adresse

*Merci de ton retour

@Phil69970
Bonjour @chaelie2015

Par vba je te propose ceci :

VB:
Sub Mon_Adresse()
Columns("D").SpecialCells(xlCellTypeBlanks)(1).Select 'Selectionne la cellule
MsgBox Columns("D").SpecialCells(xlCellTypeBlanks)(1).Address 'Adresse de la cellule
End Sub

Et par formule

Code:
{=INDEX(D4:D13;EQUIV(VRAI;D4:D13<>"";0))}
A valider par Ctrl + Maj + Entrée

*La formule te donneras la valeur de la cellule mais pas son adresse

*Merci de ton retour

@Phil69970
 
Bonjour @chaelie2015

Par vba je te propose ceci :

VB:
Sub Mon_Adresse()
Columns("D").SpecialCells(xlCellTypeBlanks)(1).Select 'Selectionne la cellule
MsgBox Columns("D").SpecialCells(xlCellTypeBlanks)(1).Address 'Adresse de la cellule
End Sub

Et par formule


A valider par Ctrl + Maj + Entrée

*La formule te donneras la valeur de la cellule mais pas son adresse

*Merci de ton retour

@Phil69970
Bonsoir
c'est parfait.
Bonne soirée..
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

Retour