Incrustar SWF y permanecer fijo

23/11/2008 - 23:25 por Edixon | Informe spam
Hola buenas tardes grupo, escribo por lo siguiente, tengo
incrustado un *.SWF, en una haja donde hay mas de 300 filas con datos,
la pelicula esta colocada en la parte inferior de la hoja (+/- fila
30) quisiera que esta se mantuviera fija si es decir que no se mueva
con la hoja cuando tenga la necesidad de ver los datos de las proximas
filas

Preguntas similare

Leer las respuestas

#1 Héctor Miguel
24/11/2008 - 01:27 | Informe spam
hola, Edixon !

... incrustado un *.SWF... en la parte inferior de la hoja (+/- fila 30)
... que... se mantuviera fija... no se mueva con la hoja cuando tenga la necesidad de ver los datos de las proximas filas



suponiendo que la fila 30 vendria siendo el borde superior de tu objeto incrustado...
copia/pega (o escribe) y modifica/adapta el siguiente codigo en el modulo de "esa" hoja:

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Me.ShockwaveFlash1.Top = ActiveWindow.VisibleRange.Cells(30, 1).Top
End Sub

notas:
1) implica cambiar la seleccion de la celda activa (con el mouse o teclado)
2) si el desplazamiento ocurre por barras / rueda del mouse, funcionara HASTA que suceda lo anterior
(si lo prefieres, llamando a las API's o usando el Scripting podrias detectar el evento Scroll por barra/s / mouse)
3) si la hoja tiene paneles fijos, entonces Cells(30, 1) aplicara al panel flotante
4) es probable que veas "disminuido" el rendimiento (libro o reproduccion) -?-

saludos,
hector.
Respuesta Responder a este mensaje
#2 Héctor Miguel
24/11/2008 - 03:20 | Informe spam
hola (de nuevo), Edixon !

... incrustado un *.SWF... en la parte inferior de la hoja (+/- fila 30)
... que... se mantuviera fija... no se mueva con la hoja cuando tenga la necesidad de ver los datos de las proximas filas



otra alternativa es que pongas el objeto shockwaveflash en un formulaio y lo muestres "sin modo" (excel 2000 en delante p.e.)

userform1.show vbmodeless

con lo que el formulario permanecera (y lo puedes mover) en pantalla y podras navegar por la hoja sin que se mueva de su posicion

saludos,
hector.
Respuesta Responder a este mensaje
#3 Edixon
24/11/2008 - 15:29 | Informe spam
Hola Hector utilize las dos opciones pero en la primera:
no se mantuvo fijo el SWF
con la segunda opcion no haye la forma de insertar el ShockwaveFlash1
en el userform1

Si me puedes ayudar
Gracias de antemano
Respuesta Responder a este mensaje
#4 Héctor Miguel
24/11/2008 - 21:31 | Informe spam
hola, Edixon !

... utilize las dos opciones pero en la primera: no se mantuvo fijo el SWF
con la segunda opcion no haye la forma de insertar el ShockwaveFlash1 en el userform1



1) que significa "no se mantuvo FIJO el swf" con la primera opcion ?
como estas "navegando" por la hoja ? (debe ser con las teclas NO por mouse ni por barras de desplazamiento)

2) para usar el userform, primero debes agregar el shockwaveflash a la barra de controles para formularios en el editor de vba
- clic-secundario sobre la paleta de controles y seleciona "controles adicionales..."
lo encontraras por orden alfabetico: -> Shockwave Flash Object

- despues lo puedes agregar/incrustar/... en tu formulario

- luego pones algo como lo siguiente en un modulo de codigo estandar...

Sub MostrarSWF_enFormulario()
UserForm1.ShockwaveFlash1.Movie = "c:uta y sub\carpetas a donde esta\tu archivo.swf"
UserForm1.Show vbModeless
End Sub

si cualquier duda... comentas ?
saludos,
hector.
email Siga el debate Respuesta Responder a este mensaje
Ads by Google
Help Hacer una preguntaRespuesta Tengo una respuesta
Search Busqueda sugerida