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

• #50466 Fferi50 Topikgazda TillaT #50465

  Új Válasz 2023-02-13 08:52:59 #50466

  Ú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 TillaT #50465 üzenetére

  Szia!
  Kicsit bonyolult a dolog, de megoldható:
  Sub mentesm()
Application.DisplayAlerts = False
Application.ScreenUpdating = False
ActiveWorkbook.Sheets.Copy
ActiveWorkbook.SaveAs "Próba.xlsx", xlOpenXMLWorkbook
ActiveWorkbook.Close False
Application.ScreenUpdating = True
Application.DisplayAlerts = True
End Sub
  Üdv.

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