Live-Forum - Die aktuellen Beiträge
Datum
Titel
10.05.2024 22:28:14
Formel Suche nur genauen Wert ausgeben
10.05.2024 19:12:28
Suche Formel für Monatsberechnung
10.05.2024 18:20:03
Status/Typ-Werte automatisch setzen in Abhängigkeit
10.05.2024 16:34:03
Excel auf Smartphone: Vorsicht beim Wischen
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
600to604
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
600to604
600to604
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

VBA Prüfung durchführen mit Meldung

VBA Prüfung durchführen mit Meldung
19.04.2005 19:54:15
Holger Wächter
Hallo Wissende,
ich habe eine meiner Ansicht nach umfangreiches PRogramm in VBA unter Excel geschrieben.
Dieses Programm nutzen bei uns sehr viele Mitarbeiter. Da ich es nicht ausschliessen kann, das der Code an der ein oder anderen Stelle mal auf einen Fehler läuft, würde ich das Programm gerne mit der Option erweitern, das für den Anwender die Fehlermeldung Laufzeitfehler nicht erscheint, sondern ich diese abfangen kann und dem Anwender mitteilen kann, mit z.b. einer Msgbox das ein Programmfehler aufgetreten ist und dann kann ich ja selber entscheiden was der Code dann weiter machen soll.
Weiterhin soll dann irgendwo Dokumentiert werden, in welcher Prozedur sich der Code gerade befand, in welcher Zeile, welche Arbeitsmappe gerade offen war u.s.w. Halt alles an Infos was zur späteren Fehlerbehebung Hilfreich wäre.
Es geht einfach darum das z.b. bei einem Fehler die Doku erstellt wird und dann ein Exit Sub ausgeführt wird oder ähnliches..
Ist es möglich die Fehlermeldung abzufangen?
Wäre suoer wenn es da irgendeine Lösung gäbe!
MfG
Holger Wächter

21
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: VBA Prüfung durchführen mit Meldung
19.04.2005 19:58:51
Hajo_Zi
Hallo Holger,
en Fehler allgemein abfangen ist noch einfach. Aber die Zeile ausgeben in der der Fehler kam ist es nicht.
On error Goto Fehler
und vor End Sub
Exit Sub
Fehler:
' Deine Fehlerbehandlung
End Sub

Bitte keine Mail, Probleme sollten im Forum gelöst werden.
Microsoft MVP für Excel
Das Forum lebt auch von den Rückmeldungen.
Betriebssystem XP Home SP2 und Excel Version 2003 SP1.



"Wer Rechtschreibfehler findet, darf sie behalten!"
Anzeige
AW: VBA Prüfung durchführen mit Meldung
19.04.2005 20:14:01
Holger Wächter
Danke schon mal für die Antwort.
On error Goto Fehler ist mir bekannt, aber muss ich dann in jede Prozedur ein "On error Goto Fehler" integrieren, da mein Programm bestimmt schon an die 100 oder mehr Prozeduren hat.
Ich kann ja nie wissen wo jetzt gerade der Fehler im Code steckt.
Kennt denn hier vielleicht noch jemand anderes eien Lösung um die Zeile und die Prozedur auszulesen wo der Code stehen geblieben ist. Vielleicht mit API?
MfG
Holger Wächter
AW: VBA Prüfung durchführen mit Meldung
19.04.2005 20:17:08
Hajo_Zi
Hallo Holger,
ja, die Unteilung hat den Vorteil der Fehler ist auf einen kleinen Teil des Codes begrenzt. Du brauchst ja nur unterschiedliche Fehlermeldungen.
Gruß Hajo
Das Forum lebt auch von den Rückmeldungen.

"Wer Rechtschreibfehler findet, darf sie behalten!"
Anzeige
AW: VBA Prüfung durchführen mit Meldung
19.04.2005 20:37:04
Holger Wächter
Alles klar, dann werde ich das mal so machen und ausprobieren. Also setze ich in dem entsprechenden Code den On error Goto Fehler direkt an den Anfang, somit wird immer der ganze Code geprüft?
Lasse die Frage aber nochmal offen. Vielleicht weiss ja jemand noch wie man die Fehlerzeile ausliest.
MfG
Holger Wächter
AW: VBA Prüfung durchführen mit Meldung
20.04.2005 09:27:02
Heiko S.
Hallo Holger,
habe damit auch schon mal ein wenig rumprobiert, hier das Ergebnis.
https://www.herber.de/bbs/user/21392.xls
Das einzige was ich noch nicht lösen konnte, ist die automatische Angabe in welchem Sub ( bzw. Function) der Fehler aufgetreten ist. Das mache ich zur Zeit noch händisch.
Wenn dir da was einfällt, wie man auch das automatisieren kann, dann her damit !!!
Gruß Heiko

PS: Rückmeldung wäre nett !
Anzeige
AW: VBA Prüfung durchführen mit Meldung
20.04.2005 10:43:25
Holger Wächter
Hallo,
das sieht ja schon vielversprechend aus was Du da gemacht hast, nur kommt beim drücken auf den CommandButton der Fehler: "Der programmatische Zugriff auf das Visual Basic Projektist nicht sicher."
Das macht er in der Zeile wo er den Moduknamen auslesen will. Weist Du was ich tuen kann?
Denke das könnte man noch weiter entwickeln.
MfG
Holger Wächter
AW: VBA Prüfung durchführen mit Meldung
20.04.2005 11:04:29
Heiko S.
Hallo Holger,

Hier der Auszug aus meiner Fehlerroutine der dir sagt was zu tun ist.
"EXTRAS - MAKRO - SICHERHEIT - Vertrauenwürdige Quellen." & vbCr & _
"'Zugriff auf Visual Basic Projekt vertrauen' muss aktiviert sein! ",

Gruß Heiko

PS: Rückmeldung wäre nett !
Anzeige
AW: VBA Prüfung durchführen mit Meldung
20.04.2005 11:12:11
Holger Wächter
Alles klar, das hat geklappt.
Ist schon echt gut was Du da gemacht hast.
Nur noch eine Frage. Weisst Du wie ich diese Einstellung 'Zugriff auf Visual Basic Projekt vertrauen' per Makro aktivieren kann?
Werde dann mal daran rumbasteln und wenn ich was herausgefunden habe, melde ich mich.
MfG
Holger Wächter
AW: VBA Prüfung durchführen mit Meldung
20.04.2005 11:20:33
Heiko S.
Hallo
direkt kommst du da nicht ran, Makrosicherheit ist per Makro nicht veränderbar.
Erste Möglichkeit die Fehlernummer abfangen.
Errorhandler:
If Err.Number = 1004 Then
MsgBox "Das Löschen des VBA Codes ist fehlgeschlagen!" & vbCr & _
"Bitte überprüfen Sie folgende Einstellung! " & vbCr & _
"EXTRAS - MAKRO - SICHERHEIT - Vertrauenwürdige Quellen." & vbCr & _
"'Zugriff auf Visual Basic Projekt vertrauen' muss aktiviert sein! ", vbCritical, _
" Meldung vom Makro VBAloeschen"
Else
' Ausführen der Fehlerroutine
' Übergabe des Subs geht zur Zeit nur händisch.
Fehlerroutine strNameModul, "Commandbutton1_Click"
End If
Oder aber mal mit Sendkeys rumprobieren, aber das ist natürlich eine ziemlich unsichere Angelegenheit.

Gruß Heiko

PS: Rückmeldung wäre nett !
Anzeige
AW: VBA Prüfung durchführen mit Meldung
20.04.2005 11:38:58
Holger Wächter
Das werde ich mal ausprobieren.
Ich habe mal an Deinem Code herumgebastelt. Man kann ja die Anzahl der Zeilen in einem Modul auslesen mit 'Application.VBE.ActiveCodePane.CodeModule.CountOfLines'. Dann müsste es doch möglich sein, die Stelle wieder anzuzeigen von wo aus der Errorhandler gestartet wurde, weil man weis ja die Zielennummer des Moduls.
Nur wie bekomme ich es jetzt hin mit VBACode mir die Zeile automatisch anzeigen zu lassen?
MfG
Holger Wächter
AW: VBA Prüfung durchführen mit Meldung
20.04.2005 11:46:31
Heiko S.
Hallo
laut Herbert H. ist es nicht möglich die VBA Zeile irgendwie auszulesen. Habe ich hier mal irgendwann im Forum gelesen.
Und Nepumuk hatte (in einem Posting von 2003) keine Lösung dafür, wie man den Namen der gerade laufenden Prozedur (Sub oder Function) auslesen kann.
Damit siehst du mal woran du dich gerade versuchst, also frohes testen. Ich habe zumindest auch an der Stelle abgebrochen und meine Routine so gelassen.
Wäre aber für neue Inputs immer zu haben, vielleicht hast du ja neue Ideen !
Gruß Heiko

PS: Rückmeldung wäre nett !
Anzeige
AW: VBA Prüfung durchführen mit Meldung
20.04.2005 12:01:16
Holger Wächter
Habe da was für Dich. Habe es hier gefunden. Ist auch von Nepumuk mal hier gepostet worden. Mit dem Makro liest Du alle Subs und Module aus. Es klappt. Habe ich getestet.
Aber ob man damit dann die 'aktive' Sub auslesen kann, wenn man es umstrickt weis ich nicht. Kennst Du den Code vielleicht? und vielleicht schaffst Du ja auch den umzustricken?
MfG
Holger Wächter
AW: VBA Prüfung durchführen mit Meldung
20.04.2005 12:01:55
Holger Wächter
Hier noch der Code:

Sub MakroListe()
Dim vbc As Object, iRow As Integer, iCol As Integer, iCounter As Integer, sMacro As String
Cells.Clear
Rows(1).Font.Bold = True
For Each vbc In ThisWorkbook.VBProject.VBComponents
iRow = 1
iCol = iCol + 1
Cells(iRow, iCol).Value = vbc.Name
Debug.Print vbc.Type
With vbc.CodeModule
For iCounter = 1 To .CountOfLines
If .ProcOfLine(iCounter, 0) > "" Then
sMacro = .ProcOfLine(iCounter, 0)
If sMacro <> Cells(iRow, iCol) Then
iRow = iRow + 1
Cells(iRow, iCol).Value = sMacro
End If
End If
Next iCounter
End With
Next vbc
Columns.AutoFit
End Sub

Anzeige
AW: VBA Prüfung durchführen mit Meldung
20.04.2005 13:52:02
Heiko S.
Hallo
das hilft uns nicht weiter. (kommt übrigens von Hans H´s CD)
Denn damit wird nur zeilenwiese der Code durchforstet welche Funktion zu der Zeile gehört und deren Name wird dann ausgegeben.
Das wäre so ähnlich als ob du im Tabellenblatt eine Zelle angeklickt hast und dann versuchst per Schleife die Inhalte aller zellen auszugeben um die markierte Zelle zu bekommen.
Im Tabellenblatt gibt es dafür den z.B Befehl ActiveCell ( und noch viele andere ), in VBE kenne ich leider keinen Befehl der die aktive Prozedur ausgibt.
Sowas wie ActiveProzedur oder RunningProzedur wäre das was wir suchen, nur geben tut es sowas leider nicht.
Also weitersuchen !
Zur Not diese Frage nochmal als neuen Thread anlegen.
Gruß Heiko

PS: Rückmeldung wäre nett !
Anzeige
AW: VBA Prüfung durchführen mit Meldung
20.04.2005 14:40:59
Holger Wächter
Danke für alle Deine Mühen. Bin jetzt auf jeden Fall schon viel schlauer. Aber ich sehe es wird sehr kompliziert.
Werde aber trotzdem nochmal einen neuen Thread aufmachen mit genau der Fragestellung. Mal schauen was passiert.
MfG
Holger Wächter
AW: VBA Prüfung durchführen mit Meldung
20.04.2005 19:39:26
andre
Hallo Holger,
habe nicht den ganzen Thread gelesen, aber auch zuweilen mit LOG-Files zu tun. Das Makro dass den Fehler hervorruft ist einfach feststellbar, indem Du den Namen einer Variable übergibst oder bei der Fehlerbehandlung der entsprechenden Funktion. Die Zeile ist nur feststellbar, wenn Du nebenher eine Variable mit der Zeilennummer führst, aber das werden die user mit höherem Kaffeeverbrauch quittieren. Du könntest dann aber diese Variable mit übergeben. Analog kannst Du auch sonstige Variablennamen und -inhalte eines Moduls übergeben und protokollieren - oder zumindest deren Zustand oder bestimmte Eigenschaften wie z.B. nothig bei Objektvariablen oder wb.name wenn sich dahinter ein Workbook verbirgt.
Ist allerdings nich 100%ig da einige Fehler ohne Fehlermeldung zum Abbruch führen. Da würde nur eine weitere LOG-Ausgabe am Anfang der Makro's helfen.
Anzeige
AW: VBA Prüfung durchführen mit Meldung
20.04.2005 19:48:14
Holger Wächter
Das wäre super wenn Du ir zeigen könntest wie ich das mit dem LOGFile realisieren kann. Ich denke das wird mir helfen können.
Würde mich freuen, ansätze zu der Lösung von Dir zu erfahren!
MfG
Holger Wächter
!!! *** NACHTRAG ZUR FEHLERROUTINE *** !!!
21.04.2005 20:24:43
Heiko S.
Hallo Holger,
ist dir eigentlich schon aufgefallen das meine Fehlerroutine nur zum Teil läuft ?!
Die Zeile mit Application. ... .ActiveCodePane.CodeModule zeigt nämlich garnicht den Namen des Moduls an in dem diese Codezeile steht, sondern den Namen des Moduls in dem der Cursor im VBA Editor steht.
Hier zuhaus (auf ME und Excel 2000) bekomme ich nämlich ne Fehlermeldung wenn ich EXCEL schieße wieder öffne und dann den Fehler auslöse ohne den VBA Editor offen zu haben.
Und wenn der VBA Editor auf ist, man aber in einem ganz anderen Modul den Cursor stehen hat. Wird der Name des Moduls ausgegeben in dem der Cursor steht.
Habe noch nicht rausbekommen wie man das verbessern könnte, also doch erstmal händisch den Prozedurnamen übergeben und das Modul weglassen. Oder das mit der Zeilennummerierung nutzenm, was ihr weiter oben besprochen habt.
Gruß Heiko
PS: Rückmeldung wäre nett
AW: !!! *** NACHTRAG ZUR FEHLERROUTINE *** !!!
22.04.2005 14:45:17
Holger Wächter
Du hast Recht. Habe das gerade auch rausgefunden. Er nimmt immer das Modul wo der Cursor steht.
Naja. Mal schauen was man da ändern kann.
Weiss hier jemand Hilfe?
AW: !!! *** NACHTRAG ZUR FEHLERROUTINE *** !!!
23.04.2005 19:56:19

300 Forumthreads zu ähnlichen Themen

@Hans W. Herber: 1 Million Beiträge - Glückwunsch
mpb

Hallo Hans,
wenn ich die URLs richtig interpretiere, haben wir im Forum soeben die Zahl von 1 Million Beiträgen überschritten.
Herzlichen Glückwunsch zu dem Erfolg Deines "Babys"!
Gruß
Martin
07.08.2008 16:23:47
Thread-ID: 1000004
3 Beiträge
Anzeige
Frage - Spalten einfügen & Spalten untereinander z
André

Hallo zusammen!
Ich habe da als blutiger Anfänger in VBA zwei Fragen:
1.) Wie kann ich in meiner Tabelle in jeder zweiten Spalte 4 leere Spalten einfügen lassen?
2.) Dann möchte ich unter den Inhalt der ersten fünf Spalten (A-E) den Inhalt der zweiten 5 Spalten (F-J) usw. In der grö...
08.08.2008 16:00:00
Thread-ID: 1000340
3 Beiträge
Zellen mit Werten aus darüberliegender Zelle fülle
Andreas

Guten Morgen!
Ich hätte folgendes Problem: Ich erhalte automatisiert Exceltabellen, bei denen nicht alle Zellen einer Zeile gefüllt werden, wenn dort der Inhalt einer darüberliegenden Zeile stehen sollte. Zur Weiterverarbeitung muss ich aber diese Zellen mit den dazugehörigen Werten füllen....
11.08.2008 08:59:25
Thread-ID: 1000713
4 Beiträge
Anzeige
Zellen formatieren mit vorangehenden "Nullen"
Addi

Hallo zusammen,
ich habe eine lange Liste, in der in einer Spalte Daten stehen, wo ab und zu vorangehende Nullen nötig sind (mal eine - mal 2...etc.) - und manchmal auch keine.
Wie kann ich diese Zellen formatieren, das die vorangehenden "Nullen" nicht automatisch weggelassen werden?
11.08.2008 10:37:00
Thread-ID: 1000746
8 Beiträge
Makro beenden bei Option "Schliessen"
Jürgen

Hallo Excel-Profis
ich habe folgenden Code in ein Makro eingebaut:
'Drucken mit Vorschau
Application.ActivePrinter = "\\dataserv\HP LaserJet 5L AV auf Ne05:"
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Preview:=True, Collate:= _
True
Hier wird der Standard-Drucker an...
11.08.2008 12:39:00
Thread-ID: 1000811
9 Beiträge
Zellen prüfen / Ausgabe wenn Bedingung erfüllt
Kay

Hallo,
Ich brauche dringend Eure Hilfe. Unter https://www.herber.de/bbs/user/54533.xls findet Ihr eine Mappe, in welcher in Spalte A
1 für "Kaufen"
0 für " "
-1 für "Verkaufen"
steht. IN SPALTE B SIND BISHER NUR MANUELL ERSTELLTE BEISPIELEINTRÄGE ENTHALTEN, DAMIT ERSICHTLIC...
12.08.2008 09:51:36
Thread-ID: 1001078
3 Beiträge
"Bild von Excel-Kamara" variabel...
Excel-Kamara"

Hi Experten,
einen Bereich (Zellen, Bild, Grafik...) mit der Excel-Kamara "fotografieren" und in eine andere Excelmappe einfügen ist kein Problem.
Bei mir werden Ecxel_Vorlagen ausgefüllt und unter fortlaufender Dateinummer abgespeichert, zB. QR000123, QR000124, QR000125 usw. Alle Datei...
12.08.2008 10:33:28
Thread-ID: 1001116
4 Beiträge
Formel "Text" ROTE Zahl bei Minuswert?
dieter(drummer)

Hi Formelspezialisten,
in Zelle B2 steht dise Formel (funktionert auc h):
=TEXT(I4-D4;"00.0")&" ("&TEXT(I4/D4-1;"0%")&")".
Mein Ziel, dass eine Minuszahl in ROT erscheint. Hab's mit bedingte Formatierung versucht und bekomme es nicht hin.
Gibt es eine Möglichkeit, a...
12.08.2008 10:59:29
Thread-ID: 1001135
7 Beiträge

Beliebteste Forumthreads (12 Monate)

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

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen
Forumthread
Beiträge
2
7
2
3
1
7
8
2
3
6
11
5
5
8
15
3
7
4
4
3
2
7
4
3
4