Excel VBA ajout bouton précédent suivant
Comment ajouter des boutons sur un formulaire dans Excel VBA en moins de 10 min.
EXCEL_2007_VBA_USERFORM_DYNAMIQUE_10_BP
Version Dailymotion :
EXCEL_2007_VBA_USERFORM_DYNAMIQUE_10_BP
Excel VBA ajout bouton précédent suivant
EXCEL VBA Ajout bouton précédent suivant
L’objectif est de réaliser à présent deux boutons précédent et suivant dans notre Userform, afin de naviguer dans notre liste de données sans avoir à fermer et ré ouvrir le formulaire et sans perte ni changement lors du changement de ligne dans la liste de données.
Double-clic sur le bouton précédent crée dans l’Userform :
Private Sub Précédent_Click()
If ActiveCell.Row > 2 Then
ActiveCell.Offset(-1, 0).Select
Unload UserForm1
UserForm1.Show
End If
End Sub
Double -lic sur le bouton Suivant crée dans l’Userform :
Private Sub Suivant_Click()
If ActiveCell.Row < ActiveSheet.UsedRange.Rows.Count Then
ActiveCell.Offset(1, 0).Select
Unload UserForm1
UserForm1.Show
End If
End Sub
Ci-dessous le résultat :
Excel VBA ajout bouton précédent suivant
Code source VBA :
Excel VBA ajout bouton précédent suivant
