Live-Forum - Die aktuellen Beiträge
Datum
Titel
16.10.2025 00:15:51
Passwort im Herbersforum ändern
15.10.2025 16:22:17
Datum ist nicht Datum :(
15.10.2025 15:02:20
Blockpfeile mit Makro gehen nicht mehr nach freigabe
15.10.2025 13:51:13
VBA - Fortschrittsbalken unabhängig von Zellen
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
1584to1588
1584to1588
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Makro ausführen wenn Auswahl in Bereich

Forumthread: Makro ausführen wenn Auswahl in Bereich

Makro ausführen wenn Auswahl in Bereich
24.10.2017 13:08:58
Mark
Hallo liebes Forum!
Ich habe ein Problem mit einem Code.
Ich möchte ein Makro ausführen wenn ich meine Auswahl innerhalb von "D5:J7" habe.
Aus irgendeinen Grund möchte das ganze nicht.
Kann mir da jemand weiterhelfen?
Vielen dank im Vorhinaus!!!
Anzeige

7
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Und wie sieht das Makro aus? owT
24.10.2017 13:41:53
Michael
AW: Und wie sieht das Makro aus? owT
24.10.2017 14:34:23
Mark
ActiveCell = "X"
Das ist alles. Ziemlich einfallsreich ^^
Bahnhof
24.10.2017 15:09:24
Michael
Mark,
...und mehr ist mit diesen Angaben auch nicht zu verstehen:
Ich möchte ein Makro ausführen wenn ich meine Auswahl innerhalb von "D5:J7" habe.
Aus irgendeinen Grund möchte das ganze nicht.
ActiveCell = "X"
Beschreibe bitte klar, was ein Makro unter welchen Umständen erledigen soll, dann sehen wir weiter.
LG
Michael
Anzeige
AW: Bahnhof
24.10.2017 15:15:19
Mark
Sobald ich meine Auswahl irgendwo im Bereich zwischen D5 und J7 habe soll in die ausgewählte Zelle der Wert "X" eingefügt werden. Bin ich auserhalb diesen Bereichs soll nichts passieren.
Ich hoffe das hilft weiter.
Dann so
24.10.2017 15:22:43
Michael 

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
With Target
If .Cells.Count > 1 Then
Exit Sub
Else:
If Not Intersect(Range(.Address), Range("D5:J7")) Is Nothing Then
.Value = "X"
End If
End If
End With
End Sub
Der Code muss ins Modul des Tabellenblattes, in dem er wirken soll. Dazu ReMausKlick auf den Tabellenblattreiter und Code anzeigen - da hineinkopieren. Eine Auswahl von mehreren Zellen ignoriert der Code, und wirkt immer nur bei Wahl 1 Zelle.
LG
Michael
Anzeige
AW: Dann so
24.10.2017 15:26:19
Mark
Super! Genau sowas habe ich gesucht VIELEN DANK!
Gern! Danke für die Rückmeldung, owT
24.10.2017 15:31:28
Michael
;

Forumthreads zu verwandten Themen

Makro bei Wertänderung in Bereich auslösen
Ulrich

Hallo zusammen,
kann man ein Makro starten, wenn sich in einem definierten Tabellenbereich ein Wert ändert? Wie geht das?
Danke im Voraus und Grüße,
Ulrich
19.09.2008 12:37:58
Thread-ID: 1010993
5 Beiträge
Anzeige
Wert der letzten befüllten Zelle in Bereich
Bibo

Hallo EXCEL-Freunde,
ich habe bei excelformeln.de bei Beate Schmitz und Aladin Akyurek abgekupfert und ermittle mit der genauso kurzen wie eleganten Formel =VERWEIS(9^99;A1:F1) oder =VERWEIS(9^99;C1:C10) die letzten Zahlen in den angegebenen Bereichen.
Das klappt auch wunderbar, soweit...
12.10.2008 15:32:39
Thread-ID: 1015865
5 Beiträge
Daten aus Zelle in Bereich
Swen

Hi @ all,
ich möchte gerne einen Wert aus einer zelle in einen bereichübernehmen,
habe es wie folgt versucht
With ThisWorkbook
.Sheets("auto").Range(.Sheets("auto").Cells(2, intCol2), _
.Sheets("auto").Cells(intRowsData, intCol2)).Value _
= .Sheets(strDateiname).Cells(i...
17.10.2008 19:17:00
Thread-ID: 1017255
5 Beiträge
Bereich in Bereich ausblenden
Kai

Hallo zusammen,
ich habe ein Tabellenblatt mit dem Bereich: A1:P38
In Abhängigkeit einer Zahl in einer anderen Zelle eines anderen Tabellenblatts, möchte ich Teilbereiche nicht anzeigen lassen, wie z.b. den Bereich: E20:H38
Ein ausblenden von Zeilen, oder Spalten kommt nicht in Frag...
23.10.2008 18:20:00
Thread-ID: 1018769
21 Beiträge
For each c in Bereich
Gregor

Hallo
Ich habe folgende Abfrage:
For Each c In Bereich
Wert = Cells(c.Row, 7).Value
If Wert "kein" Then
usw.
Ich möchte also bei c (Zeile) Spalte 7 den Wert abfragen und je nach Wert weiterfahren. Bereich ist in Spalte 5 definiert.
Wie komme ich zu dieser Zeilen-Nu...
24.10.2008 16:32:40
Thread-ID: 1019066
8 Beiträge
Wert der letzten Zeile in Bereich SVerweis
Elmar

Hallo,
vielleicht kann mir jemand helfen, wie ich in VBA dieser Formel ==ActiveCell.FormulaR1C1 = "=VLOOKUP(RC[-2],Haupttabelle!R1C1:R65000C7,2,FALSE)"== beibringe, die 65000 durch die letzte belegte Zeile in einer Tabelle zu ersetzen. Die Abfrage mache ich mit ***iRow = Cells(Rows.Count, 3...
28.10.2008 20:45:00
Thread-ID: 1020084
5 Beiträge
Anzeige
vba farben erkennen und in bereiche verschieben
M.

Hallo zusammen,
ich habe in einer Excel-Tabelle 3 Bereiche mit je 4x6 Zellen, die grün, blau und rot eingefärbt sind. In den Zellen stehen Namen.
Je nach Wochentag sollten die grünen den Platz der roten, die blauen den Platz der grünen und die roten den Platz der blauen Zellen einnehmen...
21.12.2008 13:39:00
Thread-ID: 1034597
5 Beiträge
Summe mit Bedingung in Bereich
Christian

Hallo zusammen,
ich hoffe, es kann mir jemand helfen :-) Es geht um folgendes Problem:
Ich habe eine Finanztabelle, in der jeder Monat eine eigene Spalte (beginnend bei B) hat. Die Bezeichnungen der monatlich wiederkehrenden Kosten sind in Spalte A untergebracht. Es gibt Ausgaben, die f...
04.01.2009 18:02:00
Thread-ID: 1036788
5 Beiträge
Zelleninhalt in Bereich kopieren
Ludger

Hallo zusammen,
im Seet 1 habe ichin Zelle A1 einen Wert stehen. Diesen möchte ich nach Sheet 2 Zelle C3 bringen.
Problem: Im Sheet 2 ist die Zelle C3 in einem vordef. Bereich C3:D10
Wie bekomme ich das in VBA gelöst ?
Danke
Ludger
23.02.2009 17:25:39
Thread-ID: 1053201
4 Beiträge
Einfügen in Bereich mit definiertem Namen
Beni

In Tabelle Offerte ist der Name "Bereich"vergeben. A9:H17 aus Tabelle Preis sollten in den "Bereich" eingefügt werden, jeweils in die nächste leere Zelle. Nur geht das so nicht.
Vielen Dank für eure Hilfe
Sheets("Preis"). Range("A9:H17")
Selection.Copy
Range("Bereich").Cells(Row...
20.05.2009 21:35:17
Thread-ID: 1076503
3 Beiträge
Leere Zelle in Bereichen suchen.
Hans

Hallo Leute,
ich habe ein Problem und bekomme es in VBA nicht gelöst.
Es stellt sich folgende Problemstellung :
Ich habe drei Bereich .. jeweils über nur eine Spalte.
Bereich 1 heisst "Wert1" und ist in Spalte A
Bereich 2 heisst "Wert2" und ist in Spalte B
Bereich 3 hei...
11.12.2009 20:05:19
Thread-ID: 1123393
4 Beiträge
UDF, wenn x-te Stelle in Bereichen 0 u. eingeblen.
Simon

Guten Tag
Ich habe folgende Problemstellung, die ich gerne mit einem UDF lösten möchte:
- eine oder mehrere Spaltenbereiche mit gleichviel Zellen (im Beispiel benannt mit Bereich_A, Bereich_V, Bereich_X)
- wenn in der x-ten Zeile aller Bereiche ein Nullwert steht (oder eine der Wert...
06.05.2010 19:33:43
Thread-ID: 1155885
12 Beiträge
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige

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