Data,hora e página no excel

Discussão em 'Interfaces' iniciado por valter, Novembro 26, 2010.

  1. valter

    valter Membro Participativo

    Boa Tarde senhores,

    Qual o comando para colocar data local, hora e número da página em excel,
    se possível me mandem exemplos.

    Desde já agradeço.
  2. eduardo.leite

    eduardo.leite Equipe de Suporte Moderador Equipe de Suporte

    Segue a ajuda:

    Código:
        CREATE "excel.application" ChExcel.
        ASSIGN ChBook                                   = ChExcel:WorkBooks:ADD()
               ChSheet                                  = ChExcel:ActiveSheet
               ChExcel:DisplayAlerts                    = NO
               ChExcel:ScreenUpdating                   = NO
               ChExcel:VISIBLE                          = YES
               ChExcel:Windows:Item(1):DisplayGridlines = NO
               ChSheet:PageSetup:Orientation            = 2     /*** Landscape - Paisagem   ***/
               ChSheet:pagesetup:PaperSize              = 1
               ChSheet:PageSetup:Zoom                   = 100   /*** Zoom para VisualizaCAo ***/
               ChSheet:NAME                             = "PST_001"
               ChSheet:PageSetup:LeftMargin             = "27"
               ChSheet:PageSetup:RightMargin            = "27"
               ChSheet:PageSetup:TopMargin              = "27"
               ChSheet:PageSetup:BottomMargin           = "13"
               ChSheet:PageSetup:HeaderMargin           = "13"
               ChSheet:PageSetup:FooterMargin           = "13"
               ChSheet:PageSetup:CenterFooter           = "&PAGINA: &P de &N" 
               ChSheet:PageSetup:LeftFooter             = "DATA: &D"
               ChSheet:PageSetup:RightFooter            = "HORA: &T" NO-ERROR.
    

Compartilhe esta Página