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

• ssrobi csendes tag

  #2102

  #2099 matekmatika

  2007-03-21 18:40:33

  Ú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

  

  ssrobi

  csendes tag

  #2099 matekmatika

  #2099 matekmatika

  Persze a követkaző formula kicsit elegánsabb. Nem csak azért, mert van benne egy hibakezelés is arra az esetre, ha nem lenne nyitva a másolandó adatokat tartalmazó munkafüzet, hanem mert csak
  
  Sub akarmi()
  On Error GoTo ErrorHandler
  Workbooks(''munkafüzet1.xls'').Activate
  Columns(''A:A'').Select
  Selection.Copy
  Workbooks(''munkafüzet2.xls'').Activate
  Cells(1, 1).Select
  ActiveSheet.Paste
  Exit Sub
  ErrorHandler:
  Workbooks.Open Filename:=''munkafüzet1.xls''
  End Sub

  
  
  Köszönöm, szuper!!!
  
  Ezt a hibakeresős részt nemértem (nem müxik)Itt az a lényeg, hogy le is íja hogy mi lehet a hiba? Mert akkor az is müxik rendesen!
  
  Mégegyszer köszi nektek a segítséget..még ugyis jövök :p
  
  

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