Copier d'excel, Coller vers autre application

  • Initiateur de la discussion Initiateur de la discussion Claudy
  • Date de début Date de début

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 !

Claudy

XLDnaute Accro
Bonjour,
Il pourrait arriver avec certaines applications que le "Copier Coller" classique ne fonctionne pas, ou alors il faut passer par un éditeur de texte (wordpad, stickynote, ou autres...).
Personnellement, j'ai trouvé cette macro bien pratique, à placer dans le personal.xlsb et l'associer à une icône dans la barre d'outils d’accès rapide.
La macro:
VB:
Sub CopyToClipboard2()
'Activer: Outils>>Références>>MicrosoftForms 2.0 Object Library
   Dim objData As New MSForms.DataObject
    Dim strText

    strText = ActiveCell.Value
    objData.SetText strText
    objData.PutInClipboard
'éventuellement, dans un tableau, on connait ainsi la dernière valeur copiée.
With Selection.Interior
        .Pattern = xlSolid
        .PatternColorIndex = xlAutomatic
        .Color = 15773696
        .TintAndShade = 0
        .PatternTintAndShade = 0
    End With
End Sub

Claudy
 
- 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
Retour