elhacker.net cabecera Bienvenido(a), Visitante. Por favor Ingresar o Registrarse
¿Perdiste tu email de activación?.

 

 


Tema destacado: Arreglado, de nuevo, el registro del warzone (wargame) de EHN


+  Foro de elhacker.net
|-+  Programación
| |-+  Programación General
| | |-+  .NET (C#, VB.NET, ASP)
| | | |-+  Programación Visual Basic (Moderadores: LeandroA, seba123neo)
| | | | |-+  [Excel][VB6] Ejecutar archivo Excel.Solucionado
0 Usuarios y 1 Visitante están viendo este tema.
Páginas: [1] Ir Abajo Respuesta Imprimir
Autor Tema: [Excel][VB6] Ejecutar archivo Excel.Solucionado  (Leído 3,604 veces)
FranciskoAsdf

Desconectado Desconectado

Mensajes: 231


Ni bueno, ni malo. Solo nada.


Ver Perfil WWW
[Excel][VB6] Ejecutar archivo Excel.Solucionado
« en: 15 Julio 2014, 01:25 am »

Hola! :D, he vuelto, con mas preguntas xD.

Directo al grano a ver si alguien me puede ayudar T_T,

Tengo un formulario en donde proceso un archivo Excel (esto me sabe a Déjà vu xD), todo bien, pero quiero que al terminar todo el proceso se abra el archivo para poder seguir usándolo, pero (siempre un pero ¬¬) no me resulta abrirlo, me aparecen una serie de errores antes de abrir el primero archivo Excel de la carpeta y NO el que estoy procesando.

Este es el código que uso para abrir el archivo:

Código
  1. Shell(RutaExcelExe & " " & InvFilePath)
Donde:

RutaExcelExe contiene la ruta donde esta instalado MSExcel.

Código:
C:\Archivos de Programa\Microsoft Office\Office12\Excel.exe

InvFilePath contiene la ruta completa del archivo que estoy procesando. La ruta que contendrá esta variable puede variar (valga la redundancia) ya que el archivo puede ser tomando desde cualquier parte desde un CommonDialog.

Los errores que obtengo son los siguientes
Código:
No se encontró "C:\Documents.xlsx" bla bla bla
No se encontro "and.xlsx"
No se encontro "Settings\panxin\escritorio\ProyectoAsdf\XLSX's\.xlsx"
No se encontro "TEST\Copia.xls"
No se encontro "(2).xlsx"

Lo intente cambiando el comando de la siguiente forma, pero  con comillas ya no toma las variables como variables y si como la ruta y el nombre del archivo, obteniendo el error
Código
  1. Shell("RutaExcelExe" & " " & "InvFilePath")

Código:
"No se encuentra el archivo "InvFilePath"" ¬¬

Así es que es por esto que vengo a solicitar vuestra ayuda a ver si alguien me puede guiar :D!

Saludos y gracias de ante mano :D!




« Última modificación: 15 Julio 2014, 04:35 am por FranciskoAsdf » En línea

Asdf debería ser algún tipo de función.
79137913


Desconectado Desconectado

Mensajes: 1.169


4 Esquinas


Ver Perfil WWW
Re: [Excel][VB6] Ejecutar archivo Excel.
« Respuesta #1 en: 15 Julio 2014, 02:39 am »

HOLA!!!

Tu problema surje por no usar comillas dobles en una ruta de archivo con espacios, para hacer eso haz lo siguiente:

Shell(RutaExcelExe & " " & chr(34) &  InvFilePath & chr(34))

GRACIAS POR LEER!!!


En línea

"Como no se puede igualar a Dios, ya he decidido que hacer, ¡SUPERARLO!"
"La peor de las ignorancias es no saber corregirlas"

 79137913                          *Shadow Scouts Team*
FranciskoAsdf

Desconectado Desconectado

Mensajes: 231


Ni bueno, ni malo. Solo nada.


Ver Perfil WWW
Re: [Excel][VB6] Ejecutar archivo Excel.
« Respuesta #2 en: 15 Julio 2014, 04:33 am »

Hola!,

Funcionó MUCHAS GRACIAS!, por una tontera no me funcionaba xD. Hasta había usado API para hacerlo, pero mejor asi ya que es mas rápido y fácil :D!

Gracias de nuevo y saludos!!
En línea

Asdf debería ser algún tipo de función.
Páginas: [1] Ir Arriba Respuesta Imprimir 

Ir a:  

WAP2 - Aviso Legal - Powered by SMF 1.1.21 | SMF © 2006-2008, Simple Machines