3 problèmes débutant

Bonjour,

Je fais appelle à la comu' pour trouver de l'aide sur des soucis dans mon code.

J'ai trois soucis sur mon code :

- Le passage du UF_saisie à UF_Pz ne se fait pas en affichant le bon nombre de "Frame" (boite avec les données dans UF_Pz)

- J'ai tenté un code pour transférer les infos de mes Frame dans une autre feuille mais ça ne fonctionne pas :(

- Une question plus pratique, je travaille sur deux documents en parallèle et quand j'en ouvre un, l'autre s'ouvre automatiquement .. Pourquoi ?

Je débute et j'ai la tête comme un citron, si qqun peut me venir en aide

Merci !

Bonjour drôle de pseudo

1) le code de UF_saisie n'est pas correcte, il faut mettre

  For i = 1 To Val(Me.TextBox1.Value)
    UF_Pz.Controls("Frame" & i).Visible = True
  Next

"Frame" sans le 1

2) Il n'y a qu'un seul Frame donc attention à la boucle : 1 max

3) l'autre s'ouvre automatiquement

si un code est mis dans ce sens

A+

Bonjour,

Merci d'avoir pris le temps de réponde à mes questions.

J'ai tenté de modifier mon code car celui que j'avais ne fonctionnait pas. Je suis parti là dessus :

Private Sub UserForm_Initialize()
Dim i As Integer
Dim nbr_fr As Integer
For i = 1 To UF_saisie.TB_nbrpz.Value
UF_Pz.Controls("Frame" & i).Visible = True
Next

For nbr_fr = UF_saisie.TB_nbrpz.Value + 1 To 8
UF_Pz.Controls("Frame" & nbr_fr).Visible = False
'nbr_fr = nbr_fr + 1
Next
Unload UF_saisie

End Sub

Mais pas plus de réussite, c'est dur

Rechercher des sujets similaires à "problemes debutant"