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

• vilag tag

  #1834

  #1833 sztanozs

  2012-09-06 13:21:27

  Ú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

  

  vilag

  tag

  #1833 sztanozs

  #1833 sztanozs

  Egyrészt, ha Excel Addint csinálsz, akkor nem látszik a worksheet, de tud futni kód.
  Másrészt el tudod takni kicsibe (minimized) a worksheetet, de így is látható marad (és megszünteti a többi ablak "Maximized" állapotát
  Harmadrészt megnyitás után is át tudod rakni Add-in típusba, viszpnt úgy nem fogod tudni menteni a save gombbal, csak formról.

  Add-in-be átrakni megnyitáskor:
  Private Sub Workbook_Open()
  Me.IsAddin = True
  End Sub

  Mentést viszont kézzel kell csinálnod, mert addin típusú excel-t nem lehet xls/xlsm-be menteni, csak xla-ba. Így mentés előtt kézzel ki kell szedni az Addin property-t (ami láthatóvá teszi a sheet-et - de jól lekódolva csak a mentés idejére).

  ThisWorkbook:
  Private Sub Workbook_Open()
  Me.IsAddin = True
  Set UserForm1.App = Me
  UserForm1.Show False
  End Sub
  
  Public Sub WB_Save()
  Me.IsAddin = False
  Me.Save
  Me.IsAddin = True
  End Sub

  UserForm:
  Public App As Object
  
  Private Sub CommandButton1_Click()
  App.WB_Save
  End Sub

  Igazából csak annyit szeretnék elérni, hogy az excel megnyitása után azonnal csakis a userform látszódjon. Se a munkalap, se pedig az üres excel ablak ne látszódjon, csak és kizárólag a userform.

  A táblába jelen esetben semmiféle kivétel-visszaírás nem történik!
  Gyakorlatilag kódból fut minden.
  Az egész csak annyit csinál, hogy gombnyomásra kiválasztott fájlt/fájlokat bizonyos helyre másol. Kilépéskori mentésre semmi szükség.
  Rendben, valamint egy kilépés gomb.

  --------------------

  A több munkafüzetes problémára esetleg valami megoldás?

  Üdv, vilag

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