Discussion :

[rimked]

Bonjour j'ai plusieurs probleme sur exel si quelqu'un peut m'aider je le remercie par avance meme pour 1 question alors j explqiue mes problemes


1)Comment faire pour ques des infos disponible dans un usurforme (et saisie par l individu) puisse etre reporter sur un autre usurforme mais ce dernier comporte d autre informations (que je souhaite calculer).

2) Comment faire pour que des saisie a partir d un usurforme puisse etre placer sous les precedante. j m explique j ai reussi a retransmettre les info de mon usurforme sur la feuille exel mais je souhaoite que c dernier puisse etre enregister sur ma feuille exel et qu une nvelle saisie puisse etre enregistre a la suite

voici ce que j ai fait
Sheets("Go Crédit").Range("A11").Value = Me.TextBox3.Text
'ce qui me permet de la fffichera la cellule A11 mais comment faire pour que la nouvelle saisie aille en dessous soit en cellule A12'
merci davance

[Qwazerty]

SAlut
c'est claire comme du jus de chic.
Ce que j'en comprend c'est que tu as une zone de text sur un userform et que quand tu appui sur un bouton tu veux mettre la valeur saisi dans un tableau.
Et qu'a chaque nouvel appui sur le bouton tu ailles 1 cellule plus bas.
Tu as au moins de choix possible.
Je pense que le plus simple est le suivant, tu regarde le 1ere case vide et tu y met ta valeur

Code :

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

 Sheets("Go Crédit").cells(rows.count,"A").End(XlUp) := me.TextBox3.Text

Pour le reste explique un peu plus ce que tu veux ou mieux, met carrement un fichier exemple
A++
Qwaz

[Edit]
Ps: change le topic de ton sujet et met en un en rapport avec ta question
[/Edit]

[rimked]

je n'est pas encore essayé mais avant de m'y hater je vais mieux expliquer

Je dispose de mon premier usurforme (frmCredit) et d'un deuxieme usurforme (frmReponse) je souhaite plus precissiment que des infos saisie sur l usurforme frmcredit soit representer sur mon deuxieme uniforme (frmreponse) apres avoir valider sur un bouton.

'Commnande permettant de passer au deuxieme usurforme (frmReponse)
frmReponse.Show

'je vaiy agouter la commande que tu m a donner pour que les infos saisie y apparaisse sur la feuille exel'

MAIS comment faire pour que les infos saisie sur cette usurforme (frmCredit)) apparaise sur le second (frmReponse) (ces inforamtion sont le nom prenom ect....)




je profite pour demander auytre chose

Comment faire pour effectuer un calcul automatiquement cad apres la saisie des informations necesaire pour le calcul par l utulisateur


sachant que le calcul ets le suivant

Sub textTotal_Change()
TextTotal = TextMontant(1 + TextTaux) * TextDuree
End Sub

ait-je ete asser clair ??????????


merci d avance

[Qwazerty]

Re
Pour transmettre les valeurs d'un UserForme a l'autre tu fait comme ca dans le bouton

Code :

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

1
2
3
4
5
6
 'tu t'assure que t'as form est chargée
Load frmReponse 
 
'Tu recupert alors les valeurs
frmReponse.TextBox1.Text = TextBox1.text 'le 2eme c'est le textbox qui se trouve sur la fenetre en cours Me. est facultatif
[...] 'Pareil pour les autre controle

A++
Qwaz

[Qwazerty]

Pour les calculs c'est comme ca, il faut convertir les donné text en données numeric. Attention de bien controler avant que les données soit numeric

Code :

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

1
2
3
4
 'On test si les données sont numeric 
If IsNumeric(TextBox1.Text) And IsNumeric(TextBox2.Text) Then
  TextBox3.Text = CStr(CSng(TextBox1.Text) + CSng(TextBox2.Text))
End If

Pour affiner un peu le truc tu peux controler que l'utilisateur utilise bien le bon separateur decimal, regarde dans les topic precedent la question a deja ete traité

A++
Qwaz

[rimked]

re
Je tenais deja a te remercier pour ton aide (je suis vraiment perdu)

Pour les calcule je vais essayer masi revenons a mon probleme de formulaire je n arrive tjs pas a faire en sorte que les donnee inscrit sur mon formulaire cerdit apparauisse sur mon formulaire reponse
voila ce que j ai fait (je suis novice dsl il faut faire calmement)

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
16
17
18
19
20
21
22
23
24
25
26
Private Sub cmdValider_Click()
 
Load frmReponse
 
'Commnande permettant de passer au deuxieme usurforme (frmReponse)
 
frmReponse.Show
 
'Commande permettant d'afficher sur la feuille exel toutes les informations saisient par l'utulisateur'
Sheets("Go Crédit").Cells(Rows.Count, "A").End(xlUp) = Me.TextStatut.Text
Sheets("Go Crédit").Cells(Rows.Count, "B").End(xlUp) = Me.TextNom.Text
Sheets("Go Crédit").Cells(Rows.Count, "C").End(xlUp) = Me.TextBox2.Text
Sheets("Go Crédit").Cells(Rows.Count, "D").End(xlUp) = Me.TextMontant.Text
Sheets("Go Crédit").Cells(Rows.Count, "E").End(xlUp) = Me.TextDurée.Text
Sheets("Go Crédit").Cells(Rows.Count, "F").End(xlUp) = Me.TextTaux.Text
 
 
frmReponse.TextNom.Text = TextNom.Text
frmReponse.TextStatut.Text = TextStatut.Text
frmReponse.TextTaux.Text = TextInteret.Text
frmReponse.TextMontant.Text = TextMontant.Text
frmReponse.TextDurée.Text = TextDurée.Text
 
 
Unload Me
End Sub

Je t'EXPLIQUE je desire saiir des infos (ds le formulaire frmcredit) qui vont automatiquement dans le deuxieme formulaire (frmreponse) puis ces donnes doivnet etre inscrit sur ma feuille exel mais chaque nouvelle saisie doivent etre ecrite l une en dessous de lautre


j espere etre asser clair et encore merci d avance je desssespere depuis plusieurs jours