Zavrieť

Porady

EXEL Príkaz pre datum uloženia exelu v zošite

Zdravim vas. Zaregistrioval soms a tu pre jedne problem ktory mozno niekto z vas uz riesil. Urobil som kontigencnu tabulku ktora vlastne vytvori kalkulaciu (cenovu ponuku) je dost komplikovana. Ludia su zhyckani kedze tie data tahaju zo systemu a kontigencna to za nich vyrata.. tak uz nechcu robit vobec nic nic dopisovat ale tuzia tam mat datum vytvorenia ponuky.. teraz musia vypisovat. Nenasiel som ziadny prikaz ktory by vlozil dátum keď sa daná ponuka napr uloži a pri otvorení o 5 dni tam ten dátum ostane. Dá sa vložiť dátum systémový ale to nie je riešenie. Potrebujem aby generoval dátum vzniku exelu (to je vlastne aj dátum vzniku ponuky) Tu ponuku potom pripínajú do sytému a zákazník ju chváli alebo nie . s tým že chce vidieť kedy bola vystavená. Preto ten dátum je tak pre nich dôležitý. Ak je tu niekto kto má navrh budem rád. Ak nie budú vyťukávať dátum naďalej .. ja som skúsil čo som vedel. Viem ponúknuť daný exel čo myslím pre riešenie problému nie je podstatné. Používame OFICCE 2003
Ďakujem Ivan
Pravidlá a tipy
  • Každý móže napísať len 1 odpoveď. Neskor mozete svoju odpoveď vylepšiť.
  • Odpoveď má priniesť riešenie na otázku, vyvarujte sa hodnotenia otázky.
  • Odpoveď má byť viac o faktoch ako o názoroch.
Dalšie pravidla a tipy
    Ak potrebujete v otázke niečo upresniť, najskôr sa spýtajte na podrobnosti.
    Koncept slúži na uloženie rozpracovanej odpovede, koncept sa zobrazuje len Vám, až kým ho nezverejníte.
    Ak máte podobnú otázku, založte Novú otázku alebo Súvisiacu otázku.
    ❤ Buďte priateľskí ❤
    Sme súčasťou jednej komunity, ktorá si chce vzájomne pomáhať, rozdieľnosť je vítaná ak neubližuje!
    Usporiadať podľa času

    PaloPa je offline (nepripojený) PaloPa

    PaloPa
    Dátum vytvorenia zošita sa dá vložiť cez makro ako toto:
    Sub ZistiDatumVytvorenia()
    Range("A1").Value = ActiveWorkbook.BuiltinDocumentProperties("Creation Date")
    End Sub
    Ďalšie možnosti pre BuiltinDocumentProperties:
    Title
    Subject
    Author
    Keywords
    Comments
    Template
    Last Author
    Revision Number
    Application Name
    Last Print Date
    Creation Date
    Last Save Time
    Total Editing Time
    Number of Pages
    Number of Words
    Number of Characters
    Security
    Category
    Format
    Manager
    Company
    Number of Bytes
    Number of Lines
    Number of Paragraphs
    Number of Slides
    Number of Notes
    Number of Hidden Slides
    Number of Multimedia Clips
    Hyperlink Base


    Ak chceš spustiť makro pri spustení, treba vložiť volanie funkcie Workbook_Open nad objektom ThisWorkbook
    Private Sub Workbook_Open()
    If ActiveWorkbook.Sheets("Sheet1").Range("A1").Text = "" Then
    Call ZistiDatumVytvorenia
    End If
    End Sub
    Viď príklad.
    Palo

    TIP: Vstup do VBA kódu: ALT+F11
    Naposledy upravil PaloPa : 31.07.09 at 10:03

    EXEL Príkaz pre datum uloženia exelu v zošite

    Porady, ktoré by vás mohli zaujímať

    Prihláste sa a sledujte len tie Porady, ktoré Vás zaujímajú.