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

• #52743 Fferi50 Topikgazda föccer #52740

  Új Válasz 2024-05-30 13:26:26 #52743

  Ú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 föccer #52740 üzenetére

  Szia!
  Próbáld ki ezt:
  Dim u As Boolean
u = Sheets("NyWs").PrintPreview(False)
If u = False Then 'nyomtatás nélkül lépett ki
Sheets("NyWs").Visible = xlSheetHidden
Else
MsgBox u ' ide írhatod, mi legyen nyomtatás után
End If
  Üdv.

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