Discussion :

[jmlancon]

Bonjour,

Bonsoir,
je suis debutant et je galère !

un premier Formulaire me permet d'envoyer vers ma feuille de calcul des constantes et par un bouton

Code :

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

1
2
3
feuille.Range("b2") = VOLUME.Value (idem 5X)
    FORMNitrox.Hide
    formRESULTAT.Show

un second formulaire renvoit dans une textbox le resutat d'opération multiples.
jusque là tout vas bien.

mon bouton retour

Code :

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

1
2
Unload formRESULTAT
FORMsaisie.Show

me permet de revenir saisir d'autres constantes dans le formulaire de saisie.

Lors du second retour, ma textbox (propriété controlsource= feuille!d22) écrase la formule contenue dans ma feuille en cellule D22, en rempalcant la formule par le resultat mémorisé dans la textbox.
du coup après ça ne marche plus puisque plus de formule.

Qui peut m'aider ?
Est ce que ça vient d'absence de réinitialisation ? du choix d'un textbox ? j'ai essayé form.hide ou protection des cellules mais sans succès.
Déjà posé la question sur deux autres forums sans réponse alors merci d'avance.
JML

[JackOuYA]

Bonsoir,


si je comprends bien tu utilise la propriété controlSource, pour renseigner ton text box.?
si celui-ci ne doit pas toujours être le reflet de ta cellule D22, n'utilise pas ce ControlSource, et met à jour directement la donnée dans ton text box :

dans l'initialisation de ton userform :

Code :

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

1
2
3
Private Sub UserForm_Initialize()
Textbox = feuille!d22
..

par exemple

puis copie dans l'autre sens lors de l'action sur ton bouton..

[jmlancon]

Jacques, merci de ta réponde.
voici ce que j'ai tapé après avoir supprimé les élements du controlsource

Code :

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

1
2
3
4
5
6
Private Sub formresultatnitrox_INITIALIZE()
oxypur = NITROX!d22
air = NITROX!d25
profmax = NITROX!d22
profurg = NITROX!d24
End Sub

du coup rien ne s'affiche plus...

en fait le probleme vient peut etre d'ailleurs. Pour simplifier je vais prendre un exemple.

j'ai en A1 saisie une valeur 1000
hors quand je tape en A2 =A1 je devrais avoir 1000 mais en cliquant sur la cellule A2 je devrais retrouver =A1
Hors de temps en temps je ne retrouve plus =A1 mais le resultat de ma formule soit 1000 dans mon exemple.
Pourquoi ma formule est écrasée par le resultat de cette formule ?

c'est sans doute pour ça que ma textbox fini par m'envoyer le mauvais resultat. merci d'avance si tu as une idée sur l'origine du phénomène.

JML

[JackOuYA]

bonsoir,


bon j'ai pas tout relu ... manque balise de codes c'est illisible, cependant pour les actions événemetielles d'un userform, le nom est toujours UserForm_... quelque chose, tu ne dois pas le changer en fonction du nom de ta form, tu n'as même pas besoin de le saisir choisi seulement ce nom dans les deux combobox en haut de ta fenêtre d'édition VBA..

[jmlancon]

Jacques
J'avais fait deux copies d'ecran si ça pouvait aider pour les codes complets
mais pas moyen de joindre
Dommage, Merci quand même.
JML