Live-Forum - Die aktuellen Beiträge
Datum
Titel
23.10.2025 14:37:20
Ampel in Excel macht nicht das was sie soll
23.10.2025 12:48:01
Alle Tabellenblätter mehrerer Dateien in einer Datei
23.10.2025 11:26:24
Drucker auslesen unter Office 2024
23.10.2025 10:01:30
Benannte Bereiche durchsuchen
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1728to1732
1728to1732
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Zelleninhalt tauschen

Forumthread: Zelleninhalt tauschen

Zelleninhalt tauschen
16.12.2019 15:26:04
GC
Hallo,
gibt es eine Möglichkeit den Zelleninhalt zu tauschen. Also, dass man eine Zelle markiert und sie zu dem Inhalt einer anderen führt und der Inhalt dann getauscht wird?
Anzeige

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Zelleninhalt tauschen
16.12.2019 15:40:00
ChrisL
Hi
Probier mal so...
Sub t()
Dim rng1 As Range, rng2 As Range, x As Variant
If Selection.Cells.Count > 1 Then
MsgBox "es kann nur jeweils 1 Zelle getauscht werden"
Else
Set rng1 = Selection
On Error Resume Next
Set rng2 = Application.InputBox(prompt:="Zelle auswählen, mit der getauscht werden soll", _
Type:=8)
On Error GoTo 0
If rng2 Is Nothing Then
MsgBox "Abbruch, weil nix ausgewählt."
Else
If rng2.Cells.Count > 1 Then
MsgBox "es kann nur jeweils 1 Zelle getauscht werden"
Else
x = rng1
rng1 = rng2
rng2 = x
End If
End If
End If
End Sub
cu
Chris
Anzeige
AW: Zelleninhalt tauschen
16.12.2019 15:44:29
GC
Klappt leider nicht, ich werde gefragt, ob ich den Zelleninhalt überschreiben möchte..
kann ich nicht nachvollziehen owT.
16.12.2019 15:48:06
ChrisL
.
klappt doch Bestens ... owT
16.12.2019 16:06:32
Matthias
Anzeige
AW: Teste mal ... geht perfekt ...
16.12.2019 16:53:14
Dieter(Drummer)
Hallo GC,
wenn Du in der Zelle bist, die mit anderer getauscht werden soll, dann das Makro aufrufst, die Zelle aktivierst (in der Inputbox), mit der getauscht werden soll, geht der Tausch perfekt ohne Nachfragen.
Gruß, Dieter(Drummer)
;

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige