Afficher un certain nombre de frame
Résolu/Fermé
A voir également:
- Afficher un certain nombre de frame
- Afficher mot de passe wifi android - Guide
- Excel afficher 0 avant nombre - Guide
- Faites afficher avec un fond coloré les cellules qui contiennent une valeur comprise entre 250 et 350. quel nombre est dessiné en surbrillance ? ✓ - Forum Excel
- En raison d'un nombre important d'échec de connexion snapchat - Forum Snapchat
- Nombre facile - Télécharger - Outils professionnels
1 réponse
f894009
Messages postés
17185
Date d'inscription
dimanche 25 novembre 2007
Statut
Membre
Dernière intervention
15 avril 2024
1 701
Modifié le 28 juin 2018 à 07:24
Modifié le 28 juin 2018 à 07:24
Bonjour,
Une façon de faire. A adapter a votre contexte
Si vous en voulez 1 et 2 pourquoi 3 dans cellule?????????????????
une autre façon plus logique:
Une façon de faire. A adapter a votre contexte
Private Sub CommandButton1_Click()
If Cells(1, 1) <> "" And IsNumeric(Cells(1, 1)) Then
NbF = 0
'compte le nombre de frame
For Each ctrl In UserForm1.Controls
'Si le type du Controle est une Frame +1
If TypeOf ctrl Is MSForms.Frame Then
NbF = NbF + 1
ctrl.Visible = False
End If
Next
NbF = Cells(1, 1) - 1 'nombre de frame a afficher
For nf = 1 To NbF
Me.Controls("Frame" & nf).Visible = True
Next nf
End If
End Sub
Si vous en voulez 1 et 2 pourquoi 3 dans cellule?????????????????
une autre façon plus logique:
Private Sub CommandButton2_Click()
If Cells(1, 1) <> "" And IsNumeric(Cells(1, 1)) Then
NbF = 0
'compte le nombre de frame
For Each ctrl In UserForm1.Controls
'Si le type du Controle est une Frame +1
If TypeOf ctrl Is MSForms.Frame Then
NbF = NbF + 1
If NbF <= Cells(1, 1) - 1 Then
ctrl.Visible = True
Else
ctrl.Visible = False
End If
End If
Next
End If
End Sub
28 juin 2018 à 09:26
28 juin 2018 à 09:40