[Anónimo]

bom dia galerinha!

para abrir o windows explorer, sei que a programação é a seguinte:

private sub cb_22_click()
unload me
shell “explorer.exe c:”, vbnormalfocus
end sub

porem estou querendo que o caminho seja indicado por uma variavel, assim:

private sub cb_22_click()
dim sha as string
sha = sheets(“parametros”).range(“b25”).text
unload me
shell “explorer.exe sha”, vbnormalfocus
end sub

porem no caso, não funciona. alguém poderia me ajudar?

tentei:
shell “explorer.exe”& sha, vbnormalfocus
shell “explorer.exe”& “sha”, vbnormalfocus
shell “explorer.exe (sha)”, vbnormalfocus

não consegui de nenhum jeito.

aguardo um ajuda!

att.
wagner goularte

[Anónimo]

É isto:
shell “explorer.exe” & sha, vbnormalfocus

victor gamboa
vg-excel-gest
vg-excel-gest.blogspot.com/
http://www.youtube.com/user/vgexcelgest2?feature=mhum

proteja a sua informação ou da sua empresa com o xlsworkbooksecuring – template segura para excel :
protect your information or your company with xlsworkbooksecuring – safe template for excel:
http://vg-excel-gest.blogspot.com/p/xlsworkbooksecuring3d.html

[Anónimo]

obrigado pela atenção, mas não é.

vc testou? funcionou?

pra mim está dando erro exatamente nessa linha: shell “explorer.exe” & sha, vbnormalfocus

aguardo um retorno.

att.
wagner goularte

[Anónimo]

desculpa lá mas não estamos a ser pagos para testar nada!! no entanto eu testei agora isto:

sub abrirexplorernapastaindicada()
dim sha as string
sha = “c:usersadmindocuments”
shell “explorer.exe ” & sha, vbnormalfocus

end sub

e funcionou, o teu problema deve estar na sintaxe do texto que está na célula “sheets(“parametros”).range(“b25″).text”
valeu?

[Anónimo]

aqui as pessoas respondem se quiser. otário!

e não funciono.

[jorgerod]

wagner,

já experimentaste assim: shell “%windir%explorer.exe” & sha, vbnormalfocus?

diz qq coisa.

[jorgerod]

caros amigos,

este é um forum pacífico, cordato e para ajuda, na medida das nossas possibilidades e sabedoria. há sempre casos e casos e novos casos e cada um com um problema novo, o que é estupendo, porque isso vai-nos dando mais conhecimentos. o forum serve para este tipo de coisas…. 🙂

vá, lá!!! devem enviar um abraço amigo um ao outro, para bem de todos nós ok?

obrigado aos dois pela participação assídua no forum do exceler. espero que continuem, para bem de todos nós.

jorge rodrigues

[Anónimo]

boa tarde jorge!

continua a parar (erro) nessa parte..

segue anexo.

att.
wagner goularte

[attachment]caminho.xlsm[/attachment]

[Anónimo]

boa tarde jorge!

continua a parar (erro) nessa parte..

segue anexo.

att.
wagner goularte

Caminho.zip

[Anónimo]

desculpa jorge!

sem mais.

att.

[jorgerod]

wagner,

experimenta assim:

sub abrir_pasta()

dim sha as string
sha = sheets(“plan1”).range(“a3”).text

shell “explorer.exe” & ” ” & sha, vbnormalfocus

end sub

tem que haver um espaço entre o comando dp programa a executar (explorer) e o caminho onde tens o ficheiro.

podes ver e depois dizer qq coisa?

fica bem.

[jorgerod]

tudo bem, wagner!!!! 🙂 🙂 🙂

[Anónimo]

aeee… valew !!

era isso mesmo !!

abração !!

[Anónimo]

olá a todos os participantes deste fórum e administradores, tomo a iniciativa de pedir desculpas ao utilizador wagner pela forma como respondi no post #951 deste tópico.

querendo eu dizer nesse post ;
quem ajuda neste fórum e em outros milhares de fóruns pelo mundo inteiro fazem-no voluntariosamente retirando tempo ás suas actividades profissionais como foi o caso em que no meio do meu trabalho decidi tirar 10 minutos e ajudar em dois tópicos com respostas rápidas por forma a regressar o mais rapidamente ao trabalho, deixando assim a minha contribuição.

no post anterior #951 sugeri uma correcção ao código do wagner que dava erro mas não testei pelos motivos já referidos.

recebi então um feedback do wagner (##952) dizendo que não funcionou e que não tinha testado certamente, ao qual eu respondi no #955 com um procedimento completo e testado querendo dizer o que referi em cima.

posto isto o wagner responde no #956 da forma como respondeu…

posto isto segue o seguinte vídeo que mostra como o procedimento que publiquei funciona:
http://www.youtube.com/watch?v=taks3od35aa

o “otário” a que ele se referiu já deu várias respostas ao wagner neste fórum e funcionaram…

É tudo, gostaria de colaborar mais vezes neste fórum mas o tempo é cada vez mais escasso.

victor gamboa
vg-excel-gest

[Anónimo]

bom dia victor gamboa!

já pedi desculpas ao jorge (administrador) e peço a vc tb, e com certeza reconheco a ajuda que vc tem frequentemente dado.

não preciso ficar justificando minha resposta. sem mais.

att.
wagner goularte

[Anónimo]

victor gamboa

apenas mostrando onde estava o erro:

no depoimento #951, vc descreveu a programação abaixo e não funcionou pois ficou faltando espaço após o .exe

shell “explorer.exe” & sha, vbnormalfocus

quando perguntei se testou, é pq no meu não funcionou, então estava tentando entender o pq. e nao estava te cobrando de nada…

já no depoimento #955, esse sim está correto.

shell “explorer.exe ” & sha, vbnormalfocus

grato pela atenção! e desculpe mais uma vez pela resposta, mas foi vc quem me “tirou” primeiro…

att.
wagner goularte

[Anónimo]

estamos então desculpados e fica tudo bem, estarei sempre que possível disponível para ajudar.

victor gamboa
vg-excel-gest

[Anónimo]

alguem da uma força pra mim no meu post…

[Autor]

Artigos