Office: Markierte Zellen erkennen

Hallo, wie ist es möglich zu erkennen, welche Zellen ich mit der Maus markiert habe und wie viele es sind. Gemeint ist kein Bereich, sondern Markierungen an unterschiedlichen Stellen in der Tabelle. Geplant ist, verschiedene Zellen manuell zu selektieren und den Inhalt untereinander auszutauschen.

:)

 

Hi
meinst Du das?
Code:

gruss hary

 

Jein. Also ja, das was in den Message-Boxen steht ist jeweils gesucht, aber es soll nicht in den Boxen stehen sondern ich möchte die erhaltenen Informationen weiter nutzen.
So sollen die Adressen der einzelnen Zellen in Variablen gespeichert werden, also Mark_Zelle_1= A$2$ , Mark_Zelle_2= D$5$ z.B. wenn sich dieses Format dazu nutzen lässt um den Inhalt der Zelle woanders hin zu kopieren.
Die Anzahl der Markierungen möchte ich dazu nutzen um das ganze zu begrenzen, also es soll nur bei einer bestimmten Anzahl an Markierungen etwas geschehen. Ich habs mit Code:

probiert, das hat aber nicht funktioniert.

 

Moin, hary,

Selection referenziert immer nur den ersten gewählten Bereich, unabhängig von weiteren. Für mehrere Bereiche sollte Selection.Areas als Auflistung durchlaufen werden... *wink.gif*

@CreatorX:
mir wird leider nicht klar, was Du genau erreichen willst - daher nur ein banales Beispiel, dass die Zeilen und Spalten mehrerer Bereiche auszählt, vielleicht kannst Du das auf Deine Bedürfnisse anpassen:

Code:

 

Moin Jinx
So wie ich's verstanden habe, moechte CreatorX die Anzahl der markierten Zellen haben.
bei selection.count
kommt wenn ich zB A1:A2 und C5 mit strg markiere 3
bei zB A1 und C5 mit strg markiere 2
nun moechte er das ausfuehren des Codes nur zulassen wenn 2 Zellen markiert sind. da muesste reichen:
If Selection.Count >2 then exit sub
und den Inhalt dieseer beiden Zellen moechte er tauschen, also Inhalt A1 nach C5 und Inhalt C5 nach A1.
Mir faellt aber nur was ein mit auslagerung in zwei Zellen, meinetwegen(IV1+IV2) dann die werte getauscht zurueckschreiben. Das bekomme ich auch hin, aber innerhalb des Codes das tauschen der zellinhalte fummele ich noch.
gruss hary

 

Also im Prinzip hat hary´s Beispiel schon so funktioniert, es hat mir die Anzahl der markierten Zellen angezeigt und auch für jede Zelle die dazugehörige Adresse. Nur leider alles in MsgBoxen.

Ach ich Dussel, ja ich hab das "then" vergessen oO ja so funktioniert es.

Also ich wäre auch über eine Lösung mit einer Auslagerung zufrieden (ich benötige nicht das komplette Tabellenblatt *wink.gif* )

Ja, also ich möchte (jetzt mal vereinfacht ausgedrückt) 2 Zellen markieren und auf Knopfdruck dessen Inhalte miteinander austauschen. Also das was ich sonst umständlich mit markieren, kopieren und einfügen manuell machen müßte. Und ne manuele Selektion ist notwendig, da Excel ja nicht wissen kann, was ich austauschen möchte *wink.gif*

 

Hallo Creator
markier zwei Zelle und fuehre dieses Makro aus.
Code:

gruss hary

 

Jep genau das habe ich gesucht, danke!

 

[meine antwort gelöscht]