Copier coller plusieurs texte à l'aide de case à cocher.

Résolu/Fermé
gui_tou77 Messages postés 15 Date d'inscription mercredi 26 février 2014 Statut Membre Dernière intervention 26 juin 2020 - Modifié par gui_tou77 le 28/10/2014 à 18:47
gui_tou77 Messages postés 15 Date d'inscription mercredi 26 février 2014 Statut Membre Dernière intervention 26 juin 2020 - 29 oct. 2014 à 17:19
Bonjour,

Pour mon travail, j'aimerai réaliser un excel (2007) qui me permet, à l'aide de case à cocher, de remplir deux cases de différentes phrases (plutôt longues), et par un copier le coller dans un autre logiciel (à la main).
Pour une explication j'ai réalisé un excel pour représenter mes besoins.
En gros je dois cliquer sur plusieurs case à cocher sur un choix de 15 propositions, toujours les même, qui à pour effet d'aller chercher le texte de la cellule qui correspond a la case cochée (onglet DATA) et de le coller dans la bonne case de destination (ongle fram1).
Les phrases collées dans les cases de destination doivent s'ajouter à la suite des autres (trvx 1 trvx 2 ,...)

Fichier -> https://www.cjoint.com/?DJCo0lv1iRz

En vous remerciant par avance de votre aide.
A voir également:

12 réponses

f894009 Messages postés 17185 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 15 avril 2024 1 701
29 oct. 2014 à 08:27
Bonjour,

Pas tres claire votre explication sur les phrases:

< doit remplir phrase 1 dans trvx et phrase 2 dans materiel ???????

a quoi sert la colonne marteriel dans DATA ?????
0
gui_tou77 Messages postés 15 Date d'inscription mercredi 26 février 2014 Statut Membre Dernière intervention 26 juin 2020
29 oct. 2014 à 08:43
Bonjour,

Excusez moi, pas toujours très simple d'expliquer.

Alors, lorsque je clique sur la case à cocher "A" les phrases dans "data" (trvx 1 et mat1) vont respectivement dans les cases "J6" et "J13" de l'onglet "Fram1".

Si je clique sur la case à cocher "B" ou "C",.... je veux que les phrases dans l'onglet "data" s'ajoute après les phrases existante (par exemple dans la cellule"J6" trvx1 trvx 2 trvx 3 ,...).

Le but est que pour mon travail je dois remplir des cases "travaux" et "materiel" dans un logiciel de mon boulot, et j'aimerai trouver un moyen de m'aider à remplir rapidement ces cases à l'aide de sélection (case à cocher).

Merci
0
f894009 Messages postés 17185 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 15 avril 2024 1 701
29 oct. 2014 à 08:54
Re,

Merci pour l'explication. En cas d'erreur de "cochage", que doit-il se passez ????
0
gui_tou77 Messages postés 15 Date d'inscription mercredi 26 février 2014 Statut Membre Dernière intervention 26 juin 2020
29 oct. 2014 à 09:00
Re,

Si on clique -> copie dans les cellules concernés dans "Fram1"

Si on dé clique -> cela supprime les phrases de la case à cocher concernée.
0

Vous n’avez pas trouvé la réponse que vous recherchez ?

Posez votre question
f894009 Messages postés 17185 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 15 avril 2024 1 701
29 oct. 2014 à 09:04
Re,

je regarde la chose

A+
0
gui_tou77 Messages postés 15 Date d'inscription mercredi 26 février 2014 Statut Membre Dernière intervention 26 juin 2020
29 oct. 2014 à 09:05
Merci beaucoup
0
f894009 Messages postés 17185 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 15 avril 2024 1 701
29 oct. 2014 à 10:24
Re,

fichier modifie code 8 cases a cocher(vous completerez pour aller a 15) et code complet pour copies,

clic case a cocher met/enleve trvx x et mat x dans cellules violettes

clic boutons Copie: remplit case vertes et copie pour collage ailleur

https://www.cjoint.com/c/DJDkDaGAVwW
0
gui_tou77 Messages postés 15 Date d'inscription mercredi 26 février 2014 Statut Membre Dernière intervention 26 juin 2020
29 oct. 2014 à 10:37
Parfait, merci pour ce beau travail.

Bonne journée
0
gui_tou77 Messages postés 15 Date d'inscription mercredi 26 février 2014 Statut Membre Dernière intervention 26 juin 2020
29 oct. 2014 à 16:37
J'ai de nouveau une petite question ^^

La fonction "copy" me met des guillemet et rend le collage pas très jolie.

Existe t-il lune autre fonction copié qui copie proprement le texte dans la cellule ?
J'entends propre pas de guillemet et pas d'espace avant ou après.
J'ai vu sur google la fonction SendKeys mais je n'arrive pas à la mettre en oeuvre.

Pour rappel le code :

Private Sub Cmd_TRVX_Click()
Dim Text_Trvx As String

Text_Trvx = ""
With Worksheets("Fram1")
For cel = 7 To 21
If .Cells(cel, 2) <> "" Then
Text_Trvx = Text_Trvx & .Cells(cel, 2) & vbNewLine
End If
Next cel
.Range("K6") = Text_Trvx
.Range("K6:Q21").Copy
End With
End Sub


Donc le besoin est de pouvoir copier le texte présent dans la cellule "K6" afin que je puisse le coller proprement dans mon logiciel interne à mon entreprise.

Encore merci :)
0
f894009 Messages postés 17185 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 15 avril 2024 1 701
29 oct. 2014 à 16:51
Re,

je regarde la chose

A+
0
f894009 Messages postés 17185 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 15 avril 2024 1 701
29 oct. 2014 à 17:12
Re,


fichier modifie "copie" sans "": https://www.cjoint.com/c/DJDrqW3dwir
0
gui_tou77 Messages postés 15 Date d'inscription mercredi 26 février 2014 Statut Membre Dernière intervention 26 juin 2020
29 oct. 2014 à 17:19
Magnifique,

merci encore et bonne soirée :)
0