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

• #30685 perfag aktív tag csferke #30684

  Új Válasz 2016-02-21 12:56:12 #30685

  Ú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

  

  perfag

  aktív tag

  válasz csferke #30684 üzenetére

  elküldött a zasszony a boltba, így lemaradt egy gondolat
  a cella értékadást a BeforePrint eseménybe írtam be, nem tudom az számít-e

  Public Function LastSaveTime() As String
  Application.Volatile
  LastSaveTime = ThisWorkbook.BuiltinDocumentProperties("Last Save Time")
  End Function
  
  Private Sub Workbook_BeforePrint(Cancel As Boolean)
  ActiveWorkbook.ActiveSheet.Range("B3") = LastSaveTime
  End Sub

  Excel 2016, mint írtam müxik

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