Hirdetés

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

  • m.zmrzlina

    senior tag

    Van egy makróm ami azt csinálja, hogy a felhasználó által egy txt fájlban kijelölt szöveget beilleszti egy munkalapra elvégez bizonyos ellenőrzéseket majd megformázza.

    A következő módszerrel egy felhasználói hibát szeretnék kezelni ami abból adódik, hogy nem tett semmit a vágólapra mielőtt elindította a makrót. Így szeretném csinálni:

    Cells(1, 1).Select
    On Error GoTo hiba
    ActiveSheet.Paste

    'további utasítások (jó ág)

    hiba: 'hiba ág
    MsgBox "Nincs mit beilleszteni." + Chr(13) + "Végezd el a kijelölést!", vbCritical, "Figyelem !!!"

    Exit Sub

    Ez most úgy működik, hogy akár üres a vágólap akár nem a hibaüzenet mindenképpen megjelenik és folytatódik tovább a program. Mintha mindkét ág lefutna függetlenül attól hogy volt-e hiba vagy sem.

    Mit rontok el?

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