Meldung machen, wenn in ben. Bereich was passiert

Hallo zusammen im neuen Jahr
ich habe in meiner umfangreichen Datei einen Bereich von 56 Zellen, in denen eine Menge schöne Formeln stehen. Dieser Bereich ist im Vergleich zur Datei recht neu, vielleich ein halbes Jahr oder so, und offensichtlich gibt es im Code irgendeinen alteingesessenen Formelwurm, der ausgerechnet da sein Weidegebiet hat.
Neulich hatte ich mal zufällig entdeckt, daß sämtliche Formeln abgefressen sind. Die Zellen sind leer. Ich hab die brav repariert und nach der Ursache gesucht - diese vermeintlich auch gefunden, weiß nicht mehr, was ich zu finden geglaubt hatte...
Nu sind die blöden Dinger wieder wech, und mir fällt keine Prozedur ein, die das gemacht haben könnte. Alles, was ich seit meiner letzten Arbeit an der Datei bewußt ausgelöst habe, hab ich schon nachgestellt - Fehlanzeige.
Jetzt will ich den Bereich benennen und dann einen Wachhund davor setzen: Der soll aufpassen und bellen, wenn in dem Bereich durch was auch immer eine Löschung stattfindet (also entweder explizit Delete oder durch reinschreiben von "") - möglichst eine msgbox, die mir sagt, daß grad 'ne Formel verschwindet wird und an welcher Stelle im Code ich diesen Formelfresser finden kann...
Hat jemand 'ne passende Idee...?
Grüße - Jörg

Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Benutzer

Hi
könntest du so vorgehen:
1. in einem allgemeinen Modul eine Globale Variable anlegen, dh direkt unter Option Explicit folgendes eintragen:

Public AktuellesMakro as String

2. jetzt fügst du am anfang jeder Prozedur folgende Zeile ein

AkutellesMakro = "Name des aktuellen Makros"

3. in das Modul des Tabellenblatts mit mit dem zu überwachenden Bereich fügst du dann folgenden Code ein:

Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Range("A1:C10")) Is Nothing Then
MsgBox AktuellesMakro
End If
End Sub

4. jetzt überprüfst du noch, ob irgendwo im Makro die Events ausgeschaltet werden (Application.EnableEvents = False) und kommentierst diese Zeile aus, da sonst das Makro aus schritt 3 nicht ausgeführt wird.
5. jetzt startest du die Makros.
wenn der angegebene Zellberich verändert wird, sollte das Makro aus Schritt 3 anspringen und dir das Makro melden, daß die Änderung verursacht hat (vorausgesetzt, du hast schritt 2 für jedes infragekommende Makro entsprechend ausgeführt).
Gruß, Daniel

Beliebteste Forumthreads (12 Monate)

Meldung machen, wenn in ben. Bereich was passiert

15 Beiträge zum Forumthread Beiträge zu diesem Forumthread

VBA Beispiele zu verwandten Themen

Beliebteste Forumthreads (12 Monate)

Beliebteste Forumthreads (12 Monate)

15
Beiträge zum Forumthread

Beiträge zu diesem Forumthread