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

• #6035 ulrik19 tag Pulsar #6027

  Új Válasz 2010-01-13 17:02:03 #6035

  Ú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

  

  ulrik19

  tag

  válasz Pulsar #6027 üzenetére

  ez kell bele valahol a sub elején:

  Dim adatfile As Variant, FSO As Variant
  Set FSO = CreateObject("Scripting.FileSystemObject")
  Set adatfile = FSO.GetFile("c:\Production_Daily.xls")

  és a dátumos sort erre módosítani:
  alapfile.Sheets("Data").Range("A47") = adatfile.DateCreated

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