Notifications
Clear all

Macro abrir um arquivo em um programa.

2 Posts
2 Usuários
0 Reactions
668 Visualizações
(@engeel2014)
Posts: 207
Reputable 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
 
Postado : 14/08/2015 9:28 pm
(@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
 
Postado : 15/08/2015 6:52 am