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

• Delila_1 veterán

  #2767

  #2766 csaszizoltan

  2017-03-15 12:54:56

  Új Válasz

  Ú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

  

  Delila_1

  veterán

  #2766 csaszizoltan

  #2766 csaszizoltan

  Keress rá az alábbira:
  vba run time error 1004 tulajdonsága nem érhető el
  és az alábbi találat:
  Excel(VBA) Miért nem működik a .Match parancs?
  idézet belőle:
  "Azért, mert ha nincs" (itt: találat) ", akkor hibát generál."

  Értem én, hogy az On Error-nak el kéne kapnia a nem talált eseteket, de hátha a találaton lévő
  On Error Resume Next
  változat megoldja.

  Elképzelhető még a hiba okára a változók deklarációjának (Dim) elmaradása.

  Másrészt az eső sorba írt
  Option Explicit
  -tel fordítási időben szűrhetünk hibákat.

  Dim sor As Variant

sor = Application.Match("keresett_érték", Columns(1), 0)

If VarType(sor) = vbError Then
MsgBox "Nem szerepel az A oszlopban a keresett érték", vbCritical, "Hiba"
On Error GoTo 0
Exit Sub
End If

  Fontos, hogy a változót, aminek az Application.Match függvénnyel akarsz értéket adni, Variant típusúként deklaráld.

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