Consejo: Otros idiomas son traducidos por Google. Puedes visitar el English versión de este enlace.
Iniciar sesión
x
or
x
x
Suscríbete
x

or

¿Cómo insertar una tabla flotante o un cuadro de texto en la hoja de trabajo de Excel?

Si tiene una tabla o un cuadro de texto con algunos datos importantes que desea que siempre estén visibles en la pantalla de la hoja de trabajo, aunque al desplazarse hacia arriba o hacia abajo en la hoja de trabajo. Esta puede ser una tarea interesante, este artículo, voy a presentar un truco rápido para resolverlo.

Insertar tabla flotante en Excel con código VBA

Insertar textbox flotante en Excel con código VBA


Maximice o minimice la ventana de la hoja de trabajo:

Para maximizar la ventana de la hoja de cálculo puede liberar más espacio para los usuarios; en Excel, puede maximizar la ventana de la hoja de cálculo al ocultar cinta, barra de fórmulas o barra de estado. Kutools for Excel's Área de trabajo puede ayudarte a ocultar la cinta con solo un clic. ¡Descarga y prueba gratis Kutools for Excel ahora!

doc insert floating table 6


flecha azul burbuja derecha Insertar tabla flotante en Excel con código VBA


No hay forma directa para que inserte la tabla flotante, por lo que debe convertir los datos de la tabla en una imagen y luego aplicar un código para finalizarla, haga lo siguiente:

1. Seleccione la tabla de datos que desea mantener visible, luego haga clic copia > Copiar como imagen bajo la Inicio pestaña, ver captura de pantalla:

doc insert floating table 1

2. En el estallado Copiar imagen cuadro de diálogo, seleccione Como se muestra en la pantalla del Apariencia sección y elija Imagen bajo la Formato Sección, haga clic en OK para cerrar el cuadro de diálogo, y luego haga clic en una celda para mostrar la imagen, por último, presione Ctrl + V para pegar esta imagen, ver captura de pantalla:

doc insert floating table 2

3. Después de convertir la tabla en una imagen, haga clic con el botón derecho en la pestaña de la hoja que contiene la imagen de la tabla que desea mantener siempre visible, y elija Ver código desde el menú contextual, y en el menú abierto Microsoft Visual Basic para aplicaciones ventana, copie y pegue el siguiente código en el Módulo en blanco:

Código de VBA: inserte la tabla flotante en excel:

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
'Updateby Extendoffice 20161116
    Application.ScreenUpdating = False
    If Target.Cells.Count > 1 Then Exit Sub
        With ActiveSheet.Shapes("Picture1")
            .Top = ActiveWindow.VisibleRange.Top + 5
            .Left = ActiveWindow.VisibleRange.Left + ActiveWindow.VisibleRange.Width - .Width - 45
        End With
    Application.ScreenUpdating = False
End Sub

Nota: En este código, el Picure1 es el nombre de la imagen que ha creado, por favor cámbielo a su necesidad.

doc insert floating table 3

4. A continuación, guarde y cierre la ventana de código; ahora, cuando desplaza la hoja de trabajo y hace clic en una celda, la imagen de la tabla siempre se conserva en la esquina superior derecha de la hoja de trabajo.


flecha azul burbuja derecha Insertar textbox flotante en Excel con código VBA

Para insertar un cuadro de texto flotante, aquí también hay un código de VBA para resolver esta tarea.

1. Primero, debe insertar un cuadro de texto del Desarrollador pestaña, clic Desarrollador > recuadro > Cuadro de texto (control ActiveX), y luego dibuje el cuadro de texto e ingrese la información en el cuadro de texto como lo necesite. Ver captura de pantalla:

doc insert floating table 4

2. A continuación, haga clic con el botón derecho en la pestaña de la hoja que contiene el cuadro de texto que desea que permanezca visible siempre, y elija Ver código desde el menú contextual, y en el menú abierto Microsoft Visual Basic para aplicaciones ventana, copie y pegue el siguiente código en el espacio en blanco Módulo:

Código de VBA: inserte un cuadro de texto flotante en Excel:

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
'Updateby Extendoffice 20161116
    Application.ScreenUpdating = False
    With ActiveWindow.VisibleRange
        TextBox1.Top = .Top + 5
        TextBox1.Left = .Left + .Width - TextBox1.Width - 45
    End With
    Application.ScreenUpdating = True
End Sub

Nota: En este código, el TextBox1 es el nombre del cuadro de texto que ha insertado, por favor cámbielo a su necesidad.

doc insert floating table 5

3. Luego guarde y cierre la ventana de código, ahora, cuando desplaza la hoja de trabajo a cualquier lugar, el cuadro de texto insertado siempre se mantiene en la esquina superior derecha de la hoja de trabajo.


Kutools for Excel: la mejor herramienta de productividad de Office aumenta su productividad en un 80%

  • Super Formula Bar (edite fácilmente varias líneas de texto y fórmula); Diseño de lectura (lee y edita fácilmente un gran número de celdas); Pegar en rango filtrado...
  • Combinar celdas / filas / columnas y mantener datos; Contenido de celdas divididas; Combinar filas duplicadas y suma / promedio... Prevenir células duplicadas; Comparar rangos...
  • Seleccione Duplicado o Único Filas; Seleccionar filas en blanco (todas las celdas están vacías); Super Find y Fuzzy Find en muchos libros de trabajo; Selección aleatoria ...
  • Copia exacta Celdas múltiples sin cambiar la referencia de fórmula; Crear referencias automáticamente a múltiples hojas; Insertar viñetas, Casillas de verificación y más ...
  • Fórmulas favoritas e insertadas rápidamente, Gamas, cuadros y cuadros; Cifrar celdas con contraseña Crear una lista de correo y enviar correos electrónicos ...
  • Extracto del texto, Agregar texto, Eliminar por posición, Eliminar espacio; Crear e imprimir subtotales de paginación; Convertir entre contenido de celdas y comentarios...
  • Súper filtro (guardar y aplicar esquemas de filtro a otras hojas); Clasificación avanzada por mes / semana / día, frecuencia y más; Filtro especial por negrita, cursiva ...
  • Combinar libros de trabajo y hojas de trabajo; Combinar tablas basadas en columnas clave; Dividir datos en varias hojas; Conversión por lotes xls, xlsx y PDF...
  • Funciona con Office 2007-2019 y 365, y es compatible con todos los idiomas. Es fácil de implementar en su empresa. Funciones completas de prueba gratuita de 60-day.
pestaña kte 201905

Office Tab lleva la interfaz con pestañas a Office y hace que su trabajo sea mucho más fácil

  • Habilitar la edición y lectura con pestañas en Word, Excel, PowerPoint, Editor, Acceso, Visio y Proyecto.
  • Abra y cree varios documentos en nuevas pestañas de la misma ventana, en lugar de en nuevas ventanas.
  • ¡Aumenta tu productividad en un 50% y reduce cientos de clics de ratón por ti todos los días!
fondo officetab
Say something here...
symbols left.
You are guest ( Sign Up? )
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.
  • To post as a guest, your comment is unpublished.
    Thomas Maier · 25 days ago
    Hi,
    Somewhere between steps 2 and 3 on "Insert Floating Table In Excel With VBA Code" I missed how to name the picture I just copy and pasted.

    Tom
  • To post as a guest, your comment is unpublished.
    Guest · 5 months ago
    If I re-size the window, the picture floats too far into the middle. How do I make the picture float to the same margin from the screen no matter what size window I have?
  • To post as a guest, your comment is unpublished.
    Rachelle Reamer · 1 years ago
    Thank you-this solved my problem very easily!