Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
700to704
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
700to704
700to704
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Calculate-Ereignis auslösen

Calculate-Ereignis auslösen
02.12.2005 14:01:01
zink
Hallo,
wenn ich z.B. bei der Aktivierung des Arbeitsblattes das Calculate-Ereignis "manuell" auslösen will, funktioniert das nicht:

Private Sub Worksheet_Activate()
Me.Calculate
End Sub


Private Sub Worksheet_Calculate()
MsgBox "Calculate aufgerufen"
End Sub

Eigentlich müßte doch aus "Worksheet-Activate" das "Worksheet-Calculate"-Ereignis aufgerufen werden. Wie mache ich das?
Danke für die Hilfe
Joachim

6
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Calculate-Ereignis auslösen
02.12.2005 14:17:11
Matthias
Hallo Joachim,
wenn es aber nichts zu berechnen gibt, wird das Ereignis trotz Calculate-Befehl nicht ausgelöst.
Da müsstest du dann gezielt Werte verändern, die das Calculate-Ereignis auslösen.
Was ist denn der Hintergrund deiner Frage?
Gruß Matthias
AW: Calculate-Ereignis auslösen
ransi
hallo joachim
ergänzend zu Matthias:
Schreib in irgendeine zelle was flüchtiges.
z.B. =heute()
dann gibst was zu berechnen und dein code sollte laufen.
ransi
AW: Calculate-Ereignis auslösen
02.12.2005 14:29:48
zink
Hallo Matthias,
erstmal Danke für Deinen Hinweis - Du hast mir damit schon ein Stück weitergeholfen.
Eigentlich will ich was ganz einfaches:
Beim Verlassen der Zelle eines Arbeitsblattes (Selection-Change) will ich diese Zelle speziell formatieren. Dummerweise gibt mir das Selection-Change-Ereignis aber die Zielzelle zurück (Target) und nicht die Zelle, die ich eben verlassen habe. Eine globale Variable auf Modulebene verliert ihren Wert, wenn die Ereignisprozedur verlassen wird. Ich kann also nicht einfach zwischenspeichern.
Also hab ich mit sich aufrufenden Ereignissen rumgespielt, auch mit dem Calculate Ereignis, um den Wert der globalen Variablen zu erhalten. Auf Modulebene geht keine Deklaration via "static".
Hab im Moment irgendwie einen Hohlblock im/Vorm Kopf :-)
Grüße und nochmals Danke
Joachim
Anzeige
AW: Calculate-Ereignis auslösen
02.12.2005 14:34:17
Matthias
Hallo Joachim,
wie wäre es damit:

Option Explicit
Dim z As Range
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Not z Is Nothing Then
MsgBox z.Address & " war selektiert!"
End If
Set z = Target
End Sub

Gruß Matthias
AW: Calculate-Ereignis auslösen
02.12.2005 14:39:55
zink
Hallo Matthias,
ganz, ganz herzlichen Dank - genau das ist die Lösung, die ich gebraucht habe. Funktioniert prima.
Man hab ich mich angestellt ...
Grüße
Joachim
AW: Calculate-Ereignis auslösen
02.12.2005 14:46:02
Matthias
Hallo Joachim,
da ist es manchmal wirklich besser, nach dem Hintergrund zu fragen ;-)
Gruß Matthias

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige