ATS
|
OURINHOS
SP - BRASIL
|
|
ENUNCIADA !
|
|
|
Postada em 04/04/2006 10:29 hs
Tenho uma planilha Excel na versão 2.1 alguém sabe como faço para salvar esta planilha em uma versão superior. Tipo seria como abrir a planilha e executar a opção SALVAR COMO só que através do Visual Basic 6. |
|
|
|
|
|
|
|
Postada em 04/04/2006 12:29 hs
sim
vc abre normalmente:
Excel.Aplication.Workbooks.Open("arquivo")
depois, para salvar:
Excel.Application.Workbooks.Item.SaveAs("arquivo")
Elieser Carlos Topassi
Analista de Sistemas - Desenvolvedor VB/ASP/.Net
e-mail/msn: elieser_topassi@yahoo.com.br
São José do Rio Preto,SP - Brasil
_____________________________________________________
 "O caminho do tolo aos seus prórios olhos lhe parece reto, mas o sábio ouve conselhos" (Pv 12:15)
|
|
TÓPICO EDITADO
|
|
|
|
|
|
Postada em 04/04/2006 15:16 hs
Não consegui fazer como ficaria para salvar o arquivo no seguinte caminho: C:SGITextoTabela_de_Produtos.xls |
|
|
|
|
|
Postada em 04/04/2006 18:14 hs
bem.. o q eu coloquei acima não é o codigo propriamente... é simplesmente a extrutura de objetos... o codigo ficaria assim: Dim xls As Excel.Application
Dim wb As Excel.Workbook
Set xls = New Excel.Application
Set wb = xls.Workbooks.Open("arquivo")
wb.SaveAs ("novo arquivo")
wb.Close
xls.Quit
Set wb = Nothing
Set xls = Nothing
Testa ai.. depois, se nao funfar vc me avisa... lembra de trocar "arquivo" e "novo arquivo" pelos paths completos...
Elieser Carlos Topassi
Analista de Sistemas - Desenvolvedor VB/ASP/.Net
e-mail/msn: elieser_topassi@yahoo.com.br
São José do Rio Preto,SP - Brasil
_____________________________________________________
"O caminho do tolo aos seus prórios olhos lhe parece reto, mas o sábio ouve conselhos" (Pv 12:15)
|
|
|
|
beyonce
não registrado
|
|
|
ENUNCIADA !
|
|
|
Postada em 02/01/2009 12:02 hs
lolololo
|
|
|
|
[:p]
não registrado
|
|
|
ENUNCIADA !
|
|
|
Postada em 01/09/2009 11:10 hs
|
|
|
|
