Besoin d'aide VBA Excel

Besoin d'aide VBA Excel - VB/VBA/VBS - Programmation

Marsh Posté le 23-12-2005 à 08:02:04    

Bonjour à tous,
Voilà mon problème, j'ai dans un UserForm 2 OptionButton et 3 Textbox, je voudrais "lier" les OpB aux TxtBox.
Si l' OpB 1 est coché cela doit donner l'accés a la textbox 1 et grise (interdit l'entrée de données) les textbox 2 et 3  
Si l'OpB 2 est coché cela donne l'accés aux textbox 2 et 3 et grise la textbox 1.
Quelqu'un peut il m'aider ???
Merci d'avance et bonne journée. :hello:

Reply

Marsh Posté le 23-12-2005 à 08:02:04   

Reply

Marsh Posté le 23-12-2005 à 08:31:46    

Cela pourrait être :
Private Sub Opt1_Change()
    If Opt1.Value = True Then
        TextBox1.Enable = True
        TextBox2.Enable = False
        TextBox3.Enable = False
    Else
        TextBox1.Enable = False
        TextBox2.Enable = True
        TextBox3.Enable = True
    End If
End Sub

Reply

Marsh Posté le 23-12-2005 à 08:52:59    

Salut Epena,
merci pour ta réponse , j'ai vais essayer çà et te tient au courant.
@+

Reply

Marsh Posté le 23-12-2005 à 09:11:09    

Resalut Epena,
Désolé mais çà ne fonctionne pas, j'aiune erreur de compilation
membre de méthode ou données introuvable
Qu'en penses tu ???

Reply

Marsh Posté le 23-12-2005 à 09:38:40    

salut Novasim,
il s'agit de la commande Enabled et non Enable
@++

Reply

Marsh Posté le 23-12-2005 à 09:45:24    

Salut Tunisiano8,
OK je vais modifier la syntaxe.
Conernant le post d'hier pour trier des données, essaye çà chez moi çà marche:
Selection.Sort Key1:=Range("B2" ), Order1:=xlAscending, Header:=xlGuess, _
        OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _
        DataOption1:=xlSortNormal
 
Merci de ton aide et joyeux noël

Reply

Marsh Posté le 23-12-2005 à 10:02:43    

Problème résolu
erreur de syntaxe
merci à vous deux

Reply

Marsh Posté le 23-12-2005 à 10:13:17    

Merci à toi Novasim221 et joyeuses fêtes !!
 
Tunisiano.

Reply

Marsh Posté le 23-12-2005 à 10:17:41    

Désolé, oublié de vérifier le code..
@+

Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed