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

• #430 matekmatika tag matekmatika #429

  Új Válasz 2006-05-09 17:16:25 #430

  Ú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

  

  matekmatika

  tag

  válasz matekmatika #429 üzenetére

  Hát így kénytelen leszek én kitalálni .
  
  Na jó:
  Private Sub CommandButton1_Click()
  
  'megnyitandó fájl elérési útvonala a CD-n
  mappanev = ''mappa1\mappa2\''
  
  'megnyitandó fájl neve
  fajlnev = ''akarmi.xls''
  
  utvonal = ActiveWorkbook.Path
  utvonal = Mid(utvonal, 1, 3)
  megnyit = utvonal & mappanev & fajlnev
  
  Workbooks.Open (megnyit)
  
  End Sub
  
  Így akkor is jó, ha nem ugyanabban a mappában van a két munkafüzet.
  
  [Szerkesztve]

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