SALVAR PLANILHA EM EXCEL

ACMEIRELES 17/09/2013 21:15:28
#428987
1) Como fazer para salvar uma planilha em excel sem o prompt de salvar do próprio excel ??

2) Consigo dentro do VB salvar a planilha excel em PDF ??
CHICOWEB 18/09/2013 14:16:57
#429033

Não entendi direito:

Voce quer gerar a planilha dentro da sua aplicação?
Ou a planilha já existe e vc vai editar ela lá dentro?
ACMEIRELES 18/09/2013 14:25:34
#429034
Tenho uma aplicação em Visual Basic que já gera a planilha excel .... O Problema é que quando uso os comando indicados para salvar a planilha, o programa encerra e a planilha excel nunca está salva e o Excel continua aberto e com o prompt pedindo para eu salvar !

Ou seja,
--> Queria que salvasse essa planilha automaticamente quando finalizasse o programa ( Sem intervenção do usuário )
--> Se conseguir gerar o XLS salvo, queria gerar um PDF do gráfico gerado no excel

Consegue me ajudar ???


segue parte do programa em vb6..

[ô]
Set EApp = CreateObject([Ô]excel.application[Ô])
Set EwkB = EApp.Workbooks.Add
Set EwkS = EwkB.ActiveWorkbook.Sheets(1)
[ô]
...


ind = 1
Range([Ô]A[Ô] & ind) = [Ô]Ano[Ô]
Range([Ô]B[Ô] & ind) = [Ô]Total de Alunos [Ô]
ind = 2
Range([Ô]A[Ô] & ind) = 2011
Range([Ô]B[Ô] & ind) = 1500
ind = 3
Range([Ô]A[Ô] & ind) = 2012
Range([Ô]B[Ô] & ind) = 2650
ind = 4
Range([Ô]A[Ô] & ind) = 2013
Range([Ô]B[Ô] & ind) = 4379


...

[ô]seleciona da célula A2 até a B4
Range([Ô]A2:B4[Ô]).Select

[ô]Cria e exibe o gráfico
Set Exlc = EApp.Charts.Add

EwkS.SaveAs [Ô]C:\TITLES.XLS[Ô]
EApp.Visible = True

Set EwkS = Nothing
Set EApp = Nothing




Faça seu login para responder
Voltar