cs_Baldrick
Messages postés1Date d'inscriptionjeudi 1 mai 2008StatutMembreDernière intervention14 avril 2010
-
14 avril 2010 à 15:44
Renfield
Messages postés17287Date d'inscriptionmercredi 2 janvier 2002StatutModérateurDernière intervention27 septembre 2021
-
14 avril 2010 à 16:48
Function NumDerniereLigne() As Integer
Dim maligne As Integer
maligne = 0
For i = 3 To 200 Step 1
If (Cells(i, 79).Value "" Or Cells(i, 79).Value Null) Then
maligne = i
Exit For
End If
Next i
Return maligne
End Function
Sub prepaimpression()
'
maligne = NumDerniereLigne()
MsgBox (maligne)
End Sub
Bonjour j'ai un problème de fonction avec un return.
Plusieurs fois dans mon programme principale je veux le numéro de la dernière ligne de mon fichier Excel (dans la colonne 79). Donc je veux créer une fonction que j'appelle et elle me retourne le résultat. seul problème ça ne fonctionne pas j'ai chercher plusieurs solutions sur le net tous me donnent cette sythaxe. J'ai simplifier mon programme principale qui est prepaimpression() pour n'avoir que ce qui m'interesse.