Re: Function aktualisiert nicht
01.07.2002 20:14:57
WernerB.
Hallo Markus,die nachstehende Function berücksichtigt auch den roten Hintergrund:
Zur Aktualisierung:
1. Wenn Du die F9-Taste drückst, wird aktualisiert.
2. Alternativ zum Gebrauch der F9-Taste kannst Du auch im Tabellenblatt-Modul den folgenden Code hinterlegen (als Ergebniszelle habe ich "A12" angenommen):
- Mache dazu einen Rechtsklick auf den Tabellennamen.
- Klicke dann auf "Code anzeigen".
- Automatisch öffnen sich nun der VB-Editor und das Klassenmodul des betreffenden Tabellenblattes.
- Schreibe/kopiere das nachstehende kleine Makro in die große weiße Fläche auf der rechten Seite.
- Zurück zum "normalen" Excel geht's mit Alt + Q.
- Fertig.
Private Sub Worksheet_SelectionChange(ByVal Target As Excel.Range)
ActiveSheet.Range("A12").Calculate
End Sub
Allerdings machen mehrere solcher Konstrukte Excel erheblich langsam, weil es nach jedem Mausklick neu rechnet. Diesen Nachteil musst Du leider in Kauf nehmen.
Viel Erfolg wünscht
WernerB.