Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
1784to1788
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Kopieren und Einfügen Button

Kopieren und Einfügen Button
29.09.2020 16:27:12
Mikexcel
Hallo Community
Einmal brauch ich noch eure Hilfe, und zwar mein Vater kann nicht kopieren und dann nur den Wert(Inhalt) einfügen. Da dadurch auch meine angelegten Formatierungen verändert werden, würde ich gerne Wissen ob es eine Möglichkeit gibt mit Vba einen Button zu gestalten der die Aktive Zelle Kopiert und bei bspw. Doppelklick in eine andere Zelle den Wert dort einfügt.
Hoffe ihr könnt mir helfen ich hab es noch nicht geschafft beide Funktionen zu vereinen.

6
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Kopieren und Einfügen Button
29.09.2020 16:31:01
Hajo_Zi
wenn ich nach kopieren, rechte Maustaste klicke, Inhalöte einfügen, Werte, bleibt die Formatierung erhalten.

AW: Kopieren und Einfügen Button
29.09.2020 16:42:08
Mikexcel
Ich weiß er kriegt das aber nicht gebacken warum auch immer, deshalb suche ich nach einer Alternative und da kam mir die Idee einer Schaltfläche.
Ich weiß nur nicht wie Ich das einfügen durch einen Doppelklick gestalten kann.
AW: Kopieren und Einfügen Button
29.09.2020 16:58:15
Hajo_Zi
soll Excel also entscheiden wohin kopiert werden soll.
starte den VBA Editor (Alt+F11), Bild sollte zweigeteilt sein ansonsten Strg+R, Doppelklick auf Deine Datei, Doppelklick auf Deine Tabelle, Code ins rechte Fenster kopieren, VBA Editor schließen.
Das Makro wird automatisch gestartet.
Der Code wirkt nur in dieser Tabelle.
Option Explicit
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
Target.Copy Target.Offset(0, 1)
End Sub
Gruß Hajo
Anzeige
AW: Kopieren und Einfügen Button
29.09.2020 17:09:47
Mikexcel
Nein es soll durch das Doppelklicken eingefügt werden und vorher wird die Zelle ausgewählt.
Also
AktiveCell.copy
Und dann nur noch das einfügen per Doppelklick in eine andere Zeile
Die Formel funktioniert nicht so wie ich mir das vorstelle.
Danke im Voraus für deine Zeit
AW: Kopieren und Einfügen Button
29.09.2020 17:22:07
Hajo_Zi

Option Explicit
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
Target.PasteSpecial Paste:=xlPasteValues
Cancel = True
End Sub
Gruß Hajo
Anzeige
Fehlerbehandlöung
29.09.2020 17:32:13
Hajo_Zi

Option Explicit
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
If Application.CutCopyMode = 1 Then
Target.PasteSpecial Paste:=xlPasteValues
Cancel = True
End If
End Sub
Gruß Hajo

318 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige