Herbers Excel-Forum - das Archiv

Bewerten Sie hier bitte das Excel-Portal

Anderer Code für anderen Bereich

Bild

Betrifft: Anderer Code für anderen Bereich
von: Ralf
Geschrieben am: 14.11.2003 12:13:18
Hallo,
ich möchte mit einem Makro für verschiedene Bereiche andere Befehle haben.
z.B.Wenn eine Zelle in Bereich A30:A60 aktiv ist dann "Selection +71".Wenn im Bereich B30:B60 sich die aktive Zelle befindet dann "Selection -42".
Vielen Dank im voraus.
Gruß Ralf

Bild

Betrifft: AW: Anderer Code für anderen Bereich
von: xXx
Geschrieben am: 14.11.2003 12:47:28
Hallo,
ich bin zwar an der Zauberschule im Kurs 'Hellsehen' durchgefallen, aber vielleicht hilft das ja weiter:
if not application.intersect(selection,Range("A30:A60")) is Nothing then selection=selection+71
if not application.intersect(selection,Range("B30:B60")) is Nothing then selection=selection-42

Gruß aus'm Pott
Udo
http://www.excelerator.de

P.S. Das Forum lebt auch von den Rückmeldungen der Frager an die Antworter!
Bild

Betrifft: Genau das war's ! Danke o.T.
von: Ralf
Geschrieben am: 14.11.2003 12:54:09
.
Bild
Excel-Beispiele zum Thema " Anderer Code für anderen Bereich"
Bereich aus anderer Tabelle für 2 Sekunden anzeigen Suchbegriff-Fundstelle mit anderer Zelle multiplizieren
Einer Zeichenfolge eine zweite in anderer Schriftart hinzufügen Bei Zellauswahl Wert aus anderer Zelle eintragen
Bei Eingaben prüfen, ober der Wert schon in anderer Tabelle Werte in zweiter Tabelle in anderer Reihenfolge darstellen
Bezüge auf Namen in anderen Mappen aufheben Blattinhalt von einer zur anderen Arbeitsmappe kopieren
Sicherungskopie in einem anderen Verzeichnis erstellen Bei geteiltem Fenster Kontextmenü im jeweils anderen Fenster