Discussion :

[pikameuh]

Bonjour à tous les developpeurs,

Je cherche, si c'est possible, un moyen de modifier la largeur d'une InputBox car par defaut elle est trop petite pour mes besoins.

Merci de me répondre.

j'aimerais aussi pouvoir ajouter une ScrollBar dans cette InputBox pour faire défiler le contenue (string).

[rvtoulon]

Bonjour,
après une petite recherche sur le site je te recommande de lire ce post: A lire.
Une solution est proposée.

[pikameuh]

ok, ce n'est pas possible...

Il faut créer son propre formulaire. Mais là, je plante.

Je ne peux pas mettre de ScrollBar à un label, et un TexteBox non modifiable ne peut pas avoir de ScrollBar...

Je n'arrive pas à faire en sorte que mon formulaire (MyInputBox) revoit une valeur (comme une fonction)...

Quelqu'un aurait-il un model svp?

Personne n'as ça ?

Pour précision, j'éssaie, je dis bien j'éssaie, de faire une useForm contenant une textBox avec une scroll bar (car impossible avec un label). Qui predrait un String en parametre (le UseForm) et qui retournerait un Integer.

Merci de me répondre.

[rvtoulon]

Bonjour,
Pour la scrollbars je ferais comme ceci dans initialize de l'userform :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
Private Sub UserForm_Initialize()
With Me.TextBox1
  'ajout une scrollbars verticale à la texbox
  .ScrollBars = fmScrollBarsVertical
 
  'Permet d'avoir une textbox multiligne
  .MultiLine = True
 
  'va à la ligne en appuyant sur la touche Entrée
  .EnterKeyBehavior = True
 
End With
End Sub

EDIT: Toutefois je m'interroge sur la nécessité d'une textbox avec un scrollbar pour récupérer un Integer? Pour rappel voici ce que dit l'aide d'excel sur Integer:

Les variables de type Integer sont stockées sous la forme de nombres de 16 bits (2 octets) dont la valeur est comprise entre -32 768 et 32 767.