ActiveWindow.Scroll...

hola, jose !

Me he encontrado con este codigo pero no se que hace o para que sirve.
ActiveWindow.ScrollWorkbookTabs Position:=xlFirst
Lo he modificado así pero no me funciona:
Sub scroll()
ActiveWindow.ScrollRow Position:=xlFirst
End Sub
y asi tampoco:
Sub scroll2()
ActiveWindow.ScrollColumn Position:=xlFirst
End Sub
Alguien me hecha una mano?

1) no comentas donde 'te encontraste' el codigo [se parece al ejemplo de la ayuda en linea excel-vba] :))

2) no es lo mismo el metodo 'ScrollWorkbookTabs' que las propiedades 'ScrollRow/ScrollColumn' :-(

3) el metodo 'ScrollWorkbookTabs' es util [p.e.] cuando la barra de desplazamiento horizontal [parte baja de la ventana]
-> 'oculta' algunas de [o no muestra todas] las etiquetas con los nombres de las hojas ;)
-> es como pulsar las flechas de direccion de los 'WorkbookTabs' y mostrar alguna en particular o hasta la inicial/final
[NO cambia de hoja 'activa'] ;)

si cualquier duda [o informacion adicional]... comentas ?
saludos,
hector.

Ese código sirve para "mover" la barra de desplazamiento de la parte de las
pestañas de hojas. Supon que tienes un libro con 100 hojas, y estás en la
hoja 70, si quieres ver la pestaña de la primera hoja (ojo, sólo verla, no
seleccionarla) utilizas el código tal y como te viene.
Creo que los métodos que tú buscas son SmallScroll y LargeScroll del objeto
Window. Por ejemplo:
Sub scroll()
ActiveWindow.SmallScroll Down:
ActiveWindow.SmallScroll ToRight:
End Sub

Espero que te sirva,
Miguel.

"~ jose ~" wrote:

Hola, que tal?

Me he encontrado con este código pero no se que hace o para que sirve.
ActiveWindow.ScrollWorkbookTabs Position:=xlFirst

Lo he modificado así pero no me funciona:
Sub scroll()
ActiveWindow.ScrollRow Position:=xlFirst
End Sub

y así tampoco:
Sub scroll2()
ActiveWindow.ScrollColumn Position:=xlFirst
End Sub

Alguien me hecha una mano?

Gracias, un saludo,
jose

Hola, que tal?

Yo lo que buscaba era que la barra horizontal fuera a tope a la izq. y
la barra vertical a tope arriba, sin cambiar de sitio la celda activa.
Este código lo quiero poner en todas las hojas, asi que supongo que lo
tendré que colocar en el código del llibro.

Gracias, un saludo,
jose

hola, jose !

Yo lo que buscaba era que la barra horizontal fuera a tope a la izq.

1) activewindow.scrollcolumn = 1

y la barra vertical a tope arriba

2) activewindow.scrollrow = 1

sin cambiar de sitio la celda activa.

3) el cursor / la celda activa-seleccionada / ... => 'se queda donde esta' ;)

saludos,
hector.