copier coller via USF

[chaelie2015]

Bonjour Forum
Je souhaite copie les données de feuille 1 automatiquement Vers TextBox USF1
(L3 versTextBox1 de USF1 et U3 versTextBox2 de USF1 et J10 versTextBox3 de USF1 et le reste de TextBox4 et 5 de USF1 vide ( pour éventuelle saisie)
Dans ce dernier USF1 , lors de validation par bouton « Valider » je souhaite encore coller ces données de TEXTBOX vers une autre Feuille 2 ( vers les cellule respectivement E16 , E14 , N28 , E18 et E20 ) et lancer apres l’impression de la feuille 2
SALUTATIONS

 

[Lolote83]

Re : copier coller via USF

Salut Chaelie2015,
Concernant le première partie

Je souhaite copie les données de feuille 1 automatiquement Vers TextBox USF1
(L3 versTextBox1 de USF1 et U3 versTextBox2 de USF1 et J10 versTextBox3 de USF1 et le reste de TextBox4 et 5 de USF1 vide ( pour éventuelle saisie)

With sheets("Feuille1")
TextBox1=.[L3]
TextBox2=.[U3]
TextBox3=.[J10]
End with

Concernant la seconde partie

Dans ce dernier USF1 , lors de validation par bouton « Valider » je souhaite encore coller ces données de TEXTBOX vers une autre Feuille 2 ( vers les cellule respectivement E16 , E14 , N28 , E18 et E20 ) et lancer apres l’impression de la feuille 2

Private Sub Cmd_Valider_Click()
With sheets("Feuille2")
.[E16]=TextBox1
.[E14]=TextBox2
.[N28]=TextBox3
.[E18]=TextBox4
.[E20]=TextBox5
end with
end sub

Code non testé car saisie directement ici et a adapter pour correspondance des onglets et bouton valider
@+ Lolote83

 

[chaelie2015]

Re : copier coller via USF

Bonjour LOlote83
merci d'avoir répondu a mon souci et merci pour la réponse rapide ça fonctionne parfaitement et si vous permettez autre question :
pour le code2

Private Sub UserForm_Initialize()
With Sheets("Feuille1")
TextBox1 = .[L3]
TextBox2 = .[U3]
TextBox3 = .[J10]
End With
End Sub

je souhaite a ce niveau de changer le nom de la feuille1 par la feuille active qlq soit le nom de l'onglet (essentiel c'est la feuille active)
Salutions

 

[Lolote83]

Re : copier coller via USF

Re salut,

je souhaite a ce niveau de changer le nom de la feuille1 par la feuille active qlq soit le nom de l'onglet (essentiel c'est la feuille active)

Essaye avec :

With ActiveSheet

Code toujours pas testé !!!!
@+ Lolote83

 

[chaelie2015]

Re : copier coller via USF

Re Lolote83
encore merci pour les réponse, mais après avoir adapter a mon application ( plusieurs code merci BENEVOLS)
Quand je clic sur le bouton "Imprimer",la feuille s'imprime et une fois je clic sur le bouton "RETOUR" de la feuille pour aller vers la feuille principale "KDT-TVX" le classeur ce bug
merci par avance.
ci joint le fichier
Document Cjoint
SALUTATIONS

 

[chaelie2015]

Re : copier coller via USF

Bonjour Forum
Je souhaite copie les données de feuille 1 automatiquement Vers TextBox USF1
(L3 versTextBox1 de USF1 et U3 versTextBox2 de USF1 et J10 versTextBox3 de USF1 et le reste de TextBox4 et 5 de USF1 vide ( pour éventuelle saisie)
Dans ce dernier USF1 , lors de validation par bouton « Valider » je souhaite encore coller ces données de TEXTBOX vers une autre Feuille 2 ( vers les cellule respectivement E16 , E14 , N28 , E18 et E20 ) et lancer après l’impression de la feuille 2
SALUTATIONS

Re
plus éclaircissement la feuille 2 dans mon fichier c'est la feuille"Type" a partir de laquelle on va créer des feuille qui seront nommée automatiquement et masquées.
et la feuille 2 c'est la feuille nommée"Note"
voila, et dans la feuille qui va être crée automatiquement il y a un bouton "Imprimer" ce dernier va lancer l'impression de la feuille"Note"
j’espère d’être clair😱
merci par avance 😱
Salutations

 

[chaelie2015]

Re : copier coller via USF

Bonjour forum
Je souhaite avoir votre aide SVP
Merci par avance
Salutations

 

[Lolote83]

Re : copier coller via USF

Salut,
Peux tu rejoindre ton fichier via ExcelDownloads, ton premier lien ne fonctionne pas.
@+ Lolote83

 

[chaelie2015]

Re : copier coller via USF

Bonjour Furum, Lolote83
C'est bizard, alors comment je fais pour le rejoindre sous forme Rar ?( ca capacité dépasse 300K)
Salutations

 

[Lolote83]

Re : copier coller via USF

Re,
Même un fois compressé, ton fichier dépasse la capacité autorisée par le site.
Si tu regardes plus bas, clic sur le bouton "Gérer les pièces jointes", et tu as les capacité maximales autorisée.
Clic alors sur parcourir pour joindre ton fichier et ensuite envoyer
Voir images jointes
@+ Lolote83

 

[chaelie2015]

Re : copier coller via USF

Re,
Même un fois compressé, ton fichier dépasse la capacité autorisée par le site.
Si tu regardes plus bas, clic sur le bouton "Gérer les pièces jointes", et tu as les capacité maximales autorisée.
Clic alors sur parcourir pour joindre ton fichier et ensuite envoyer
Voir images jointes
@+ Lolote83

Re
merci pour ces détails, je sais faire ça mais l'extension de mon fichier est de .rar, elle n'est pas autorisée
SALUTATIONS

 

[Lolote83]

Re : copier coller via USF

Re, tu ne peux pas le zipper avec WinZip ou 7Zip, ou est-ce que tu ne peux pas choisir quand tu zippes ton fichier de choisir une autre extension ????
@+ Lolote83

 

[chaelie2015]

Re : copier coller via USF

Re
ci joint le fichier ZIP2 en fin
Salutations

 

[Lolote83]

Re : copier coller via USF

Re salut,
Merci pour le fichier.
Aucun problème rencontré chez moi.
- Clic sur imprimer de la feuille Type = ouverture du formularire
- Remplissage des champs du formulaire
- Clic sur Imprimer = La feuille Note s'imprime sans problème + fermeture formulaire
- Clic sur Retour, RAS
@+ Lolote83

 

[chaelie2015]

Re : copier coller via USF

Re
c'est moi qui te remercie pour le fichier.
créer un nom dans la feuille principale "KDT-TVX" example (1/KDT/2015)
apres aller vers cette nouvelle onglet (1-KDT-2015)par Combobox dans la feuille Principle
apres tu fais les memes etapes que tu as fait dans le post# 14 mais avec la nouvelle feuille(1-KDT-2015)
et vous allez voir que l'excel vas redemarer ??????
MERCI PAR AVANCE
SALUTATIONS