Objeto OLE Excel comando

Delphi

14/05/2008

Olá amigos do Forum,

Gostaria de uma ajudinha.

Alguem tem os comandos para interação em objetos OLE com excel.

Se não pelo menos me ajudem nesta situação.

Estou abrindo uma planilha do excel, pegando alguns dados e na hora de fechar 
oOle.Quit


o excel pergunta se eu quero salvar a planilha.

Como fazer para cancelar o salvamento. Não quero salvar nada na planilha.

Ok

Abraços


Adssistemas

Adssistemas

Curtidas 0

Respostas

Ara.es

Ara.es

14/05/2008

Não me lembro agora de cabeça, mas esse metodo, Quit, possui alguns overloads.. com parametros.. onde vc pode estipular se irá salvar ou nao o documento aberto. Tentarei dar uma olhada depois e coloco aki. flw !!


GOSTEI 0
Adssistemas

Adssistemas

14/05/2008

Blz fico no aguardo

Abraços


GOSTEI 0
Ara.es

Ara.es

14/05/2008

Olá adssistemas, e ai achou a solução?? demorei um pouco cara.. mas ta ai o que queria... estou postando um codigo que abre uma planilha preenche um intervalo de celulas com um valor e logo depois veja a planilha sem pedir para salvar e então vejo o excel. qualquer dúvida poste ai.

  // Criando o objeto 
  excel := CreateOleObject(´Excel.Application´);

  // setando o visible para true para poder visualizar o resultado.
  excel.visible := True;

  // adicionando um documento.
  excel.WorkBooks.Add;

  // aqui seleciona a primeira planilha do documento.
  SheetMod := excel.WorkBooks[1].WorkSheets[1];

  // aqui seto o texto do intervalo de celulas A1 até L7 com o texto ´Teste´
  SheetMod.Range[´A1:L7´] := ´TESTE´;

  // entao fecho o documento que abrir.
  // O parametro para a procedure Close, pode ser
  //      0 - para fechar sem salvar
  //      1 - abre a tela de salvar o documento
  //       não teste outros possiveis valores.
  excel.WorkBooks[1].Close(0);

  // finalmente finalizo o excel.
  excel.Quit;


Crie um projetinho de teste, coloque esse codigo no oncreate do formulario principal e veja como funciona.

OBS: não esqueça de declarar a unit ComObj no uses da unit.
Os objetos excel e SheetMod são do tpo OleVariant.

Flw até mais. qualquer coisa é só escrever.


GOSTEI 0
POSTAR