Discussion :

[nicolasdeloise]

Bonjour à tous,

Tout d'abord, desole mais je ne connais pas grand chose à VBA ... C'est donc pour ça que je me suis inscrit pour, si possible, avoir un coup de pouce.

Je viens de creer un Userform avec à l'interieur des "zone de texte"
J'aimerais retrouver ce que je met dans les zones de texte à l'interieur du tableau excel ... comment faire ?

De plus, en imaginant qu'il existe deja des valeurs sur excel, j'aimerais que les nouvelles que l'on rentre (via la fenetre Userform) se place en dessous des anciennes ... vous voyez ce que je veux dire ?

Merci

[SfJ5Rpw8]

plusieurs solutions ... si tu n'as aucune validation de saisie... à effectuer tu peu lier ta zone de texte à une cellule de ton classeur en modifiant sa propriété ControlSource tu y place par exemple : 'Feuil1'!A1

où tu utilise les procédures évenementielles liées à 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
14
 
'
' A l'ouverture de la feuille lecture
' mise à jour du textbox en fonction du contenu de la cellule A1
'
Private Sub UserForm_Activate()
  TextBox1 = ThisWorkbook.Sheets("Feuil1").Range("A1")
End Sub
'
' Sur la fermeture mise à jour de la cellule A1
'
Private Sub UserForm_QueryClose(Cancel As Integer, CloseMode As Integer)
ThisWorkbook.Sheets("Feuil1").Range("A1") = TextBox1
End Sub

à lire par exemple :
Utiliser les UserForm en VBA Excel

[nicolasdeloise]

Ummm desole mais je ne comprend vraiment rien a ce que tu me dis ....

Peux tu m'envoyer un ti mail pour m'expliquer ?

Je met ca ou la syntaxe ? a chaque zone de texte ?

[alsimbad]

salut nicholas
comme dis le proverbe
donne a manger a un homme, il mangera
apprend lui a pecher, il mangera toute sa vie
en gros quand tu crée toon usf, tu dois créer une procedure qui l'initialise
dans ton cas par exemple et pour faire simple, tu crée un bouton sur ta feuille de calcul qui lance l'usf. a ce bouton, tu affecte une macro qui vas dire a ton usf ce qu'il doit contenir

Code :

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

1
2
3
4
5
sub montrer
userform(1) show
textbox(1) = cellule a1
textbox(2) = cellule b1
end sub

esuite sur la feuille de création de ton usf, tu va créer les macros qui vont agir quand tu clique sur tes controles. disons que tu a déssiner une usf avec 2 textbox et un bouton ok
tu clique 2 fois sur le bouton et tu accedera au code lié a ce bouton
la tu lui dis ce qu'il doit faire. admetons que tu veuille écrire ce que tu placera dans les textbox a la ligne du dessous

Code :

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

1
2
3
4
5
sub bouton_quand_clic
cellule a2 = textbox1.value
cellule b2 = textbox2.value
userform1.hide 
end sub

au résultat, quand tu lance l'usf, tu vois le contenu de tes cellules sur les textbox, et quand tu les modifie et que tu valides, la nouvelle valeur est écrite en dessous.
ça c'est le principe, aprés faut t'adapter, utiliser sans reserve la touche F1 et APPRENDRE.
maintenant, tu devrais mieux comprendre les codes de bbil

[Theocourant]

salut nicholas
comme dis le proverbe
donne a manger a un homme, il mangera
apprend lui a pecher, il mangera toute sa vie
en gros quand tu crée toon usf, tu dois créer une procedure qui l'initialise
dans ton cas par exemple et pour faire simple, tu crée un bouton sur ta feuille de calcul qui lance l'usf. a ce bouton, tu affecte une macro qui vas dire a ton usf ce qu'il doit contenir

Code VB :

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

1
2
3
4
5
sub montrer
   userform(1) show
   textbox(1) = cellule a1
   textbox(2) = cellule b1
end sub

esuite sur la feuille de création de ton usf, tu va créer les macros qui vont agir quand tu clique sur tes controles. disons que tu a déssiner une usf avec 2 textbox et un bouton ok
tu clique 2 fois sur le bouton et tu accedera au code lié a ce bouton
la tu lui dis ce qu'il doit faire. admetons que tu veuille écrire ce que tu placera dans les textbox a la ligne du dessous

Code VB :

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

1
2
3
4
5
sub bouton_quand_clic
   cellule a2 = textbox1.value
   cellule b2 = textbox2.value
   userform1.hide 
end sub

au résultat, quand tu lance l'usf, tu vois le contenu de tes cellules sur les textbox, et quand tu les modifie et que tu valides, la nouvelle valeur est écrite en dessous.
ça c'est le principe, aprés faut t'adapter, utiliser sans reserve la touche F1 et APPRENDRE.
maintenant, tu devrais mieux comprendre les codes de bbil

Merci d'utiliser les balises cela rendra aussi votre code lisible. (cf votre message en citation)

Théo

[alsimbad]

désolé théo, mais c'est pas vraiment du code, c'est une version litérale, plutot destinée a me faire comprendre

[AlainTech]

Même le pseudo code, il vaut mieux le mettre entre balises.
Ca rend le message nettement plus lisible.