Limiter l'appel d'un USF à un nombre de lignes

[degap05]

Bonjour,

Je souhaite limiter la possibilité d'appel d'un USF à un nombre de ligne.
Sur ma feuille BEDM, serait-il possible d'indiquer dans la procédure du bouton d'appel:
- appel possible s'il reste une ligne disponible en dessous, entre la ligne 2 et la ligne 10.
- si la ligne 10 est occupée, afficher un message "Veuillez d'abord éditer ce bordereau, avant de poursuivre"

Merci d'avance pour votre aide.
A+

 

[pierrejean]

Re : Limiter l'appel d'un USF à un nombre de lignes

bonjour degap05

Teste

Private Sub CommandButton1_Click()
If Range("A2").End(xlDown).Row < 9 Then
 ChoixDM.Show
 Exit Sub
Else
 MsgBox ("Veuillez d'abord éditer ce bordereau, avant de poursuivre")
End If
End Sub

 

[degap05]

Re : Limiter l'appel d'un USF à un nombre de lignes

Bonjour PierreJean,

Merci pour ta proposition.

Salutations.