mckater - VDA Prüfbericht - red check von Piet

05.02.2026 11:57:55

Piet

Hallo Kollegen

Das ist ein Thread von mir, Fortsetzung für mckater - Prüfbericht red Check
Sollte mckater ihn -übersehen- weisst ihn bitte auf diesen neuen Thread hin.

@mckater
Danke für die Beispieldatei, ein Fehler war schnell gefunden. Leerzeichen in Zelle 104!
Das können wir im Code abfangen, bitte nur diese Befehlszeile auf Trim ändern:
'Bindesprich löschen wenn Zelle K + M leer sind
'If ActiveCell.Value = "" And Selection.Offset(0, 2) = "" Then
If Trim(ActiveCell) = "" And Trim(Selection.Offset(0, 2)) = "" Then

Ich warte mal in Ruhe ab was die sonstige Prüfung noch ergibt. Schau mir alle Sheets an.
Jetzt haben wir einen neuen Thread zum Weitermachen.

mfg Piet

mfg Piet

AW: mckater - VDA Prüfbericht - red check von Piet

05.02.2026 12:10:17

Piet

Nachtrag

ich zeige dir einmal meine Methode um Fehler zu suchen, indem ich mir Daten aufliste.
Ein Rätsel war mir, warum es bei vbRed zur falschen Auswertung bei leeren Zellen kam.
Wusstest du, das die Bedingte Formatierung bei Nullwert in Zellen auf vbRed steht?
Entsprechend bei Leerzeichen ein anderes Ergebnis heraus kam?

Als ich mir die vbRed Werte ansah erkannte ich, das ich auch noch Prüfen muss ob die Zellle >"" ist!
So kommen wir durch Erfahrungen beim testen Schritt für Schritt einer Optilmalen Lösung immer näher.
Schön wenn du dabei selbst VBA lernst und die Excel Praxis kennen lernst.

mfg Piet



    For i5 = 1 To 20

      Fb1 = ActiveCell.DisplayFormat.Font.Color

      Fb2 = Selection.Offset(0, 2).DisplayFormat.Font.Color

      

      'Meine Methode Fehler zu prüfen

      ActiveCell.Offset(0, 10) = Fb1  'Welchen Wert hat FB1 ?

      ActiveCell.Offset(0, 11) = Fb2

AW: mckater - VDA Prüfbericht - red check von Piet

06.02.2026 11:05:59

mckater

Hallo oder Moin wie viele sagen.

@Piet
das ist noch kein vollständiges Update von Dir mit verkürzten Code....aber der red_check ist 100% vorhanden!!!!!

https://www.herber.de/bbs/user/180171.xlsb

hab das ganze auf 8 cavity getestet und klappt prima mit deinem Code!
also die Sub red_check ist clean!!!
Er macht keine Fehler was ich gesehen habe!
Ich habe 2 Tabellenblätter jetzt mehr, aber kein Problem, ich habe das im Code geändert.
Die Sub tabellen_einfügen: (habe ich geändert)
So wie auch in Sub seitenzahl()
Die mag er halt nicht, habe vieles probiert, macht mir keine Zahlen rein!
Hat schon mal funktioniert und natürlich gebunden wie viele cavity ich habe.
Mach ich das manuell in der Entwickler.... macht er es....komisch oder...der überspringt einfach das oder?
Zudem die letzte Sub lässt er auch aus....manuell geht das wenn ich nur die SUB durchführe.
Kannst dir mal die Sub "seitenzahl" ansehen wie auch die Sub "cavity_insert" ansehen?
Manuell mit der Sub macht er es....halt nicht auf alle cavitys
Die verkürzte Version von Dir werde ich auch noch rein bringen in dem Code.
Immer vorher die cavitys löschen, bevor das Makro neu starten sollte.

Der Weg ist nicht mehr weit zum Ziel oder?

Liebe Grüße aus Österreich
mckater

AW: mckater - VDA Prüfbericht - red check von Piet

06.02.2026 13:27:14

Piet

Hallo

habs gelesen und deine Datei herunter geladen.
Heute habe ich keine Zeit dafür. Mal sehen, abends vielleicht??
Kann aber auch 2-3 Tage dauern. Bin z.Zeit privat sehr beschäftigt.

mfg Piet

AW: mckater - VDA Prüfbericht - red check von Piet

07.02.2026 05:30:37

mckater

Hallo Piet oder Moin,

Ich habe schon wieder etwas getüffelt am VDA Bericht....
https://www.herber.de/bbs/user/180172.xlsb

Kannst Dir das irgendwann mal ansehen?
Ich denke das schaut super aus!
(Nur mehr etwas Kosmetik im VBA Code)

Kannst ja mal probieren im cover_sheet und auf den Button drücken.
Derzeit habe ich ja im Projekt 12 Seiten pro cavity und er ist mit Modul1 verknüpft.
Aktuell habe ich im cover_sheet 8 cavity eingegeben, mehr brauch ich derzeit auch nicht und somit 12 Seiten pro cavity sind also 96 (ohne Deckblatt)
Das gebe ich manuell ein!

Fazit: funktioniert zu 100%!

P.S habe in den einzelnen Subs meine Ergänzungen hinzugefügt mit Erklärung, wo es mir wichtig war
Habe einige Subs gelöscht, bzw. Abfragen über andere cavitys die unwichtig waren durch deinen Code!!
Einige Subs muss ich noch kürzer machen, also Kosmetik
Er trägt mir nun die Seitenzahl oben ein in den Tabellenblättern und auch wenn ich cavity1 habe usw. für jedes Tabellenblatt
ALSO das ist ALLES gelöst mit deiner Hilfe!
Etwas Kosmetik braucht das Modul1 noch....aber kannst dir das mal ansehen?
Ich meine es funktioniert ja alles derzeit!
Warum klappt es nun? naja, gute Frage....habe einige Subs nach oben geschickt, bevor die weiter machen und super!
Egal, ich denke VBA Anwenderproblem, der wollte nicht mehr weiter machen*gg*
Ein Kriterium war auch bei einer Sub mit "On Error Resume Next" und habe dann eine Sprungmarke gesetzt wenn ein Tabellenblatt nicht vorhanden ist....weil dann brauch ich den Code ja nicht mehr abarbeiten lassen.....der machte mir aus cavity1 schön brav cavity1 und bei cavity2 schreibt er cavity8 rein*gg*
Aber mit diesen Verweis gelöst: "On Error GoTo SheetNichtVorhanden" (also steht in der Sub unten) Er unterbricht wenn das Tabellenblatt nicht vorhanden ist und gebe ihm dann Befehl auf die neue Sub zu gehen.

Man lernt nie aus!
Piet, schau dir das mal an, passt doch super oder?
Fast eine FINISH VERSION

AW: mckater - VDA Prüfbericht - red check von Piet

05.02.2026 14:50:48

mckater

Hallo Piet!

das VBA Coderl funzt aber so gut!!!!
der macht mir nun das komische raus, wo ich nicht drauf gekommen wäre!
Er macht es so wie es sein soll!!!
WOW!
Danke.....in einem neuen Beitrag schicke ich dann den gesamten Bericht
Ich wusste ja, wir schaffen das alles!!!
Jeden Tag war ich am coden und immer wieder dieser blöde Fehler da und da....
Du hast vollkommen RECHT, weil ich schon mit If Elsekif und alles abgearbeitet habe....fast am Ziel und der macht das blöse Ding immer ohne Hirn und ohne Sinn.
Es lag nicht an deinem Code....an den Anwender.....

Du weißt ja wie das ist oder?....
Die Bindestriche ob links ein Wert steht oder rechts steht ist mir egal...aber ich schaue mir deinen Originalcode noch mal an, der hat es perfekt gemacht ohne die Range zu löschen vorher....aber das ist egal....ich mach die Range auf 100 Seiten, dann gibt es kein Problem damit!
Ich denke ich muss es testen in der vollen Version....was ja keine Version ist, sondern mit dem ganzen Ablauf des Makros....der "Bursche" braucht halt 10 Sekunden....egal oder*gg*
@ Piet wir hören uns noch mit der kompletten Version

Ich werde das nochmal durchtesten und einen neuen Beitrag erstellen für die anderen....
Was mir so gefällt, die Hilfe von Dir und von anderen....
Ander haben ein Problem aber keinen Code....das ist blöd, weil wie soll der andere wissen was das Problem ist?
Bei Dir gefällt mir, du beschreibst die Schritte im Code, was der macht.
Hut ab vor Dir, sauber und super gemacht.
Wäre ich jetzt hier und würde mal so eine Frage stellen?
Super, wenn kein Code, was soll ich machen...dir ein Projekt erstellen? Du weißt was ich meine oder?

Ich melde mich ganz bestimmt wieder für die "no-name-users" als Projekt von uns beiden.
Damit brauchen die sich nicht mehr so rumschlagen mit den Problemen, was wir gemeinsam gelöst haben.

DANKE und Grüße an die Heimat oder Wahlheimhat
mckater

AW: mckater - VDA Prüfbericht - red check von Piet

05.02.2026 18:41:37

mckater

Guten Abend Piet,

schau mal was wir geschafft haben, fast alles!
Dein erstes Coderl schon so super, halt noch nicht umsetzbar auf meine Art mit Range usw.
Ich habe mich stundenland beschäftigt mit dem Problem, wo ich glaubte, warum das???

Es ist natürlich super so SUPERCODES zu bekommen mit der "bedingten Formatierung"
Das Problem war oder ist und war.....ich habe ja nicht eine Zeile, sondern, ich hatte mal eine und dann mal eine die an die Zellen wie Zeilen gebunden sind.
Über die Bedingte Formatierung mag ich mich gar nicht mehr unterhalten, weil es sehr komplex ist.
Warum?
weil ich ja nicht in einer Zeile oder so einen Nennwert habe wie oTol und uTol......
Es kommt vor, dass ich mal eine Zeile brauche die gebunden ist....also muss die auch so kopiert werden
Die feinen CODES von den anderen sind super....aber für das Projekt oder für ein anderes unbrauchbar....
Super Codes, aber in der Praxis nicht umsetzbar!!!!
Da braucht man ja einen SuperPC um das für jedes Projekt zu erstellen....Du weißt was ich meine Piet oder?
Du hast mir Stichworte gesagt wie Range usw......
Ich hab von Dir ein Coderl bekommen...
Teste diesen und wow....Coderl geht wie aus der Sprache er Firma.

Natürlich muss ich deine Codes noch testen im Original, also, du hast mir was verbessert usw. im Code
Du hast mir halt eine Ding geschickt, wo es um einiges kürzer wäre.
Obwohl ich hab kein Problem, der macht das in 10 Sekunden............egal, am dem arbeiten wir noch
Wir bleiben in Verdung hoffe ich und die anderen mit Problemen auf Stufe 2*gg*

mckater - VDA Prüfbericht - red check von Piet

Forumthread: mckater - VDA Prüfbericht - red check von Piet

6
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

mckater - VDA Prüfbericht - red check von Piet

Forumthread: mckater - VDA Prüfbericht - red check von Piet

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

6
Beiträge zum Forumthread

Beiträge zu diesem Forumthread