Bonjour,
Mon souci n’est pas purement du domaine du VBA Excel mais je tente ma chance.
Dans mon projet, un code crée automatiquement autant de TextBox que le nombre variable de colonnes d’un onglet.
Pour une question de place dans le UserForm, ces TextBox sont logés dans un Frame, groupés par ligne de 5. Mon problème est de déterminer la propriété « Top » pour chaque ligne de 5 TextBox. Pour 2 lignes, pas de problème, mais depuis plusieurs jours que je sèche pour trouver la formule qui permet l’insertion de 3 lignes de TextBox et plus (onglet de plus de 10 colonnes).
Si quelqu’un est inspiré, je suis preneur.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15 Dim a NbCol = [Tableau1].Columns.Count For b2 = 1 To NbCol n = n + 1 a = Me.Frame10.Controls.Add("Forms.TextBox.1", "TextBox" & b2, True) If n < 6 Then Me("TextBox" & b2).Top = 30 Me("TextBox" & b2).Left = 6 + (b2 - 1) * 120 Else Me("TextBox" & b2).Top = 30 * 2 Me("TextBox" & b2).Left = 6 + (b2 - 7) * 120 End If Me("TextBox" & b2).Width = 115 Next b2 n = 0
Partager