Discussion :

[Dorel.D]

Bonjour
comment allez vous, je suis nouveau ici

j'ai un soucis
j'ai un userform avec plusieurs feuilles que je veux remplir a partir de mon userform
j'ai donc crée un combobox qui lie toutes les feuilles et qui me permet aussi de les afficher avec cette formule simple :

Code :

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

1
2
3
Private Sub combobox2_change ()
    Sheets(combobox2.text).select
End Sub

le problème ici est que je voudrais enregistrer les informations rentrées dans le userform sur La feuille qui s'affiche lorsque j'utilise le combobox de sélection des feuilles .
J'ai cherché des méthodes sans trouver raison pour laquelle je suis ici pour apprendre mieux. Aidez moi a enregistrer dans la feuille que je veux a partir de mon combobox.
Merci de bien vouloir m'aider

[révèr]

Bonjour Dorel.D,

Il est conseillé d'éviter les .Select, cela peut entraîner de nombreuses erreurs.

Tu n'as pas besoin de sélectionner la feuille souhaitée pour y renseigner les données.

Au lieu d'effectuer un Select comme tu le fais, je te conseille plutôt d'intégrer les données comme suit :

Code :

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

Sheets(ComboBox2.Text).Range("A1").Value = ...

[Dorel.D]

Le probleme ici est que c'est assez de feuille dans lesquels je voudrais enregistrer des données précises.
Par exemple Un classeur client avec des feuilles "ERIC" ; "STEPHANE" ; "FLEUR"
je veux pouvoir entrer les information de chaque client dans une feuille qui porte le nom du client.

raison pour laquelle je selectionne en premier la feuille et quand ça s'affiche, je veux pouvoir placer les informations dans la feuille ouverte.
Peut.etre que je devrais remplacer ma feuille par activesheets.range en faisant par exemple

activesheets.range("c" & ligne).text


MErci de votre prochaine reponse

[révèr]

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
 
Dim Ws As Worksheet
 
Set Ws = Sheets(ComboBox2.Text)
 
'Tu manipules comme suit
 
With Ws
   .Range("A1") = "Je"
   .Range("A2") = "Pense"
   .Range("A3") = "Que ça"
   .Range("A4") = "Devrait"
   .Range("A5") = "Fonctionner"
End With

Je m'essaie à l'humour pour me détendre en ce délicieux pré-week-end

[Dorel.D]

Pardon mais je met ça dans mon bouton valider ou dans mon combobox ?

Vraiment désolé pour la question. je suis tellement perdu actuellement

[révèr]

Alors, de mon point de vue je te dirai de l'intégrer dans le bouton de Validation. En effet, si tu le glisses dans l'événement ComboBox2_Change il s'effectuera à chaque changement. Mieux vaut avoir la confirmation de l'utilisateur avant d'incorporer des valeurs dans un tableur.

Dans l'idée : Choix du nom avec la ComboBox - écriture des données que tu souhaites y inscrire - Tout cela à travers ton formulaire. Une fois toutes les données inscrites et le nom choisi, tu cliques sur ton bouton de Validation et cela les inscrira dans la feuille portant le nom inscrit dans ta ComboBox