Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
600to604
600to604
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

makro bei bestimmten wert starten

Forumthread: makro bei bestimmten wert starten

makro bei bestimmten wert starten
18.04.2005 19:55:42
johfri
hallo
möchte gerne ein makro starten wenn im tabellenblatt1 im bereich a1 bis a20 irgendeine zelle den wert 1000 hat.
leider sind meine vba kenntnisse nicht ausreichend um dieses problem zu lösen
bitte um hilfe.
gruß
johfri
Anzeige

12
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: makro bei bestimmten wert starten
18.04.2005 20:15:11
Hajo_Zi
Hallo johfri,
hoffen wir mal das Bert Deinen Beitrag nicht liest. Großschreibung wurde noch nicht abgeschafft.
Sind es Formel im Bereich A1:A20 oder Eingaben?
Bitte keine Mail, Probleme sollten im Forum gelöst werden.
Microsoft MVP für Excel
Das Forum lebt auch von den Rückmeldungen.
Betriebssystem XP Home SP2 und Excel Version 2003 SP1.



"Wer Rechtschreibfehler findet, darf sie behalten!"
Anzeige
AW: makro bei bestimmten wert starten
18.04.2005 20:24:32
johfri
hallo hajo_zi
in diesen feldern gebe ich artikelnummern ein.
rechts-,groß-,klein-,aus-,ein-und umschreibung was solls?
gruß
johfri
AW: makro bei bestimmten wert starten
18.04.2005 20:28:03
Hajo_Zi
Hallo johfri,
in VBA unter der Tabelle
Option Explicit

Private Sub Worksheet_Change(ByVal Target As Range)
'* H. Ziplies                                     *
'* 18.04.05                                       *
'* erstellt von Hajo.Ziplies@web.de               *
'* <a href="http://home.media-n.de/ziplies/">http://home.media-n.de/ziplies/</a> *
Dim RaBereich As Range, RaZelle As Range
' Bereich der Wirksamkeit
Set RaBereich = Range("A1:20")
'   noch mehr Bereiche
'    Set RaBereich = Union(Range("C7:I26"), Range("L7:R26"), Range("U7:AA26"), Range("AD7:AJ26"))
'    ActiveSheet.Unprotect ("Passwort")
For Each RaZelle In Range(Target.Address)
If Not Intersect(RaZelle, RaBereich) Is Nothing Then
'           Dein Makro
End If
Next RaZelle
'    ActiveSheet.protect ("Passwort")
Set RaBereich = Nothing
End Sub

Gruß Hajo
Das Forum lebt auch von den Rückmeldungen.

"Wer Rechtschreibfehler findet, darf sie behalten!"
Anzeige
AW: makro bei bestimmten wert starten
18.04.2005 20:40:48
johfri
ich möchte wenn ich artikelnr. 1000 in diesem bereich (a1:a20) in irgendeine zelle eingebe, dass ein makro abläuft. das makro soll nur bei diesem wert ablaufen.
gruß johfri
AW: makro bei bestimmten wert starten
18.04.2005 20:43:21
Hajo_Zi
Hallo johfri,
das ist doch nur noch ein Vergleich.,
Option Explicit

Private Sub Worksheet_Change(ByVal Target As Range)
'* H. Ziplies                                     *
'* 18.04.05                                       *
'* erstellt von Hajo.Ziplies@web.de               *
'* <a href="http://home.media-n.de/ziplies/">http://home.media-n.de/ziplies/</a> *
Dim RaBereich As Range, RaZelle As Range
' Bereich der Wirksamkeit
Set RaBereich = Range("A1:20")
'   noch mehr Bereiche
'    Set RaBereich = Union(Range("C7:I26"), Range("L7:R26"), Range("U7:AA26"), Range("AD7:AJ26"))
'    ActiveSheet.Unprotect ("Passwort")
For Each RaZelle In Range(Target.Address)
If Not Intersect(RaZelle, RaBereich) Is Nothing Then
If RaZelle.Value = 1000 Then
'               Dein Makro
End If
End If
Next RaZelle
'    ActiveSheet.protect ("Passwort")
Set RaBereich = Nothing
End Sub

Gruß Hajo
Das Forum lebt auch von den Rückmeldungen.

"Wer Rechtschreibfehler findet, darf sie behalten!"
Anzeige
AW: makro bei bestimmten wert starten
18.04.2005 20:58:03
Hajo_Zi
Hallo johfri,
lese noch mal meine Beiträge. Ich habe nichts vom Modul geschrieben sondern unter der Tabelle.
Gruß Hajo
Das Forum lebt auch von den Rückmeldungen.

"Wer Rechtschreibfehler findet, darf sie behalten!"
Anzeige
AW: makro bei bestimmten wert starten
18.04.2005 21:06:51
johfri
weiß nicht was du meinst mit "unter der tabelle"
gruß johfri
AW: makro bei bestimmten wert starten
18.04.2005 21:08:43
Hajo_Zi
Hallo johfri,
starte den VBA Editor (Alt+F11), Bild sollte zweigeteilt sein ansonsten Strg+R, gehe auf Deine Datei, Doppelklick auf die Tabelle, Code ins rechte Fenster copieren.
Gruß Hajo
Das Forum lebt auch von den Rückmeldungen.

"Wer Rechtschreibfehler findet, darf sie behalten!"
Anzeige
AW: makro bei bestimmten wert starten
18.04.2005 21:16:57
johfri
HALLO HAJO_ZI
ICH MUSS MICH IM NACHHINEIN FÜR MEINE BLÖDHEIT ENTSCHULDIGEN UND WEIL ICH MICH SO FREUE ÜBER DAS MAKRO SCHREIBE ICH NUNMEHR ALLES GROß.
GRUß JOHFRI
AW: makro bei bestimmten wert starten
19.04.2005 05:55:43
Hajo_Zi
Hallo jofri,
Dir ist schon bekannt das alles in Groß im Internet als schreien angesehen wird. Dazu ist das Forum nicht da.
Gruß Hajo
Das Forum lebt auch von den Rückmeldungen.

"Wer Rechtschreibfehler findet, darf sie behalten!"
Anzeige
AW: makro bei bestimmten wert starten
19.04.2005 11:45:42
johfri
halo hajo_zi
schon mal was von freudenschreien gehört?
nochmals vielen dank.
gruß johfri
;

Forumthreads zu verwandten Themen

Wert nach Änderung einer Zelle schreiben
Markus

Hallo Leute,
ich werde Excel nie wirklich verstehen. Habe wieder eine Frage: Bei Veränderung des Wertes einer Zelle möchte ich einen Wert in eine andere Zelle schreiben (klingt einfach - gelingt mir nicht!):
Private Sub Worksheet_Change(ByVal Target As Range) On Error GoTo ErrorHandle...
01.10.2008 18:26:00
Thread-ID: 1013729
31 Beiträge
Userform Labeltext bei bestimmten Wert
Werner

Hallo zusammen!
Ich habe mir ein Userform mit einer Combobox erstellt.
Ich möchte, dass in diesem Userform eine Meldung (Label) erscheint, sobald ein bestimmter Wert aus der Combobox ausgewählt wird.
Geht so was? Wenn ja wie?
Gruß und Danke!
Werner
05.12.2008 09:49:00
Thread-ID: 1030371
3 Beiträge
in Tabellenblättern suchen und Schriftfarbe ändern
ad

Hallo zusammen,
ich möchte in mehreren Tabellenblättern (Liste ist im Blatt Namen c3:c.. aufgeführt) bestimmte Buchstaben suchen und per VBA-Makro Schriftfarbe ändern . Bedingte Formatierung ist schon ausgereizt.
Wer kann mir weiterhelfen?
Gruss ad
13.08.2009 22:11:33
Thread-ID: 1095796
11 Beiträge
Anzeige
in Liste v.Blättern suchen und Schriftfarbe ändern
ad

Im Blatt Personal ist eine Liste der Namen=Tabellenblätter (ist flexibel), diese werden neu angelegt mit einer Vorlage in der nur der Kalender enthalten ist - nach dem Eintragen von diversen Werten (Blatt soll als Bsp) sollte es nach dem einfärben aller BLätter lt. Liste wie im Blatt "soll" aus...
14.08.2009 17:46:35
Thread-ID: 1096054
9 Beiträge
Anzeige
Werte nach ausgeblendeter Zellen
Lorenz

Hallo Excelianer
Gibt es eine fertige (Formel) bzw. Funktion mit der man bei fixiertem Fenster den Wert anzeigen kann, der unmittelbar nach der Linie(Begrenzung des geteilten Fensters). Wenn z. B. nach Spalte D fixiert ist und bis Spalte DE gescrollt wurde, so soll in Spalte B der Zellinhal...
20.09.2009 18:45:24
Thread-ID: 1104272
7 Beiträge
Makro, Suchfunktion, Zelle nach oben bis Wert
Markus

Hallo Leute!
Ich bin absoluter Excel und VBA Neuling, aber bring mir das ganz gerade ein bisschen bei, indem ich Suchmaschinen um Rat frage. Diese geniale Seite hat mir auch schon oft weiter geholfen, nur bei meinem folgenden Problem komm ich nicht weiter:
Ich habe ein Excel-Sheet in fo...
15.10.2009 00:57:03
Thread-ID: 1109555
4 Beiträge
Inhalte bei bestimmten Werten nicht einfügen
Nicole

Hallo alle zusammen,
ich habe einen Code, mit dem ich Zeilen aus einem Tabellenblatt in ein anderes schreibe. Jetzt will ich einfach noch einfügen, dass, wenn z.B. in der Zelle "Sonne" steht, gleich auf die nächste Abfrage gesprungen wird, also nix passiert. Mit X=X komme ich hier nicht wei...
08.12.2009 18:29:32
Thread-ID: 1122440
2 Beiträge
Anzeige
Zellen nach ident. Werten absuchen und einfärben
RollWeb

Hallo
Ich habe dieses "Problem" gestern bereits im Office-Loesung-Forum gepostet, bis jetzt aber leider noch keinerlei Antworten erhalten. Hoffe, dass ich hier mehr Glück habe.
Folgendes würde ich gerne mit einem Makro lösen (denke mit Formeln ist das so nicht umsetzbar...?):
Über...
16.12.2009 11:55:17
Thread-ID: 1124335
10 Beiträge
Anzeige
Tabellenblattreiter lässt sich nicht ändern | Herbers Excel-Forum
Josef_T
Guten Tag zusammen,
ich kann in keiner! Tabelle mehr den Tabellenblattreiter bearbeiten. Egal ob ich mit der linken
oder rechten Maustaste darauf klicke, aktiviere ich nur immer das ganze Blatt.
kann mir bitte jemand einen Tipp geben, wie ich meine Tabellenblattreiter wieder editieren...
23.01.2010 20:19:29
Thread-ID: 1132376
6 Beiträge
Makro bei bestimmten Wert in Spalte C
Werner

Hallo!
Leider finde ich trotz Suche keine Lösung für mein Problem:
In Spalte C meiner Datei stehen Werte wie K1, K2, E, PG, PE, SV usw.
Ich will, dass bei jedem Wert ein anderes Makro läuft.
Also wenn in Spalte C irgendwo der Wert K1 steht, soll etwas passieren.
Wird danach...
12.03.2010 08:50:53
Thread-ID: 1145284
3 Beiträge
automatische Übernahme von Zellen nach Zellenwert
Zellen

Hallo!
Ich hab grad einen wahnsinnigen Blackout bei der Lösung folgenden kleinen Problems.
https://www.herber.de/bbs/user/68903.xls
Das Excelfile zeigt eine Werteliste auf dem Register "Daten".
Auf dem Register "Auswertung" möchte ich alle Zeilen aus dem Register mit allen Wert...
31.03.2010 14:34:29
Thread-ID: 1149655
3 Beiträge
Standardfarben ändern in Word
DirkR

Hi Leute,
ich weiss, es ist ein Excelforum, aber evtl. kann mir jemand von euch schnell einen Tipp zu Word geben, ich möchte dort gerne die Standardfarben per VBA Makro ändern, ähnlich wie in Excel mit:
ActiveWorkbook.Colors(1) = 0
ActiveWorkbook.Colors(2) = 13693424
ActiveWorkb...
17.05.2010 11:25:57
Thread-ID: 1157356
5 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Anzeige