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

• #32926 Fferi50 Topikgazda tzimash #32925

  Új Válasz 2016-10-11 11:30:54 #32926

  Ú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 tzimash #32925 üzenetére

  Szia!

  Többféle út is járható
  Dim hiba As Range
Set hiba = Range("E:E").Find(what:="#", LookIn:=xlValues, lookat:=xlPart)
If Not hiba Is Nothing Then MsgBox "Hiányosak az adatok, a program befejeződik!": Exit Sub
  vagy
  dim hibas as integer
hibas = Application.CountIf(E:E, CVErr(2042))
if hibas>0 then stb.

  A kilépést magad is el tudod intézni, csak 1 mintát írtam.

  Üdv.

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