Bonjour à tous,
J'ai créé le code suivant mais je suis sûr qu'il existe un moyen plus "propre" de le faire.
J'ai pensé que d'ajouter des virgules aiderait mais apparemment VBA n'accepte pas cette syntaxe:
Une petite idée?
Merci
YeTi
J'ai créé le code suivant mais je suis sûr qu'il existe un moyen plus "propre" de le faire.
Code:
If OptionButton1.Value = True Then
With MultiPage1
.Pages("Geographic").Enabled = True
.Pages("Product").Enabled = True
.Pages("Order").Enabled = True
.Pages("Shipping").Enabled = True
.Pages("Invoicing").Enabled = True
.Pages("Wholesaler").Enabled = True
.Pages("Other").Enabled = True
.Pages("Actions").Enabled = False
.Pages("Search").Enabled = False
End With
End If
J'ai pensé que d'ajouter des virgules aiderait mais apparemment VBA n'accepte pas cette syntaxe:
Code:
If OptionButton1.Value = True Then
With MultiPage1
.Pages("Geographic", "Product", "Order", "Shipping", "Invoicing", "Wholesaler", "Other").Enabled = True
.Pages("Actions", "Search").Enabled = False
End With
End If
Une petite idée?
Merci
YeTi