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

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:D13<>"";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

Phil69970

XLDnaute Barbatruc
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
 

chaelie2015

XLDnaute Accro
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..
 

Discussions similaires

Réponses
3
Affichages
254

Statistiques des forums

Discussions
312 213
Messages
2 086 302
Membres
103 174
dernier inscrit
OBUTT