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

• #25131 Fferi50 Topikgazda KaliJoe #25120

  Új Válasz 2015-01-21 22:04:24 #25131

  Ú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

  

  Fferi50

  Topikgazda

  válasz KaliJoe #25120 üzenetére

  Szia!

  Próbáld a következőt:
  If activewindow.SelectedSheets("wsh_Ürlap").printpreview=true then
  műveletek
  endif
  Ugyanis így adod meg a konkrét munkalapot.

  Ha több munkalap is ki van választva, akkor pedig
  For each wsh in activewindow.selectedsheets
  if wsh.printpreview=true then
  műveletek
  endif
  next
  Ezzel végigmész az összes munkalapon és megnézheted, hogy ki lett-e nyomtatva.

  Üdv.

• #25121 Delila_1 veterán KaliJoe #25120

  Új Válasz 2015-01-21 08:32:04 #25121

  Ú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

  

  Delila_1

  veterán

  válasz KaliJoe #25120 üzenetére

  Rögzíts egy makrót, ami csak annyit tartalmazzon, hogy behívod a nyomtatási képet. Onnan vedd a sort.

  Dim wsh_Űrlap As Worksheet

  Set wsh_Űrlap = Worksheets("Űrlap Nyomtatáshoz")

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