Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Sélection multiple avec souris puis copie (VBA)

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

RENAUDER

Nous a quitté
Repose en paix
Bonjour,

Je sélectionne (avec la souris) plusieurs cellules dans une colonne ex A3, A6,A8
Par rapport à cette sélection je souhaite étendre la sélection sur 4 colonnes comme suit
Code:
Range("A3:D3,A6:D6,A8:D8").Select
Je sais le faire par rapport à des cellules caractéristiques mais pas avec celles sélectionnées avec la souris.
J'espère avoir été clair dans mes explications.
D'avance merci
 
Re : Sélection multiple avec souris puis copie (VBA)

Bonjour

Je ne sais pas si cela correspond à ta demande

Code:
Sub Macro1()

Dim monadresse As String

For Each c In Selection
    monadresse = IIf(monadresse = "", c.Address, monadresse & "," & c.Address)
    monadresse = monadresse & ":" & c.Offset(0, 3).Address
Next
Range(monadresse).Select

End Sub
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

Réponses
3
Affichages
655
G
Réponses
54
Affichages
5 K
S
Réponses
4
Affichages
2 K
stage_ferrit
S
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…