PflebIT - Pflegeinformatik in der Praxis

Diese Seite ist nicht editierbar. Sie können den Quelltext sehen, jedoch nicht verändern. Kontaktieren Sie den Administrator, wenn Sie glauben, dass hier ein Fehler vorliegt.

====== Kopieren per Klick auf rechte Maustaste ======

__Problem:__\\ 
Manchmal kommt es vor, dass man viele einzelne Zellinhalte von Excel in eine andere Software übertragen möchte, die ebenfalls nur einzelne Textfelder aufweist. Eine Kopie der ganzen Tabelle scheidet daher aus.

Um nicht jedes Mal STRG + C drücken zu müssen, kann man auch mit der Maustaste arbeiten.



__Lösung:__\\ 
Das nachfolgende Makro fügt den Inhalt einer Excel-Zelle in die Zwischenablage ein, indem über der Zelle die rechte Maustaste gedrückt wird.
Zwar öffnet sich dadurch auch das Kontextmenü (so wie es sein soll), gleichzeitig wurde aber auch der Text der Zelle in die Zwischenablage kopiert.

Danach kann dann der Text der Zwischenablage in einer anderen Software per STRG + V eingefügt werden.

<code>
'Quelle: https://www.ms-office-forum.net/forum/showthread.php?t=223176

Option Explicit
Private Sub Worksheet_BeforeRightClick(ByVal Target As Range, Cancel As Boolean)
    
    'Kopiert den Zellinhalt in die Zwischenablage, sobald die rechte Maustaste angeklickt wird.
    
    Target.Copy
    
    'Cancel=true 'Kontextmenü wird ausgeblendet (wenn gewünscht)

End Sub
</code>