InícioBoa tarde!
COmo faco para abrir um arquivo Power Point no click do botao ?
Obg
COmo faco para abrir um arquivo Power Point no click do botao ?
Obg
3 participantes
[Resolvido]Abrir Aqruivo PPS ou PPT no evento do botao
Leticia.*-*- Intermediário
- Respeito às regras :
Sexo :
Localização :
Mensagens : 63
Registrado : 02/12/2012
criquio- Moderador Global
- Respeito às regras :
Sexo :
Localização :
Mensagens : 11229
Registrado : 30/12/2009
Você só quer abrir o arquivo pelo Access ou vai ter alguma interação entre os dois?
.................................................................................
Meu novo site: www.vcssistemas.com.br Clique aqui e veja um vídeo que explica como fazer pesquisas no forum. DICA: Quando precisar inserir um exemplo do seu aplicativo, siga os procedimentos abaixo: 1 - faça uma cópia do aplicativo 2 - retire tudo que não for necessário à solução do problema, exceto o que o aplicativo precisar para funcionar 3 - use o Compactar/Reparar 4 - compacte o aplicativo em zip ou rar (zip para postagem como anexo na mensagem) Agradeça a quem lhe ajudou, clicando no joinha de uma das mensagens do usuário. Positive as mensagens que achar útil, no canto superior direito delas. |
Leticia.*-*- Intermediário
- Respeito às regras :
Sexo :
Localização :
Mensagens : 63
Registrado : 02/12/2012
Boa tarde !
nao tera nenhum interacao quero somente abrir o aqruivo localizado em um drive de rede no click do botao
mas aproveitando que citou interacao, que tipi de interacao se refere ?
Obg!
nao tera nenhum interacao quero somente abrir o aqruivo localizado em um drive de rede no click do botao
mas aproveitando que citou interacao, que tipi de interacao se refere ?
Obg!
Convidado- Convidado
Se ajuda...
http://maximoaccess.forumeiros.com/t3860-exibindo-uma-apresentcao-em-power-point-access?highlight=point
Cumprimentos.
http://maximoaccess.forumeiros.com/t3860-exibindo-uma-apresentcao-em-power-point-access?highlight=point
Cumprimentos.
criquio- Moderador Global
- Respeito às regras :
Sexo :
Localização :
Mensagens : 11229
Registrado : 30/12/2009
É possível interagir o Access com o PowerPoint da mesma forma que fazemos com o Excel ou com o Word. Podemos até mesmo criar um ppt inteiro à partir do VBA no Access, criando e posicionando formas, figuras, textos, transições e tudo mais, igual criamos um doc com um texto, tabelas, etc, ou um xls com fórmulas e tudo mais.
Para abrir qualquer arquivo que tenha um programa associado à ele, sendo sem a necessidade de interação com o Access, você pode utilizar o esquema da mensagem n° 2 desse tópico. Esse recurso é interessante porque te permite abrir qualquer arquivo que tenha um programa associado à ele.
Para abrir qualquer arquivo que tenha um programa associado à ele, sendo sem a necessidade de interação com o Access, você pode utilizar o esquema da mensagem n° 2 desse tópico. Esse recurso é interessante porque te permite abrir qualquer arquivo que tenha um programa associado à ele.
.................................................................................
Meu novo site: www.vcssistemas.com.br Clique aqui e veja um vídeo que explica como fazer pesquisas no forum. DICA: Quando precisar inserir um exemplo do seu aplicativo, siga os procedimentos abaixo: 1 - faça uma cópia do aplicativo 2 - retire tudo que não for necessário à solução do problema, exceto o que o aplicativo precisar para funcionar 3 - use o Compactar/Reparar 4 - compacte o aplicativo em zip ou rar (zip para postagem como anexo na mensagem) Agradeça a quem lhe ajudou, clicando no joinha de uma das mensagens do usuário. Positive as mensagens que achar útil, no canto superior direito delas. |
Leticia.*-*- Intermediário
- Respeito às regras :
Sexo :
Localização :
Mensagens : 63
Registrado : 02/12/2012
Valeu
mas o que precisava no momento era somente abrir o aqruivo que ja esta pronto
uma vez vi uma coisa parecido aqui nesse topico
http://maximoaccess.forumeiros.com/t11-102-codigos-vba-para-access
To tentando achar qualquer coisa volto aqui.
mas o que precisava no momento era somente abrir o aqruivo que ja esta pronto
uma vez vi uma coisa parecido aqui nesse topico
http://maximoaccess.forumeiros.com/t11-102-codigos-vba-para-access
To tentando achar qualquer coisa volto aqui.
criquio- Moderador Global
- Respeito às regras :
Sexo :
Localização :
Mensagens : 11229
Registrado : 30/12/2009
O que passei no post anterior é o ideal então.
.................................................................................
Meu novo site: www.vcssistemas.com.br Clique aqui e veja um vídeo que explica como fazer pesquisas no forum. DICA: Quando precisar inserir um exemplo do seu aplicativo, siga os procedimentos abaixo: 1 - faça uma cópia do aplicativo 2 - retire tudo que não for necessário à solução do problema, exceto o que o aplicativo precisar para funcionar 3 - use o Compactar/Reparar 4 - compacte o aplicativo em zip ou rar (zip para postagem como anexo na mensagem) Agradeça a quem lhe ajudou, clicando no joinha de uma das mensagens do usuário. Positive as mensagens que achar útil, no canto superior direito delas. |
Leticia.*-*- Intermediário
- Respeito às regras :
Sexo :
Localização :
Mensagens : 63
Registrado : 02/12/2012
Estava pensando em algo parecido com isso..
Dim nomearquivo As String
Dim planilha As Object
nomearquivo = "C:Arquivo.XLS"
Set ExcelApp = CreateObject("Excel.Application")
Set planilha = ExcelApp.Workbooks.Open(nomearquivo)
ExcelApp.Visible = True
Mas so que para PPT ...
Mas vou tentar o exemplo que me paddou qualquer coisa volto aqui.
Dim nomearquivo As String
Dim planilha As Object
nomearquivo = "C:Arquivo.XLS"
Set ExcelApp = CreateObject("Excel.Application")
Set planilha = ExcelApp.Workbooks.Open(nomearquivo)
ExcelApp.Visible = True
Mas so que para PPT ...
Mas vou tentar o exemplo que me paddou qualquer coisa volto aqui.
criquio- Moderador Global
- Respeito às regras :
Sexo :
Localização :
Mensagens : 11229
Registrado : 30/12/2009
A questão é que dessa forma você sempre terá que adaptar e acrescentar outros blocos de código caso um dia precisa abrir outro tipo de arquivo. Esse que passei, você salva em um módulo e pode usar para qualquer tipo de arquivo com apenas esse módulo.
.................................................................................
Meu novo site: www.vcssistemas.com.br Clique aqui e veja um vídeo que explica como fazer pesquisas no forum. DICA: Quando precisar inserir um exemplo do seu aplicativo, siga os procedimentos abaixo: 1 - faça uma cópia do aplicativo 2 - retire tudo que não for necessário à solução do problema, exceto o que o aplicativo precisar para funcionar 3 - use o Compactar/Reparar 4 - compacte o aplicativo em zip ou rar (zip para postagem como anexo na mensagem) Agradeça a quem lhe ajudou, clicando no joinha de uma das mensagens do usuário. Positive as mensagens que achar útil, no canto superior direito delas. |
Leticia.*-*- Intermediário
- Respeito às regras :
Sexo :
Localização :
Mensagens : 63
Registrado : 02/12/2012
- Mensagem nº10
![[Resolvido]Abrir Aqruivo PPS ou PPT no evento do botao Empty](https://2img.net/i/empty.gif)
Re: [Resolvido]Abrir Aqruivo PPS ou PPT no evento do botao
Leticia.*-* 2/3/2013, 16:36
vou testar e ja posto o retorno! 
JPaulo- Moderador
- Respeito às regras :
Sexo :
Localização :
Mensagens : 11016
Registrado : 04/11/2009
Private Sub SeuBotão_Click()
Dim strPowPT As Object
On Error Resume Next
Set strPowPT = CreateObject("PowerPoint.Application")
strPowPT.Visible = True
strPowPT.Presentations.Open ("C:\teste.ppt")
strPowPT.WindowState = ppWindowMaximized
End Sub
.................................................................................
Contribua com o maximoaccess nos links abaixo, ajude a melhorar este que é o seu site na NET.
Pay-Pal R$ Aqui
Pay-Pal € Aqui
Ou ainda: Aqui (Novo)
Sucesso e Bons Estudos
Success and Good Studies
![[Resolvido]Abrir Aqruivo PPS ou PPT no evento do botao Folder_announce_new](https://2img.net/i/fa/subsilver/folder_announce_new.gif)
Utilize o Sistema de Busca do Fórum... 102 Códigos VBA Gratuitos... Instruções SQL como utilizar...
Leticia.*-*- Intermediário
- Respeito às regras :
Sexo :
Localização :
Mensagens : 63
Registrado : 02/12/2012
- Mensagem nº12
Re: [Resolvido]Abrir Aqruivo PPS ou PPT no evento do botao
Leticia.*-* 2/3/2013, 18:11
Quando Clico no botao ele abri o arquivo PPS e quando clic na tecla ESC ele fecha o arquivo mas mantem o PowerPoint aberto.
Tem como eu fechar o PowerPoint tambem ?
Teria que ser no arquivo do ppt?
Obg!
Tem como eu fechar o PowerPoint tambem ?
Teria que ser no arquivo do ppt?
Obg!
JPaulo- Moderador
- Respeito às regras :
Sexo :
Localização :
Mensagens : 11016
Registrado : 04/11/2009
Teste outra forma simples;
Private Sub SeuBotao_Click()
Shell "RUNDLL32.EXE URL.DLL,FileProtocolHandler " & "C:\teste.pps", vbNormalFocus
End Sub
Private Sub SeuBotao_Click()
Shell "RUNDLL32.EXE URL.DLL,FileProtocolHandler " & "C:\teste.pps", vbNormalFocus
End Sub
.................................................................................
Contribua com o maximoaccess nos links abaixo, ajude a melhorar este que é o seu site na NET.
Pay-Pal R$ Aqui
Pay-Pal € Aqui
Ou ainda: Aqui (Novo)
Sucesso e Bons Estudos
Success and Good Studies
Utilize o Sistema de Busca do Fórum... 102 Códigos VBA Gratuitos... Instruções SQL como utilizar...
Leticia.*-*- Intermediário
- Respeito às regras :
Sexo :
Localização :
Mensagens : 63
Registrado : 02/12/2012
- Mensagem nº14
Re: [Resolvido]Abrir Aqruivo PPS ou PPT no evento do botao
Leticia.*-* 2/3/2013, 21:27
Funcionou 
JPaulo- Moderador
- Respeito às regras :
Sexo :
Localização :
Mensagens : 11016
Registrado : 04/11/2009
Obrigado pelo retorno o forum agradece.
.................................................................................
Contribua com o maximoaccess nos links abaixo, ajude a melhorar este que é o seu site na NET.
Pay-Pal R$ Aqui
Pay-Pal € Aqui
Ou ainda: Aqui (Novo)
Sucesso e Bons Estudos
Success and Good Studies
Utilize o Sistema de Busca do Fórum... 102 Códigos VBA Gratuitos... Instruções SQL como utilizar...
Conteúdo patrocinado
Tópicos semelhantes
|
|
|