Sub AnimandoWebBrowser()
Worksheets("Hoja1").WebBrowser.Navigate _
"C:\Misimagenes\Home1.swf"
End Sub
Ella funciona perfecto el detalle esta cuando me voy a otra hoja
(2,3,4,5,etc.), cuando vuelvo a la hoja1 me aparece el siguiente
mensaje:
Error en el scrip de esta pag.
Linea 4
carácter 5
error El objeto no acepta esta propiedad o método
cñodigo 0
URL C:\Misimagenes\Home1.swf
¿Desea continuar ejecutando Scripses esta página?
Simplemente le doy Si y se continua mostrando el SWF.
El detalle es que es muy tedioso hacer esto cada vez que tengo que ir
a la Hoja1
De antemano gracias por su ayuda
para mostrar videos *.swf, me temo que un objeto webbrowser no sea lo mas indicado
si tu necesidad no va mas alla de un video o dos (y de tamano "ligero") prueba a "incrustarlos" en tu hoja
(OJO: se incrusta el video completo, por esto te comento lo del tamano "ligero" y NO MAS de uno o dos)
1) incrusta en tu hoja de calculo un control ShockwaveFlash
-> desde la barra de herramientas "cuadro de controles" pulsas en el boton "mas controles..."
y seleccionas dicho control (lo encuentras por orden alfabetico)
2) estando aun en modo de diseno, activa el editor de vba -> atajo de teclado: {Alt}+{F11}
a) selecciona el objeto en el desplegable del cuadro de propiedades (en caso de no ser el elemento activo)
b) en la propiedad "Movie" -> introduce/escribe/(copia/pega) la ruta completa a donde esta en tu DD el archivo *.swf
(obviamente dicho archivo debera estar previamente existente en algun directorio de tu pc)
c) (de regreso en la hoja) ajusta las dimensiones segun sea necesario
d) terminas con el modo de edicion, <guardas tu archivo>, haces alguna/s prueba/s, y..
si cualquier duda (o informacion adicional)... comentas ?
saludos,
hector.
__ OP __
> ... estoy usando la macro que a continuación expongo
>
> Sub AnimandoWebBrowser()
> Worksheets("Hoja1").WebBrowser.Navigate _
> "C:\Misimagenes\Home1.swf"
> End Sub
>
> ... funciona perfecto el detalle esta cuando me voy a otra hoja (2,3,4,5,etc.)
> cuando vuelvo a la hoja1 me aparece el siguiente mensaje:
> Error en el scrip de esta pag.
> Linea 4
> caracter 5
> error El objeto no acepta esta propiedad o metodo codigo 0
> URL C:\Misimagenes\Home1.swf
> Desea continuar ejecutando Scripses esta pagina?
Bendiciones