Live-Forum - Die aktuellen Beiträge
Datum
Titel
19.04.2024 19:41:34
Bei VBA Ausführung Anzeige einfrieren
19.04.2024 17:05:40
Zählen von Zeilen, in denen in bestimmten Bereich Daten sind
19.04.2024 16:34:52
gemeinsamer Filter über drei Spalten
19.04.2024 15:39:42
Exceltabelle daten per combobox zu word Datei
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
340to344
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
340to344
340to344
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Makro starten.....immer noch

Makro starten.....immer noch
20.11.2003 15:09:17
Peter S.
Hallo Ihr,
ich weiss ich nerv heute aber ich komm net auf die Lösung..

wie kann ich folgende prozedur in Gang bringen:


Private Sub Worksheet_Calculate()
If Range("B5").Text = "Systemdatum manipuliert - Funktionen gesperrt" Then
Call Eintragen
End if
End Sub
Eintragen = Makro das gestartet werden soll
kann ich das mit ner wenn-funktion anlassen?...wenn nein bitte alternative vorschläge
danke Peter

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Makro starten.....immer noch
20.11.2003 15:18:11
Nayus
Hallo,
Du hast in der Hand, wann gestartet wird.
Wie Dir bereits als Denkanstoss mitgeteilt wurde, wird "Worksheet_Calculate"
ausgeführt wenn im Blatt neu berechnet wird, sich also Zellinhalte verändern
oder Du F9 drückst.
Willst Du ein anderes Eieignis, dann kopiere den Aufruf in die entsprechende Ereignisprozedur.
Ein Makro auszuführen, wenn irgend ein Inhalt in einer Zelle steht ohne dass
hinterher der Inhalt der Zelle geändert wird ist nicht adäquat, da dann das
Makro endlos ausgeführt wird.

Gruß,
Nayus
AW: Makro starten.....immer noch
20.11.2003 15:19:34
ChrisL
Hi Peter

Mit einer Tabellenfunktion kannst du kein Makro starten. Hier die Alternative:


Private Sub Worksheet_Change(ByVal Target As Excel.Range)
If Target.Address = "$B$5" And Target = "Systemdatum manipuliert - Funktionen gesperrt" Then Call Eintragen
End Sub


Falls es nicht funktioniert, erklär mal wie der Text in B5 gelangt.

Gruss
Chris
Anzeige
AW: Makro starten.....immer noch
20.11.2003 16:10:21
Peter S.
Hallo Ihr Beiden,
der entscheidende Gedanke ist geflossen.....dank Eurer Mithilfe

Ich habe folgende Änderungen eingegeben, die zum Erfolg führten:

Aus 

Sub Eintragen()
Range("B1").Value = "Hallo"
End Sub


habe ich folgendes gemacht:


Function Eintragen()
Range("B1").Value = "Hallo"
End Function


und zusätzlich habe ich in irgendeine Zelle in Tabelle1 folgende Formel eingetragen

wenn(a5=b5;Eintragen();"")

und schon läuft alles wie geschmiert

Danke Euch.....es hat geklickt
Gruß Peter
Anzeige

Beliebteste Forumthreads (12 Monate)

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

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige