Seite 1 von 1
(Gelöst) Gleiche Makros trotzdem einen Fehler
Verfasst: Di 8. Nov 2016, 11:41
von Atwist
Hallo
Ich hab hier unten 3 gleiche Makros trotzdem bekomme ich einen Fehler.
In Meine Datei hab ich 12 von diesen Makros und 2 machen mich fertig.
sub ResetNieuweMaandMei läuft gut
sub ResetNieuweMaandJun
sub ResetNieuweMaandJul
diese 2 haben einen Fehler aber ich verstehe es nicht
- Makro_Fehler.png (63.26 KiB) 4235 mal betrachtet
Code: Alles auswählen
sub ResetNieuweMaandMei (oEvent)
Dim Button As Object
Doc = ThisComponent
Sheets = Doc.Sheets()
Sheet = Sheets.getByName("Mei")
with Sheet.DrawPage.Forms.getByIndex(0).getByName("NieuweMaand5")
If .State = 1 then .Enabled = True
If .Enabled = True then .State = 0
end with
call GaNaarMei
call minmaand
End Sub
sub ResetNieuweMaandJun (oEvent)
Dim Button As Object
Doc = ThisComponent
Sheets = Doc.Sheets()
Sheet = Sheets.getByName("Jun")
with Sheet.DrawPage.Forms.getByIndex(0).getByName("NieuweMaand6")
If .State = 1 then .Enabled = True
If .Enabled = True then .State = 0
end with
call GaNaarJuni
call minmaand
End Sub
sub ResetNieuweMaandJul (oEvent)
Dim Button As Object
Doc = ThisComponent
Sheets = Doc.Sheets()
Sheet = Sheets.getByName("Jul")
with Sheet.DrawPage.Forms.getByIndex(0).getByName("NieuweMaand7")
If .State = 1 then .Enabled = True
If .Enabled = True then .State = 0
end with
call GaNaarJuli
call minmaand
End Sub
Re: Gleiche Makros trotzdem einen Fehler
Verfasst: Di 8. Nov 2016, 17:46
von Pit Zyclade
Besser wäre als Arbeitsbeispiel die leere oder inhaltlich anonymisierte Datei mit den Makros. Denn dann könnte man anhand der Struktur den Fehler lokalisieren. Ohne Struktur der Datei geht das nicht.
Re: Gleiche Makros trotzdem einen Fehler
Verfasst: Di 8. Nov 2016, 19:31
von Atwist
Re: Gleiche Makros trotzdem einen Fehler
Verfasst: Mi 9. Nov 2016, 10:03
von karolus
Hallo
Du wiederholst praktisch die gleichen 8 Codezeilen insgesamt 30 mal
(binnen_1 … binnen_8 … betaid_1 … betaid_22)
d.h. die ersten 270 Codezeilen in deinem Modul kann man mühelos in 10 Zeilen zusammenfassen.
Leider machst du dann auch noch auf den restlichen 700 Zeilen auch im gleichen stupiden Stil weiter, ich fürchte dir ist nicht zu helfen!
Re: Gleiche Makros trotzdem einen Fehler
Verfasst: Mi 9. Nov 2016, 11:22
von Atwist
Ich hab hier unten 3 gleiche Makros trotzdem bekomme ich einen Fehler.
In Meine Datei hab ich 12 von diesen Makros und 2 machen mich fertig.
sub ResetNieuweMaandMei läuft gut
sub ResetNieuweMaandJun
sub ResetNieuweMaandJul
diese 2 haben einen Fehler aber ich verstehe es nicht
Mit dem Rest bin ich noch am arbeiten, Aber ich konnte bei meine gebührt auch nicht gleich laufen.
Und wenn du in meine Situation bis dann denk du ganz anders.
Bin nämlich seit 2008 Früh Rentner durch einen schlachanval und muss mich seit dem richtig viel mühe geben um alles gut hin zu bekommen.
Leider machst du dann auch noch auf den restlichen 700 Zeilen auch im gleichen stupiden Stil weiter, ich fürchte dir ist nicht zu helfen!
Jeder ist nicht gleich und dass soll auch so bleiben.
Re: Gleiche Makros trotzdem einen Fehler
Verfasst: Mi 9. Nov 2016, 11:37
von Pit Zyclade
Bei mir erfolgt kein Protest.
Re: Gleiche Makros trotzdem einen Fehler
Verfasst: Mi 9. Nov 2016, 13:51
von balu
Hallo Atwist,
hatten wir das Problem nicht schon mal gehabt?
Die Fehlermeldung besagt doch nix anderes als das es das Element (Button) nicht findet, es findet den Namen nicht.
Und nun schau dir den Button im dementsprechenden Tabellenblatt mal ganz genau an, und dann müsstest Du von alleine drauf kommen was da schief läuft.
Gruß
balu
Re: Gleiche Makros trotzdem einen Fehler
Verfasst: Mi 9. Nov 2016, 15:44
von Pit Zyclade
Schlimmer noch. Wenn man die subs per Menü aufruft, dann gehen sie, wie ich schon schrieb.
Wenn man die subs über Tafel "settings" aufruft, gehen zwei nicht, nämlich "mei" und "juni".
Aber im ersten 'posting' wurde doch behauptet, dass "mei" gehen würde. Das aber kann nicht sein!
Re: Gleiche Makros trotzdem einen Fehler
Verfasst: Mi 9. Nov 2016, 16:28
von Atwist
@Balu
Du hast recht 3 Buttons mit gleiche Name blöd ich war zu viel mit der Fehler im Makro zu suchen.
Dass ist jetzt gelöst dass alles Funktioniert, jetzt versuch ich mal die Makro ein zu dämmen (wie Karolus sacht)
Ich dank dir für deine tritt im hinter
@ Pit Zyclade
Aber im ersten 'posting' wurde doch behauptet, dass "mei" gehen würde. Das aber kann nicht sein!
Doch bei mir war dass schon, hab auch gemerkt dass bei viele Änderungen immer noch Fehler hat die eigentlich nicht da sind, man der Datei mal schließen muss und dann wieder öffnen und dann funktioniert es.
Auch dir danke ich für deine Hilfe.