Traduction d'une formule en VBA

Salut !

J'ai besoin d'un petit coup de main pour traduire en VBA une formule Excel...

La voici :

Code:

---

MAX(SI(ESTVIDE($B:$B);0;LIGNE($B:$B))

---

Dans mon code VBA, j'aimerais associer cette formule à un entier :

Code:

---

1 2	Dim nbligne As Integer nbligne = ???

---

Voyez-vous comment faire ?

Merci ! ;)

Salut, à lire et pratiquer :

• Ecrire une formule dans Excel à l'aide d'une procédure VBA
• Ecrire une formule dans Excel à l'aide d'une procédure VBA (Part 2)

Bonjour
Etrange formule qui, en plus de souffrir d'une parenthèse manquante, à une curieuse finalité que l'on voit mal. Quelle est-elle donc ?
(car telle qu'écrite elle ne ferait qu'écrire 1 ou 0 selon que la cellule en regard en colonne B est remplie ou non.

Oui, j'ai omis la parenthèse finale (oups :oops:).

En fait, elle sert à me renvoyer le n° de la dernière ligne qui contient des données (pour une colonne donnée). Pour dire vrai, j'ai repiqué cela sur le Net.

Pour trouver la dernière ligne non vide voici une recette que tu peux trouver dans plusieurs discussions
Le principe est de partir de la dernière ligne du fichier "rows.count" et de remonter jusqu'à la première ligne non vide "end(xlup)"
Il te reste à adapter selon le numéro de colonne

Code:

---

1 2 3 4 5 6 7 8 9 10 11

Sub Derniere_Ligne()   Dim Derlig As Single Dim MaColonne As Single   MaColonne = 2 Derlig = Cells(Rows.Count, MaColonne).End(xlUp).Row   MsgBox Derlig   End Sub

---

Bonne suite;)

Citation:

---

Envoyé par Mike888

Oui, j'ai omis la parenthèse finale (oups :oops:).

---

N'aurais-tu pas aussi omis de préciser qu'il s'agit d'une formule matricielle ? :?

Citation:

---

Envoyé par LeBo74

Code:

---

1 2	Dim Derlig As Single Dim MaColonne As Single

---

---

Juste une petite remarque : perso, j'aurais plutôt déclaré ces variable de type "Long".

Merci Menhir pour le commentaire

Erreur de débutant dans la déclaration des variables:oops:

Merci pour votre aide ! :D

Effectivement, il s'agissait bien d'une formule matricielle. ;)