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

• #24442 Mittu88 senior tag

  Új Válasz 2014-12-02 11:29:13 #24442

  Ú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

  

  Mittu88

  senior tag

  sziasztok!

  Ebben segítsetek légyszi. A gondom, hogy az alábbi programkód után egyszer ugyan visszaugrik a hibaután: labelhez, de ha még egyszer hibát tapasztal, kifagy a program. Amúgy a munkalapnev változónak való értékadás után akad ki, mert sok esetben #HIÁNYZIK hibát dobna az fkeres függvény. Sajnos azt nem tudom kivédeni.

  On Error GoTo hibavan
  For sorszam = 2 To osszsorszam
  hibautan:
  Sheets(masodikadatbazis).Select
  raktarszam = Cells(sorszam, 2).Value
  munkalapnev = Application.WorksheetFunction.VLookup(raktarszam, Sheets("Raktárak").Range("$M$2:$N$90"), 2, False)
  raktarszam = munkalapnev
  ...
  Next

  hibavan:
  sorszam = sorszam + 1
  GoTo hibautan

  Hogy tudom megoldani, hogy az összes hiba esetén a hibavan:-ra ugorjon és ne akadjon ki?

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