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

• #23730 Fferi50 Topikgazda Delila_1 #23724

  Új Válasz 2014-10-15 11:40:45 #23730

  Ú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

  

  Fferi50

  Topikgazda

  válasz Delila_1 #23724 üzenetére

  Szia!

  Néhány apró észrevétel:
  " Cells(sor + 1, oszlop).Select
  usor = Selection.End(xlDown).Row
  "

  A select teljesen felesleges, egyszerűen usor=cells(sor+1,oszlop).end(xldown).row elég.

  A worksheetfunction.match helyett célszerűbb az application.match függvényt alkalmazni, (ezt én is egy másik topicban tanultam), mivel így más módon kell a hibakezeléssel foglalkozni.
  A ws.match hibát generál, ha nem találja a keresett értéket, az app.match hibaértékkel tér vissza, amit változóban vagy függvényben is "elkaphatsz", akár az iserror, akár az iferror függvény működik. Tehát ebben az esetben nem kell az on error goto vagy on error resume next sor és a hozzá kapcsolódó dolgok.

  Ha iserrort használsz, akkor "csak" arra kell figyelned, hogy a változó, amibe kéred a match eredményét, variantnak legyen definiálva - mivel értéke lehet szám és lehet hibaérték is. Iferrornál nem kerül a változóba hiba, tehát ott jó a double is.

  Üdv.

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