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
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
A voir également:
- Case cochée word copier coller
- Supprimer une page word - Guide
- Espace insécable word - Guide
- Copier coller pdf - Guide
- Organigramme word - Guide
- Copier une vidéo youtube - Guide
12 réponses
f894009
Messages postés
17180
Date d'inscription
dimanche 25 novembre 2007
Statut
Membre
Dernière intervention
27 février 2024
1 701
29 oct. 2014 à 08:27
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 ?????
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 ?????
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
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
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
f894009
Messages postés
17180
Date d'inscription
dimanche 25 novembre 2007
Statut
Membre
Dernière intervention
27 février 2024
1 701
29 oct. 2014 à 08:54
29 oct. 2014 à 08:54
Re,
Merci pour l'explication. En cas d'erreur de "cochage", que doit-il se passez ????
Merci pour l'explication. En cas d'erreur de "cochage", que doit-il se passez ????
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
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.
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.
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question
f894009
Messages postés
17180
Date d'inscription
dimanche 25 novembre 2007
Statut
Membre
Dernière intervention
27 février 2024
1 701
29 oct. 2014 à 09:04
29 oct. 2014 à 09:04
Re,
je regarde la chose
A+
je regarde la chose
A+
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
29 oct. 2014 à 09:05
Merci beaucoup
f894009
Messages postés
17180
Date d'inscription
dimanche 25 novembre 2007
Statut
Membre
Dernière intervention
27 février 2024
1 701
29 oct. 2014 à 10:24
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
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
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
29 oct. 2014 à 10:37
Parfait, merci pour ce beau travail.
Bonne journée
Bonne journée
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
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 :
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 :)
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 :)
f894009
Messages postés
17180
Date d'inscription
dimanche 25 novembre 2007
Statut
Membre
Dernière intervention
27 février 2024
1 701
29 oct. 2014 à 16:51
29 oct. 2014 à 16:51
Re,
je regarde la chose
A+
je regarde la chose
A+
f894009
Messages postés
17180
Date d'inscription
dimanche 25 novembre 2007
Statut
Membre
Dernière intervention
27 février 2024
1 701
29 oct. 2014 à 17:12
29 oct. 2014 à 17:12
Re,
fichier modifie "copie" sans "": https://www.cjoint.com/c/DJDrqW3dwir
fichier modifie "copie" sans "": https://www.cjoint.com/c/DJDrqW3dwir
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
29 oct. 2014 à 17:19
Magnifique,
merci encore et bonne soirée :)
merci encore et bonne soirée :)