Office: (Office 365) VBA Stapelspeicher Fehler

Helfe beim Thema VBA Stapelspeicher Fehler in Microsoft Excel Hilfe um das Problem gemeinsam zu lösen; Hi, ich möchte gern die Funktion DateSerial verwenden. Leider bekomme ich den Stapelspeicher Fehler. Könnte mir da bitte jemand mir helfen? Function... Dieses Thema im Forum "Microsoft Excel Hilfe" wurde erstellt von Lukas2011, 14. Dezember 2022.

  1. Lukas2011 Neuer User

    VBA Stapelspeicher Fehler


    Hi,
    ich möchte gern die Funktion DateSerial verwenden. Leider bekomme ich den Stapelspeicher Fehler. Könnte mir da bitte jemand mir helfen?


    Function DateSerial()
    Worksheets("2023").Activate

    Dim v, c, a, m As Integer


    v = ActiveCell.Value
    c = ActiveCell.Column

    If c = 12 Or c = 16 Then
    m = DateSerial(Year(v), Month(v), 1)
    MsgBox m
    End If
    End Function
     
    Lukas2011, 14. Dezember 2022
    #1
  2. Hajo_Zi
    Hajo_Zi Erfahrener User
    benutze keinen VBA Befehl zur Bezeichnung der Funktion

    VBA Stapelspeicher Fehler GrußformelVBA Stapelspeicher Fehler Homepage
     
    1 Person gefällt das.
  3. Hallo Lukas,
    neben dem von Hajo mit Recht gerügten Fehler darfst du m nicht als Integer vereinbaren, es wird ja ein Wert vom Typ Date erzeugt. Also

    Code:
    Function MyDateSerial()
    Dim v, c, a As Integer, m As Date
    Worksheets("2023").Activate
    v = ActiveCell.Value
    c = ActiveCell.Column
    If c = 12 Or c = 16 Then
    m = DateSerial(Year(v), Month(v), 1)
    MsgBox m
    End If
    End Function
    
    Gruß der ALteDresdner
     
    AlterDresdner, 14. Dezember 2022
    #3
    1 Person gefällt das.
  4. Lukas2011 Neuer User

    VBA Stapelspeicher Fehler

    Vielen Dank euch zwei!

    Ich hätte noch eine Frage, kann ich in die Function MyDateSerial die WorkDay Function einfügen?
     
    Lukas2011, 14. Dezember 2022
    #4
  5. Lukas2011 Neuer User
    Und ich sehe gerade leider, kommen leider nicht die richtigen Werte raus...
     
    Lukas2011, 14. Dezember 2022
    #5
  6. HAllo,
    kannst Du:
    Code:
    Function MyDateSerial()
    Dim v, c, a As Integer, m As Date
    Worksheets("2023").Activate
    v = ActiveCell.Value
    c = ActiveCell.Column
    If c = 12 Or c = 16 Then
    m = WorksheetFunction.WorkDay(DateSerial(Year(v), Month(v), 1), 10)
    MsgBox "Zahltag ist 10 Arbeitstage nach dem 1. des Monats: " & m
    End If
    End Function
    
    Gruß der ALteDresdner
     
    AlterDresdner, 14. Dezember 2022
    #6
  7. Ist als Frage etwas dürftig...
     
    AlterDresdner, 14. Dezember 2022
    #7
  8. HKindler
    HKindler hat Ahnung

    VBA Stapelspeicher Fehler

    Hi,

    so ganz nebenbei: VBA ist nicht so wie andere Programmiersprachen. Jede Variable muss getrennt dimensioniert werden.

    Dim a, b, c As Integer dimensioniert nur c als Integer und a und b als Variant. Korrekt wäre Dim a As Integer, b As Integer, C As Integer.

    Mal ganz davon abgesehen, dass man bei Integer aufpassen muss, dass dies nur von ca. -32.000 bis +32.000 geht. Also besser als Long definieren. Integer statt Long zu verwenden war bei 16-Bit-Prozessoren noch sinnvoll. Aber seit dem Pentium sind diese Zeiten vorbei.

    Und was die "richtigen Werte" anbelangt: ich vermute, dass in ActiveCell kein vollständiges Excel-Datum steckt. Mal ganz davon abgesehen, dass man ActiveCell nur in begründeten Ausnahmefällen verwendet.
     
    HKindler, 19. Dezember 2022
    #8
Thema:

VBA Stapelspeicher Fehler

Die Seite wird geladen...
  1. VBA Stapelspeicher Fehler - Similar Threads - VBA Stapelspeicher Fehler

  2. VBA-Code Arbeitsblatt wechseln

    in Microsoft Excel Hilfe
    VBA-Code Arbeitsblatt wechseln: Hallo zusammen, ich habe mal wieder eine Frage. Aktuell beschäftige ich mich mit VBA-Codes. Beim öffnen meiner Arbeitsmappe erscheint folgender Hinweis: Private Sub Workbook_Open() 'Titel Hinweis...
  3. Ribbon haben sich vor vba-Eingabe gelöst

    in Microsoft Excel Hilfe
    Ribbon haben sich vor vba-Eingabe gelöst: Hallo, ich habe das Problem, dass sich die Ribbonleiste im vba-Editor losgelöst hat. Siehe Foto. Hat jemand ne Ahnung wie ich den Orginalzustand wieder hinbekomme? Habe es schon mit deinstallieren...
  4. VBA mit Variable suchen und datum setzen?

    in Microsoft Excel Hilfe
    VBA mit Variable suchen und datum setzen?: Hallo ich sitze vor folgendem Problem. in der Zelle C3 habe ich einen Wert der sich durch ein Makro ändert. Diese Zahl ist auch gleich der Spalte A 9 bis 70. Nun möchte ich ein Makro, dass mir...
  5. Excel Zeile kopieren und unterhalb einfügen

    in Microsoft Excel Hilfe
    Excel Zeile kopieren und unterhalb einfügen: Hallo zusammen, ich bin leider nicht wirklich fit in Excel-VBA Programmierung und benötige somit eure Hilfe. Ich möchte in einem Excel-Terminplan eine neue Zeile unterhalb einfügen können, die...
  6. Email über VBA Kategorie Green zuweisen

    in Microsoft Outlook Hilfe
    Email über VBA Kategorie Green zuweisen: Hallo liebe Leute, ich versuche über VBA die markierte E-Mail der Kategorie olCategoryColorGreen zuzuweisen. Ich bin echt am verzweifeln, irgendwie funktioniert es nicht. Es soll nur die...
  7. VBA - Makro If-Anweisung in Abhängigkeit von Zellenert

    in Microsoft Excel Hilfe
    VBA - Makro If-Anweisung in Abhängigkeit von Zellenert: Hallo Zusammen, ich habe bereits ein Makro, welches mir von einem Tabellenblatt eine PDF erstellt. Nun möchte ich das ganze auch mehrsprachig gestalten und komme mit der IF-Abfrage nicht zurecht...
  8. VBA Code nicht vollständig ausgeführt

    in Microsoft Excel Hilfe
    VBA Code nicht vollständig ausgeführt: Hallo Zusammen Ich habe einen Code erstellt der eine Liste in Excel importiert und dann alle Zeilen löscht, welche in der Spalte C entweder "Ersatz" oder "Unfall" enthalten. Wenn ich den Code...
  1. Diese Seite verwendet Cookies, um Inhalte zu personalisieren, diese deiner Erfahrung anzupassen und dich nach der Registrierung angemeldet zu halten.
    Auf dieser Website werden Cookies für die Zugriffsanalyse und Anzeigenmessung verwendet.
    Wenn du dich weiterhin auf dieser Seite aufhältst, akzeptierst du unseren Einsatz von Cookies.
    Information ausblenden