Hirdetés

  2. Fórumok
  3. Szoftverfejlesztés
  4. Visual Basic

Hirdetés

100 000 érv a ReGalaxy mellett: Vásárolj Galaxy Z Fold7 I Z Flip7 vagy Galaxy S25 szériás készüléket, és régi mobilod felújítását 100 000 Ft-ig mi álljuk!

Új hozzászólás Aktív témák

  • #2854 Ispy nagyúr alexy92 #2851
    Új Válasz #2854
    Új hozzászólás
    Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra
    Privát üzenet küldése

    Ispy

    nagyúr

    válasz alexy92 #2851 üzenetére

    Nem nagyon programoztam még excelben, szóval az én elképzelésem:

    Dim IsError as boolean

    Private Sub Main -> a fő kódod, gondolom valamilyen eventre fut le az egész cucc

    On Error GoTo ErrHandling

    valami kód, amit írtál és mindig gebasz van vele...

    IF IsError = True Then
    Call Sub2
    Else
    Call Sub3
    End IF

    valami kód, amit írtál és mindig gebasz van vele...

    IF IsError = True Then
    Call Sub4
    Else
    Call Sub5
    End IF

    exit sub

    ErrHangling:
    IsError = True
    Resume

    End Sub

    Private Sub Sub2
    IsError = False
    ....

    End Sub

    Persze lehet ezt még finomítani kell, kb. 5 éve nem nyúltam VBA kódhoz, de kb. így csinálnám. A subokat el is lehet hagyni, csak akkor van értelme külön kódba kiemelni, ha több helyen is használod ugyanazt a kódot.

    Ha mondjuk egész kódrészleteket beraknál ide, akkor nagyobb eséllyel tudunk hibát keresni mi is....

Új hozzászólás Aktív témák