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

• vilag tag

  #1845

  #1835 sztanozs

  2012-09-13 07:11:42

  Ú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

  #1835 sztanozs

  #1835 sztanozs

  Form properties:
  Show Modal - False
  Window Position - Center Screen

  Több Workbookra - csak a formosat zárja be:
  Kód - Workbook:
  Private Sub Workbook_Open()
  Application.WindowState = xlMinimized
  Set UserForm1.wb = Me
  UserForm1.Show
  End Sub

  Kód - Form:
  Public wb As Object
  
  Private Sub CommandButton1_Click()
  Dim wcount As Integer
  Dim twb As Workbook
  wcount = 0
  For Each twb In Application.Workbooks
  wcount = wcount + 1
  Next
  If wcount = 1 Then
  Application.Quit
  Else
  Application.DisplayAlerts = False
  wb.Close False
  End If
  End Sub

  Hali!

  Az ötleted sokat segített a modul tekintetében.
  a Show Modal = False az jó volt, de Window Position tulajdonsága nincs a userformnak.

  Végül is úgy sikerült megoldani, hogy ötvöztem az általad javasoltat a saját ötlettel, azaz a Show Modal-t Falsra állítottam, illetve a userform initializáláshoz beírtam ezt:
  Application.WindowState = xlMinimized

  A kettő együtt végül is azt csinálja amit szerettem volna

  A több Workbook-ra kínált megoldással még nem volt időm foglalatoskodni, mert a másik sürgősebb.

  Azzal igazából azt szeretném megoldani, hogy amikor a userformon megnyomom a kilépés gombot, akkor megvizsgálja, hogy van e nyitva másik munkafüzet is vagy sem. Ekkor kettéválna a folyamat:
  1. Az eredmény az, hogy nincs nyitva másik munkafüzet -> zárja be az egész excelt
  2. Az eredmény az, hogy van nyitva másik munkafüzet -> csak ezt a munkafüzetet zárja be.

  A két különböző bezárást le tudom vezérelni, igazából a vizsgálatot nem tudtam megoldani.

  Remélem az általad vázoltal meg tudom majd oldani.

  Üdv, vilag

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