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

• matekmatika tag

  #430

  #429 matekmatika

  2006-05-09 17:16:25

  Ú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

  

  matekmatika

  tag

  #429 matekmatika

  #429 matekmatika

  Na jó, egy kis segítség , mivel az a munkafüzet is a CD-n van ugyanabban a mappában ezért úgy is megoldható lenne, ha valahogy valamivel kideríteném az aktív munkafüzet elérési útvonalát, hiszen ez ugyanaz mint a megnyitásra váróé, csak a fájl neve más.

  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