XL 2010 Dernière cellule conditions

e1701086

XLDnaute Nouveau
Bonjour,

je fais appels à vos compétences en Excel pour m'aider sur un point.
Je souhaiterais faire cette formule : SI(ET(prénom="Pierre"; mois="2018-12"); dernière cellule ou ces conditions sont remplies + 1; 0)
Je ne sais et je ne trouve pas comment remplacer la formule en gras.

Merci d'avance pour votre aide.
 

fanfan38

XLDnaute Barbatruc
Bonjour
Par macro
VB:
Sub test()
  Dim i As Long, derlig As Long
  derlig = Range("A" & Rows.Count).End(xlUp).Row 'recherche la dernière ligne
  For i = derlig To 2 Step -1 'boucle de la dernière ligne à 2
  'en considerant que prénom est dans la colonne A et mois dans la colonne B
    If Range("A" & i).Value = "Pierre" And Range("B" & i).Value = "2018-12" Then
      Range("A" & i + 1).Select 'selectionne la cellule suivante
      Exit Sub
    End If
  Next
End Sub
A+ François
 

Statistiques des forums

Discussions
312 078
Messages
2 085 112
Membres
102 783
dernier inscrit
Basoje