Sélection plages par boutons

Fermé
touroul Messages postés 475 Date d'inscription mardi 5 octobre 2010 Statut Membre Dernière intervention 11 novembre 2024 - Modifié par touroul le 7/09/2014 à 09:23
touroul Messages postés 475 Date d'inscription mardi 5 octobre 2010 Statut Membre Dernière intervention 11 novembre 2024 - 8 sept. 2014 à 07:17
Bonjour le forum !

Voici ce que je cherche à faire aujourd'hui :

Dans un tableau extrait d'un CSV, j'ai besoin d'ajouter derrière chaque ligne en colonne L un bouton sélectionnant la plage de la ligne où le bouton est placé, cellules B à K.
Çà, j'ai pu le faire par la macro suivante :

Sub SélectionLigne2()
Application.SendKeys ("^")
Range("B2:K2").Select
End Sub

Par contre j'aurais besoin de conserver les sélections précédentes, pour pouvoir copier plus tard des lignes non contigües choisies manuellement. Application.SendKeys ("^") ne me le fait pas, la vilaine.

Puis-je vous demander de l'aide SVP .

un exemple : https://www.cjoint.com/?DIhjzmY2nrw

D'avance merci







5 réponses

eriiic Messages postés 24603 Date d'inscription mardi 11 septembre 2007 Statut Contributeur Dernière intervention 15 décembre 2024 7 247
7 sept. 2014 à 18:18
Bonjour,

comment tu fais un copié-collé sur une sélection multiple ?
eric
1
gbinforme Messages postés 14946 Date d'inscription lundi 18 octobre 2004 Statut Contributeur Dernière intervention 24 juin 2020 4 711
7 sept. 2014 à 10:37
Bonjour touroul,

Application.SendKeys ("^") ne me le fait pas
Sûrement pas et d'ailleurs il est totalement inutile.

Je ne pense pas que tu ais besoin d'un bouton. En mettant la macro suivante dans la feuille concernée puis en te positionnant sur la ligne de la colonne M choisie la fonction que tu souhaites se réalise :

Private Sub Worksheet_SelectionChange(ByVal sel As Range)
If Not Intersect(sel, Columns("L")) Is Nothing Then
Cells(sel.Row, "B").Resize(1, 10).Select
End If
End Sub

Ravi d'avoir vu ton message.
Bon dimanche à toi
0
touroul Messages postés 475 Date d'inscription mardi 5 octobre 2010 Statut Membre Dernière intervention 11 novembre 2024 16
7 sept. 2014 à 10:58
Bonjour GBinforme

Ça fait une paie ! (Disons 4 ou 5 ...) La forme ?
Ma rentrée est studieuse, tu vois ...
Pas mal le code, merci !

Par contre il ne permet pas de sélectionner des lignes (à chaque fois colonnes B à K) non contigües ...
Le but est de sélectionner des lignes selon la décision de l'utilisateur :
ex : sélection de B à K ligne 1
sélection de B à K ligne 3
sélection de B à K ligne 8
Ensuite je copie manuellement ces plages non contigües pour les recopier ailleurs.

@plus
0
via55 Messages postés 14502 Date d'inscription mercredi 16 janvier 2013 Statut Membre Dernière intervention 9 décembre 2024 2 736
7 sept. 2014 à 14:45
Bonjour,

Une possibilité : https://www.cjoint.com/?0IhoSVHNF9B
Un double-clic dans n'importe quelle cellule d'une ligne met ou enlève une X en colonne L, par mise en forme conditionnelle la ligne sélectionnée se colore

Le bouton COPIER copie les lignes sélectionnées dans la seconde feuille

A adapter à tes besoins

Cdlmnt

0

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

Posez votre question
touroul Messages postés 475 Date d'inscription mardi 5 octobre 2010 Statut Membre Dernière intervention 11 novembre 2024 16
7 sept. 2014 à 21:31
Salut.

Merci pour vos propositions. Je suis en train d'adapter. Je ferai un reply.
Eric : je comprends pas trop ta question ... dans le cadre d'une macro ?
Sinon, une copie d'une sélection multiple ne pose pas de problème : le collage met les lignes collées les unes en dessous des autres, non ?
Te connaissant tu dois le savoir, il doit y avoir une autre question derrière ...
-1
eriiic Messages postés 24603 Date d'inscription mardi 11 septembre 2007 Statut Contributeur Dernière intervention 15 décembre 2024 7 247
7 sept. 2014 à 23:27
Ben j'sais pas.
Fais un copié-collé d'une sélection multiple et dis-nous.
Et regarde la proposition de via.

eric
0
touroul Messages postés 475 Date d'inscription mardi 5 octobre 2010 Statut Membre Dernière intervention 11 novembre 2024 16
8 sept. 2014 à 07:17
Bonjour Eriic

Je viens de voir que le copier-coller sur sélection multiple ne fonctionne que si chaque zone sélectionnée est de taille identique.
Ex : A1+C1 et A4+B4.
C'est vrai dans les autres cas message d'erreur.
0