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

• alexy92 aktív tag

  #2843

  #2817 Delila_1

  2017-05-31 12:03:49

  Ú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

  

  alexy92

  aktív tag

  #2817 Delila_1

  #2817 Delila_1

  A Module1-ben találod a makrókat.
  Írd meg a 9 rutint, ahol a

  Range("C" & sor) = Range("A" & sor) / Range("B" & sor)

  sor helyére beírod a saját feladatodat. Az

  If Err.Number <> 0 Then RutinC Else RutinB

  sor helyén a saját rutinjaid nevét add meg! Minden rutinban különböző feladatokat adhatsz meg az én makróim osztása helyett.

  Szia,

  Most sikerült ténylegesen foglalkoznom vele, és a helyzet az, hogy szépen tovább lép a suboknál, de sajnos akkor is amikor nem dobna fel hibát. Mit ronthattam el ?

  On Error Resume Next
  Selection.Copy <- itt szokott kijönni az 1004-es hiba, mert sok a kijelölt cella
  If Err.Number <> 0 Then kövi utáni sub Else Kövi sub

  De itt mindig a "kövi sub" jön ki.

  Előre is köszönöm,
  Viktor

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