(RESOLU)Verrouillage de TextBoxs d'un USF selon la valeur d'un TextBox d'un autre USF

Pierrot93

XLDnaute Barbatruc

• 26 Octobre 2015

• #16

Re : Verrouillage des TextBoxs d'un USF selon la valeur d'un TextBox d'un autre USF

Re,

bah... ce fichier fonctionne bien chez moi..... si je saisis 9, les 9 premiers textbox de l'userform2 ne sont plus accessibles.....

 

Vote positif 0 Vote négatif

chaelie2015

XLDnaute Accro

• 26 Octobre 2015

• #17

Re : Verrouillage des TextBoxs d'un USF selon la valeur d'un TextBox d'un autre USF

RE
dans ce fichier une fois j'ai saisie une valeur sup 1 (comprise entre 1 et 32) dans le TextBox10 Un USF2 s'affiche pour saisir dans les TextBox le nombre de TextBox D"verrouillée est le même que le nombre saisi dans le TextBox10 de USF1
salutaions

 

Vote positif 0 Vote négatif

chaelie2015

XLDnaute Accro

• 26 Octobre 2015

• #18

Re : Verrouillage des TextBoxs d'un USF selon la valeur d'un TextBox d'un autre USF

Pierrot93 à dit:

Re,

bah... ce fichier fonctionne bien chez moi..... si je saisis 9, les 9 premiers textbox de l'userform2 ne sont plus accessibles.....

Cliquez pour agrandir...

Re
tu as raison ton code fonctionne parfaitement, mais j'ai souhaité (DANS TON EXEMPLE)déverrouiller les TexTbox 1 - 9 seulement avant la validation !!!!!!
MERCI

 

Vote positif 0 Vote négatif

Pierrot93

XLDnaute Barbatruc

• 26 Octobre 2015

• #19

Re : Verrouillage des TextBoxs d'un USF selon la valeur d'un TextBox d'un autre USF

Re,

pour les déverrouiller, modifie cette instruction :

Code:

Me.Controls("textbox" & i).Enabled = True

 

Vote positif 0 Vote négatif

S

Si...

XLDnaute Barbatruc

• 26 Octobre 2015

• #20

Re : Verrouillage des TextBoxs d'un USF selon la valeur d'un TextBox d'un autre USF

salut

tu peux broder autour de
'Userform1 avec une liste déroulante

Code:

Private Sub UserForm_Initialize()
  For n = 1 To 32: ComboBox1.AddItem n: Next
End Sub
Private Sub ComboBox1_Click()
  UserForm2.Show
End Sub

'Userform2 avec des contrôles bien nommés

Code:

Private Sub UserForm_Initialize()
   For i = 1 To UserForm1.ComboBox1
     Me("Label" & i).Visible = 1: Me("textbox" & i).Visible = 1
   Next
   Unload UserForm1
End Sub

nota : j'ai pris plutôt la propriété "Visible"

Je ne sais pas si beaucoup le savent : quand on a une liste déroulante importante, pour accéder aux derniers items, il sufft d'en sélectionner un et de déplacer la souris en gardant le bouton gauche enfoncé !

 

Pièces jointes

• textbox accessible si.xlsm

  23.2 KB · Affichages: 29

Vote positif 0 Vote négatif

chaelie2015

XLDnaute Accro

• 27 Octobre 2015

• #21

Re : Verrouillage des TextBoxs d'un USF selon la valeur d'un TextBox d'un autre USF

Bonjour Pierrot, SI
MERCI pour les réponses, concernant la proposition de SI est ce que il y a une possibilité de Re dimensionner USF2 selon la valeur TextBox 10 de USF1
si la valeur de TextBox10 de USF1 = 5 alors afficher les 5 TextBox seulement et la taille de USF2 se change?
Merci par avance

 

Vote positif 0 Vote négatif

L

laetitia90

XLDnaute Barbatruc

• 27 Octobre 2015

• #22

Re : Verrouillage des TextBoxs d'un USF selon la valeur d'un TextBox d'un autre USF

re tous🙂🙂
un essai avec des frames.... 2 variables a adapter 13 & 60 voir avec resolution ecran ....repris code a l'ami SI🙂 avec combo

code assez brut.... mais bon même pas eu un petit bonjour😡 pas trop me casser la tête😉 pour faire plus dyna...

 

Pièces jointes

• frame.xlsm

  28.1 KB · Affichages: 32
• frame.xlsm

  28.1 KB · Affichages: 32

Vote positif 0 Vote négatif

S

Si...

XLDnaute Barbatruc

• 28 Octobre 2015

• #23

Re : Verrouillage des TextBoxs d'un USF selon la valeur d'un TextBox d'un autre USF

Re

Bonsoir Laetitia 😀😉

Un autre exemple (avec les contrôles bien positionnés).

Nota : je ne comprends pas pourquoi je vois autant de boutons "Quitter" alors qu'il y a la croix pour se faire. Il est quand même simple de modifier le bandeau pour la faire disparaître mais, dans ce cas, le nouveau bouton s'impose !

 

Pièces jointes

• textbox accessible si 6.xlsm

  27.5 KB · Affichages: 21

Vote positif 0 Vote négatif

chaelie2015

XLDnaute Accro

• 28 Octobre 2015

• #24

Re : Verrouillage des TextBoxs d'un USF selon la valeur d'un TextBox d'un autre USF

Bonjour Laetitia , SI
c'est nickel, superb 'c'est exactement ce que je cherchais,
MERCI
PBLM RESOLU

 

Vote positif 0 Vote négatif