Pessoal, Olha eu aqui de novo... Desta vez, preciso exportar todas as planilhas de um relatório excel (que são 2, mas cada uma pode ser mais de 1 página) para o formato PDF. Bem, exportar para PDF é simples, eu faço o seguinte: Código: chExcelApplication:ActiveWorkBook:ExportAsFixedFormat(0, cFileName, 1, TRUE, TRUE, 1, /* planilia Inicial */ iCont, /* planilia Final */ 1,). Para contar o total de página, em cada "Worksheet", eu faço o seguinte código: Código: /* iCont = acumula o total de página */ iCont = iCont + (chWorksheet:hpagebreaks:COUNT + 1) + (chWorksheet:vpagebreaks:COUNT + 1). Porém, quando o arquivo é extenso (tem muitas páginas), algumas deixam de ser exportadas para o PDF. Alguém saberia me dizer algum modo mais preciso para pegar todas as páginas?
nao entendi, porque se vc configura o excel pra ter cabeçalho e rodapé, mostrar contador de pagina, ele mesmo já faz as quebras, dai vc só exporta pro pdf de boa.
Segue anexo o resultado do meu programa que imprime pedidos de venda, ele gera em excel e depois exporto pra PDF, não tenho um pedido mais de uma pagina pra mostrar, mas funciona muito bem, o excel que cuida das paginas e dos cabeçalhos, não me preocupo com isso.
O problema é que eu nunca sei exatamente quantas páginas terão o relatório em Excel, depende do volume da informação. E no método "ExportAsFixedFormat" eu preciso informar a página inicial e final do relatório.
Bem, estou colocando um valor bem alto para a página final e não estou tendo problemas, vou manter assim por enquanto.
Tá, mas eu não estou entendendo bem o caso, pois o excel numera as paginas automaticamente, eu só faço assim .... Código: excel:ActiveWorkBook:ActiveSheet:pageSetup:PrintTitleRows = '$1:$' + string(linhasCabecalho). excel:ActiveWorkBook:ActiveSheet:pageSetup:PrintTitleColumns = ''. excel:ActiveWorkBook:ActiveSheet:pageSetup:RightHeader = 'Pagina &P de &N'. e ele gerencia pra mim as paginas, ele já sabe que a pagina é A4 e tal, ele sabe quantas paginas que vai dar e apresenta.
