Ergebnis 1 bis 3 von 3

Thema: VBA Makro

  1. #1
    HTML Newbie
    Registriert seit
    09.03.2010
    Beiträge
    2
    Danke
    0
    Bekam 0 mal "Danke" in 0 Postings

    Standard VBA Makro

    Hi Leute,

    Ich hab ne kleine Frage zu nem VBA Makro, da ich ehrlich gesagt nen newb bin, komm ich auch nicht auf die Lösung und zwar folgendes:

    Sub Februar()
    Dim Jahreszahl, Februartage As Integer
    Dim Eingabe As String
    Eingabe = InputBox("Bitte geben Sie eine Jahreszahl ein:" & Eingabe)
    Jahreszahl = Val(Eingabe)
    If Jahreszahl / 4 Then
    Februartage = 29
    Else
    Februartage = 28
    End If
    If Jahreszahl / 100 And Not Jahreszahl / 400 Then
    MsgBox ("Der Februar " & Jahreszahl & " hat " & Februartage & " Tage.")
    End If
    End Sub

    Bei dem Makro geht es darum wie unschwer zu erkennen ist, die Februartage abhängig von den Schaltjahren zu errechnen. Leider kommt bei mir immer 29 raus .

    Vielleich findet ja jmd den Fehler, ich wäre sehr dankbar
    Achtung: Dies ist ein alter Thread im HTML und Webmaster Forum
    Diese Diskussion ist älter als 90 Tage. Die darin enthaltenen Informationen sind möglicherweise nicht mehr aktuell. Erstelle bitte zu deiner Frage ein neues Thema im Forum !!!!!

  2. #2
    Forum Guru Avatar von driver
    Registriert seit
    10.04.2006
    Alter
    34
    Beiträge
    20.729
    Danke
    0
    Bekam 0 mal "Danke" in 0 Postings

    Standard AW: VBA Makro

    naja.... wenn du nur fragst ob jahreszahl durch 4 teilbar is, bekommst
    nie n ordentliches ergebnis. du musst fragen ob das jahr durch 4 teilbar
    ist und dabei ne ganze zahl rauskommt.

    Code:
    If Jahreszahl Mod 4 = 0 Then
    mod ermittelt den restwert. wenn dieser 0 ist, sollte es ein schaltjahr sein.
    >> die icq-schreiberlinge bitte dies hier beachten



    1679 entdeckte Gottfried Wilhelm Leibniz das Binärsystem, bei einem Gespräch mit seiner Mutter: "Ja..., Nein..., Nein..., Nein..., Ja..., Ja..., Nein..."

  3. #3
    HTML Newbie
    Themenstarter

    Registriert seit
    09.03.2010
    Beiträge
    2
    Danke
    0
    Bekam 0 mal "Danke" in 0 Postings

    Standard AW: VBA Makro

    Alles klar, super danke <3

Ähnliche Themen

  1. Makro
    Von Mr.Death im Forum HTML & CSS Forum
    Antworten: 12
    Letzter Beitrag: 23.03.2006, 21:41

Stichworte

Berechtigungen

  • Neue Themen erstellen: Nein
  • Themen beantworten: Nein
  • Anhänge hochladen: Nein
  • Beiträge bearbeiten: Nein
  •