Änderung in Tabelle1 soll kein Worksheet_Calculate in Tabelle2 auslösen

[arno]

Hallo,

ich habe eine Mappe (Excel 2003) mit einer Tabelle2, die ein
Worksheet_Calculate Event hinterlegt hat. In Tabelle2 gibt es eine
Formel =Tabelle1!A1. Wenn nun in Tabelle1 in Zelle A1 etwas eingegeben
wird, dann wird das Event in Tabelle2 angestossen, das soll _nicht_
passieren. Das Event soll nur laufen, wenn in Tabelle2 etwas geändert
wird.

Erstmal habe ich das Event in Tabelle2 von Calculate auf Change
umgestellt, das funktioniert soweit, ich bin mir aber nicht sicher.

Angenommen, ich muss in Tabelle2 ein Calculate Event haben, wie kann
ich bei Dateneingaben in Tabelle1 verhindern, dass das Event in
Tabelle2 aufgerufen wird? Ich habe ein Calculate Event in Tabelle1
probiert mit Application.EnableEvents = False, aber das tut es
offenbar nicht.

Viele Grüsse

arno

[Alexander Wolff]

Die Tastatur von arno wurde wie folgt gedr�ckt:

> ich habe eine Mappe (Excel 2003) mit einer Tabelle2, die ein
> Worksheet_Calculate Event hinterlegt hat. In Tabelle2 gibt es eine
> Formel =Tabelle1!A1. Wenn nun in Tabelle1 in Zelle A1 etwas eingegeben
> wird, dann wird das Event in Tabelle2 angestossen, das soll _nicht_

> passieren. Das Event soll nur laufen, wenn in Tabelle2 etwas ge�ndert
> wird.

Wird es aber. Excel unterscheidet nicht zwischen manueller Eingabe und
Formelneuberechnung.

Helfen kann Dir da wohl nur

- manuelles Neuberechnen oder
- ein Event, welches beim manuellen Change irgendeines anderen Wertes in
Tab2 die o.g. Formel =Tab1!A1, die jedoch als Wert geschrieben sein muss,
per VBA aktualisiert.

Von weiteren Verkn�pfungen zwischen den beiden Tabs gehe ich gerade mal
nicht aus!
--
Moin+Gruss Alexander - MVP for MS Excel - www.xxcl.de - mso2000sp3 --7-2

[Andreas Killer]

arno schrieb:

> ich habe eine Mappe (Excel 2003) mit einer Tabelle2, die ein
> Worksheet_Calculate Event hinterlegt hat. In Tabelle2 gibt es eine
> Formel =Tabelle1!A1. Wenn nun in Tabelle1 in Zelle A1 etwas eingegeben
> wird, dann wird das Event in Tabelle2 angestossen, das soll _nicht_

> passieren. Das Event soll nur laufen, wenn in Tabelle2 etwas ge�ndert
> wird.
Das Event l�uft so oder so, dagegen kannst Du nichts machen. Wenn Du
allerdings die Zeile

If ActiveSheet.Name <> Me.Name Then Exit Sub

als erste Zeile einf�gst, wird Dein Code nur ausgef�hrt wenn das Blatt
aktiv ist.

> Erstmal habe ich das Event in Tabelle2 von Calculate auf Change
> umgestellt, das funktioniert soweit, ich bin mir aber nicht sicher.

Das ist sinnvoller als obige L�sung, denn das Calculate-Ereignis wird
ja bei Eingaben nicht unbedingt ausgef�hrt!

Andreas.

[arno]

Danke für die Antworten!

> If ActiveSheet.Name <> Me.Name Then Exit Sub

Interessant, wieder was gelernt. Es funktioniert, allerdings ...

> > Erstmal habe ich das Event in Tabelle2 von Calculate auf Change
> > umgestellt

> Das ist sinnvoller als obige Lösung

... ist das weit besser, weil ein Event nicht sinnlos aufgerufen wird.

lg
arno