Recopie d'une cellule vers un TextBox

[zeltron24]

Bonsoir à vous tous,

Une fois encore je me permets de soliciter votre aide.
Je ne retrouve plus la manière de recopier la valeur d'une cellule dans un textbox.
J'utilise la formule suivante :
FrmRubriques.BoxBas021022.Value = Range("I3") Mais cela ne fonctionne pas?
quelqu'un peut il svp me donner la solution.
Doit on sélectionner la feuille ?

Mais il faut savoir que j'ai 12 feuilles et que le formulaire ne doit concerner que la feuille active bien qu'il peut etre utilisé pour les 12 feuilles.

Merci d'avance.
Cordialement zeltron24

 

[Papou-net]

Re : Recopie d'une cellule vers un TextBox

Mais il faut savoir que j'ai 12 feuilles et que le formulaire ne doit concerner que la feuille active bien qu'il peut etre utilisé pour les 12 feuilles.

Bonsoir zeltron24,

Dans ce cas, essaie de cette façon :

FrmRubriques.BoxBas021022.Value = ActiveSheet.Range("I3")

Espérant avoir répondu.

Cordialement.

 

[zeltron24]

Re : Recopie d'une cellule vers un TextBox

Bonsoir à tous,

je désire automatiser le classeur.
Pour cela, je dispose d'une feuille "Rubriques" ou se trouve les valeurs à recopier.
J'ai donc 12 feuilles (1 par mois) avec un bouton qui m'ouvre un formulaire. Dans celui ci je désire inscrire dans un TextBox les valeurs de la feuille "Rubriques"

Sheets("Rubriques").Activate
FrmRubriques.BoxBas021022.Value = Range("E6")

ces valeurs ainsi recopiées dans les TextBox doivent ensuite etre recopier dans la feuille active hors elles sont copiées dans la feuille "Rubriques"
Comment recopier ces valeurs dans la feuille du mois activé ?

ex: la feuille active est "Février" je clique sur le bouton Enregistrer qui m'ouvre le formulaire "FrmRubriques" avec les valeurs de la feuilles "Rubriques" inscrites dans les TxtBox.
Je valide par le bouton valider et je dois retrouver ces valeurs dans la feuille "Février"
Merci pour votre aide.
zeltron24

 

[zeltron24]

Re : Recopie d'une cellule vers un TextBox

Re

Voici un extrait du classeur pour plus de clareté.

Dans l'attente Merci

 

[Papou-net]

Re : Recopie d'une cellule vers un TextBox

Bonsoir zeltron24,

Regarde si le fichier modifié correspond à ton besoin.

J'ai ajouté une variable publique (FeuilIndex) qui stocke le numéro d'index de la feuille depuis laquelle on a cliqué sur le bouton. Puis on rappelle cet index dans la macro du bouton d'enregistrement du formulaire.

Espérant avoir répondu.

Cordialement.

 

[zeltron24]

Re : Recopie d'une cellule vers un TextBox

Bonsoir Papou-net,

Tout d'abord, Merci pour ton aide.
J'ai mis après le

End With.
[COLOR="Red"]Sheets(FeuilIndex).Range ("A1")[/COLOR]

Mais cela ne fonctionne pas.
Car je désire une fois validé l'enregistrement revenir sur la feuille d'appel du formulaire.

Ex: Si j'étais sur Janvier lorque j'enregistre mon formulaire, je dois revenir sur janvier. Hors je reviens sur la feuille "Rubriques"
Peux tu me trouver SVP la clé.
D'avance merci
Cordialement
Guy

 

[Papou-net]

Re : Recopie d'une cellule vers un TextBox

Bonsoir Papou-net,

Tout d'abord, Merci pour ton aide.
J'ai mis après le

End With.
[COLOR="Red"]Sheets(FeuilIndex).Range ("A1")[/COLOR]

Mais cela ne fonctionne pas.
Car je désire une fois validé l'enregistrement revenir sur la feuille d'appel du formulaire.

Ex: Si j'étais sur Janvier lorque j'enregistre mon formulaire, je dois revenir sur janvier. Hors je reviens sur la feuille "Rubriques"
Peux tu me trouver SVP la clé.
D'avance merci
Cordialement
Guy

Bonsoir zeltron24,

Tu oublies simplement de mettre select :

Sheets(FeuilIndex).Range ("A1").select

ou plus simplement :

Sheets(FeuilIndex).Select

si tu désires retrouver la dernière cellule sélectionnée.

Cordialement

 

[zeltron24]

Re : Recopie d'une cellule vers un TextBox

Bonsoir Papou-net,

La première solution que tu proposes ne fonctionne pas, par contre la seconde est bonne.

De plus j'ai constaté que lors de la recopie des valeurs de la feuille "Rubriques" dans les TxtBox du formulaire la virgule se transforme en point ce qui me donne une erreur (#valeur!) dans l'opération de la feuille ou on était copié ces valeurs.
Peut on remédier à cela.
De plus la recopie des valeurs de la feuille "rubriques" ne se fait pas toujours. Je suis obligé de refermer le formulaire et de le réouvrir plusieurs fois à la suite.
Je te joint le fichier.
Merci encore pour le suivi de mon problème. C'est super sympa.