Re: [de-users] VBA Modulo-Funktion

Hallo Markus,

da ist kein Fehler reproduzierbar:

Option Explicit
Sub Markus
Dim t4 as Integer
Dim Jahr as Integer
Jahr = 2013
t4 = Jahr Mod 4
MsgBox (t4) ' Zeigt 1 an !
End Sub

Probier doch mal das obige Makro, ob es auch bei Dir fehlerfrei läuft. 
Wenn ja, dann liegt es nicht an der von Dir vermuteten Makro-Zeile. 
Verwende zusätzlich "Option Explicit", falls Du das noch nicht getan 
hat.

Gruß
Hans-Werner

------ Originalnachricht ------
Von: "Markus Mueller" <markus-mueller@posteo.de>
An: users@de.libreoffice.org
Gesendet: 28.06.2017 16:18:19
Betreff: [de-users] VBA Modulo-Funktion

> Liebe Liste,
>
> ich habe akuten Schlauchstand, wer kann helfen?
>
> Ich erhalte in einem VBA-Makro für die Zeile
>
> t4 = Jahr Mod 4
>
> die Fehlermeldung:
>
> Unzulässiger Wert oder Datentyp.
> Datentypen unverträglich.
>
> t4 und Jahr sind explizit als Integer deklariert. Jahr enthält zum 
> Zeitpunkt der Fehlermeldung den Wert 2013 (per MsgBox unmittelbar vor 
> der Ausführung der fehlerverursachenden Zeile geprüft).
> Hat jemand eine Idee, wie die aus meiner Sicht unverständliche 
> Fehlermeldung zustande kommt?
>
> Beste Grüße
>
> Markus
>
>
> -- Liste abmelden mit E-Mail an: users+unsubscribe@de.libreoffice.org
> Probleme? 
> http://de.libreoffice.org/hilfe-kontakt/mailing-listen/abmeldung-liste/
> Tipps zu Listenmails: http://wiki.documentfoundation.org/Netiquette/de
> Listenarchiv: http://listarchives.libreoffice.org/de/users/
> Alle E-Mails an diese Liste werden unlöschbar öffentlich archiviert


--
Liste abmelden mit E-Mail an: users+unsubscribe@de.libreoffice.org
Probleme? http://de.libreoffice.org/hilfe-kontakt/mailing-listen/abmeldung-liste/
Tipps zu Listenmails: http://wiki.documentfoundation.org/Netiquette/de
Listenarchiv: http://listarchives.libreoffice.org/de/users/
Alle E-Mails an diese Liste werden unlöschbar öffentlich archiviert