jueves, 5 de septiembre de 2013

Mostrar barras de desplazamiento horizontal y vertical.

Hace algunos meses, allá por enero de este año, expliqué cómo mostrar u ocultar a la vista del usuario las pestañas de las hojas (ver).
Otra opción interesante que nos encontramos en la misma sección de las Opciones de Excel, menú de Avanzadas y su sección Mostrar opciones para este libro, es la de Mostrar/Ocultar las barras de desplazamiento horizontal y vertical:


El antes y después de la selección de estas opciones lo vemos en las imágenes siguientes.
Sin barras de desplazamiento:

Mostrar barras de desplazamiento horizontal y vertical.


Con barras de desplazamiento:

Mostrar barras de desplazamiento horizontal y vertical.



Bueno saberlo por si algún día nos encontramos un libro de trabajo sin estas útiles barras...

16 comentarios:

  1. Hola Ismael, a mí se me da una situación con mucha frecuencia y es que cuando corro un archivo hacia la derecha o hacia abajo sin colocarle ningún dato, las barras de desplazamiento se van recortando y ya se quedan reducidas, hay alguna forma de poder ampliarlas de nuevo como mínimo hasta donde haya Datos.

    Saludos Amigo
    Lázaro.

    ResponderEliminar
    Respuestas
    1. Hola Lázaro,
      un gusto saludarte.
      Pues lamentablemente de manera automática no, sencillamente tendrías que arrastrar de uno de los lados de la barra y alargarlo hasta donde se quiera.

      Slds cordiales

      Eliminar
  2. Hola. Voy con mi consulta: utilizo este código para situar el cursor justo debajo de la última celda escrita de la columna A:

    Range("a65000").End(xlUp).Offset(1, 0).Select

    Pero además de eso, desearía ver esa celda en pantalla (pues puedo estar más arriba consultando algo, etc, y, para no estar bajando, deseo que la macro no sólo me sitúe el cursor en la celda mencionada, sino verla en pantalla...)

    De añadido, quisiera preguntar si se puede hacer al abrir el archivo.

    Gracias

    ResponderEliminar
    Respuestas
    1. Hola Antonio,
      para que se realice al abrir el Libro tienes que incluir el código en un evento WorkBook_Open incluido dentro del Explorador de proyectos en ThisWorkbook.

      Respecto a la otra cuestión no entiendo que no veas en pantalla la celda seleccionada al usar esa forma (con el método end), ya que lo que hace es seleccionar, y dejar como celda activa y por tanto a la vista la celda que corresponda...

      Salvo que se me escape algo de tu explicación ???

      Slds

      Eliminar
  3. Sobre el primer punto, ¿tienes alguna entrada que lo explique?

    Te comento: se me queda como celda activa (por ejemplo celda A100, pero si yo estoy por ejemplo en A5, en pantalla no se ve A100 (aunque pase a ser la celda activa); debo desplazarme hacia abajo... Sé que con Control + Retroceso, me coloco en celda activa, pero con la macro no cuela...

    ResponderEliminar
    Respuestas
    1. Hola de nuevo,
      he probado para confirmarlo y en mi caso, sólo con el código expuesto arriba, no solo me desplaza si no que me muestra dicha celda... como te comentaba en el anterior comentario.
      Así que se me ocurre que entre tu código haya alguna línea que inmovilice el desplazamiento, quizá con un .ScrollArea
      algo así???
      ThisWorkbook.Sheets("Hoja1").ScrollArea = "A1:A10"

      ...
      Tendría que ver tu fichero y configuración para asegurar y dar una explicación a algo que se sale de la norma...
      Slds

      Eliminar
    2. Tenías razón, amigo: lo que inmovilizaba el desplazamiento eran las líneas:

      Application.ScreenUpdating = False
      Application.ScreenUpdating = True

      , que como sabrás eliminar los parpadeos. Así que he sacado el código y lo he puesto a continuación. Por cierto, como se me cascó el ordenador, un amigo me puso la versión 2010 (pese a mis reticencias... tenía el 2003), gracias a lo cual (o al menos me ha sido posible más fácilmente) dar con el tema de ejecutar una macro al abrir el archivo.

      Mil gracias.

      P.D.: Uno es un animal de costumbres, pero supongo que merece la pena hacer un esfuercito por adaptarse a las nuevas versiones.

      Eliminar
    3. Me alegro dieras con el 'problema'...
      Mucho ánimo con el cambio de versión.. ya te hacía falta jeje...
      Te costará pero merece la pena.
      Slds cordiales

      Eliminar
  4. He usado el código aparte, individualmente, y sí que me funciona. Ya te diré algo...

    ResponderEliminar
  5. Hola Ismael, estoy buscando una función para encontrar un parte de un texto en una celda y una vez encontrado utilizar la función SI en una segunda celda . Por ejemplo
    En la celda A1 se encuentra el texto: "Documento destino Europa"
    En la celda A2 pretendo obtener mediante formula: SI la Celda A1 contiene la palabra Europa entonces "1ªClase".
    Espero haberme explicado
    Muchas gracias
    Rafael

    ResponderEliminar
    Respuestas
    1. Hola Rafael,
      creo que te servirá está fórmula a incluir en A2:
      =SI.ERROR(SI(HALLAR("*europa*";A1);"1ª clase";"");"")

      Slds cordiales

      Eliminar
    2. Hola Ismael, muchas gracias! Funciona perfectamente. Un cordial saludo y nuevamente gracias por la ayuda. Rafael

      Eliminar
    3. hola la barra de desplazamiento vertical y horizontal.., su funcion es correr hacia arriba abajo a la derecha o izquierda o hacia abajo y arriba si poner ningun archivo ni escribir nada..... espero q les sirba ok

      Eliminar