Fórum Importação com OpenOffice - Qtde de linhas #618359
06/07/2022
0
Salve galera,
Já estou conseguindo fazer a importação de dados utilizando o Openoffice, só uma coisinha que gostaria de melhorar na importação.
É que uso um progressBar para informar ao usuario o andamento da improtação, porém não estou conseguindo encontrar a quantidade de linhas que a planilha tem . Com o comando (y:= sheet1.getrows.count;) consigo encontrar o limite máximo de linhas, não é isso que preciso.
No Excel eu utilizo esta função:
Se alguém souber o comando ou a função que me traga a "quantidade de linhas broffice" ficarei muito agradecido.
Att.
Já estou conseguindo fazer a importação de dados utilizando o Openoffice, só uma coisinha que gostaria de melhorar na importação.
É que uso um progressBar para informar ao usuario o andamento da improtação, porém não estou conseguindo encontrar a quantidade de linhas que a planilha tem . Com o comando (y:= sheet1.getrows.count;) consigo encontrar o limite máximo de linhas, não é isso que preciso.
No Excel eu utilizo esta função:
Function TForm1.qLinhas(pFile,pPlan : String): Integer;
var
XLApp, Sheet: Variant;
begin
XLApp:= CreateOleObject('Excel.Application');
try
XLApp.WorkBooks.Open(pFile,0,True);
Try
Sheet := XLApp.Workbooks[1].WorkSheets[pPlan];
Result := Sheet.Cells.SpecialCells(11).Row
Except
KDialog('Nome da Guia (ABA) na planilha está errado o correto é: '+pPlan,'Alerta','ERRO');
Result := 0;
end;
finally
XLApp.Quit
end
end;
Se alguém souber o comando ou a função que me traga a "quantidade de linhas broffice" ficarei muito agradecido.
Att.
Dirceu Morais
Curtir tópico
+ 0
Responder
Clique aqui para fazer login e interagir na Comunidade :)