Fóruns
Microsoft Excel - 2...
2024 - VBA & Macros
Macro abrir um arqu...
 
Notifications
Clear all

Macro abrir um arquivo em um programa.

 
2024 - VBA & Macros
2 Posts
2 Usuários
0 Reactions
677 Visualizações
RSS
engeel2014
 engeel2014
(@engeel2014)
Posts: 207
Estimable Member
Topic starter
 

Boa noite pessoal. possuo muitos arquivos no formato "ISO" no meu computador e uso o programa "Alcohol 120" para gravar estes arquivos nos DVD's. Preciso de uma macro no Excel que abra determinado arquivo no formato ISO no programa. Tentei o código abaixo porém só abre o programa, mas o arquivo não é aberto dentro do programa. Alguem sabe onde está o erro?

Public Sub OpenProgram()
Dim x As Variant
Dim Path As String
Dim File As String

Path = "C:\Program Files (x86)Alcohol SoftAlcohol 120\Alcohol.exe"
File = "D:PROGRAMASWindows 7.iso"

x = Shell(Path + " " + File, vbNormalFocus)
End Sub

Lucélio Ferreira dos Santos
Eng. Eletricista
CREA: DF-7165/TD
[email protected]

 
Postado : 14/08/2015 9:28 pm
Fernando Fernandes
 Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
 

Apesar de achar que o Excel não é a melhor opção para isso, e não utilizar o Alcohol; testei e funcionou com o PowerIso;
porem sua sintaxe do Path me parece estranha --> C:\Program Files (x86)Alcohol SoftAlcohol 120\Alcohol.exe
Assim funionou como PowerIso

Public Sub OpenProgram()
Dim x As Variant
Dim Path As String
Dim File As String

Path = "C:Arquivos de programasPowerISOPowerISO.exe"
File = "D:DiversosProgramasUtilitariosEpson.iso"

x = Shell(Path + " " + File, vbNormalFocus)
End Sub

Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel

 
Postado : 15/08/2015 6:52 am
Forum Jump:
  Tópico Anterior
Próximo Tópico