Si eres de los que piensan que Excel es aburrido, estás equivocado. No es una aplicación aburrida en absoluto ..!
Así es, porque puedes convertir tu aburrida hoja de cálculo de Excel en una atractiva hoja de trabajo. Para esto, puede hacer muchas cosas en el libro de trabajo de Excel, como insertar imágenes gif, agregar animación en sus libros de trabajo, insertar gráficos animados en Excel, insertar gráficos animados en hojas de cálculo, usar dinámicas de etiquetas de datos para crear gráficos de Excel interactivos, etc.
En el tema de hoy aprenderemos a insertar gifs animados en Excel.
Entonces empecemos…!
¿Podemos agregar gifs a excel?
Es una pregunta muy común de muchos usuarios de Excel si es posible agregar imágenes GIF en Excel o no. Todo el mundo sabe que es fácil insertar una imagen en Excel. Porque la opción de insertar imágenes en Excel es muy fácil de obtener, es decir, insertar —> imagen.
Sin embargo, cuando se trata de Insertar imágenes GIF animadas en Excel, este método no funcionará. Por supuesto, la imagen GIF también se insertará en la hoja de trabajo con este paso, pero sin el efecto de animación.
La animación de imagen gif solo funciona cuando la imagen se inserta en un control. Se puede hacer usando Control Toolbox, Design Mode y Microsoft Web Browser.
El código VBA es una parte esencial de agregar un gif animado en excel. Después de completar el procedimiento, se debe editar la página activa de la hoja de Excel. Compruebe también si la animación funciona correctamente o no. Para insertar gifs animados en otras hojas de Excel, puede usar el mismo procedimiento de VBA.
Cómo insertar GIF animados en Excel
En esta sección discutiremos dos maneras diferentes de insertar GIF animados en Excel. En la primera forma, aprenderá cómo insertar una imagen gif en su hoja de cálculo de Excel. Mientras esté en el segundo método, aprenderá cómo insertar imágenes GIF en una celda o rango específico de hojas de cálculo de Excel. Entonces, analicemos cada método uno por uno.
Método 1: inserte el archivo GIF en la hoja de cálculo de Excel
Para incrustar un archivo GIF animado en su hoja de cálculo de Excel. Es importante conocer la ruta completa y el nombre de la imagen GIF. También deberá insertar un fragmento de código VB en su hoja de cálculo de Excel. Sabemos cómo deben hacerse todas las cosas.
Paso 1
Busque la carpeta con la carpeta de los GIF animados que desea insertar. Luego escriba la ruta completa a la carpeta GIF y su nombre de archivo.
Supongamos que el archivo está presente en la subcarpeta de la unidad C: llamada Imágenes. Contiene un archivo de imagen bear.gif que desea colocar en su libro de Excel. Entonces, el nombre completo de la ruta será c:\pictures\bear.gif.
paso 2
Después de eso, abra la hoja de cálculo de MS Excel donde desea agregar el GIF animado.
Paso 3
Toque el menú “Ver” en la cinta del menú de Excel. Luego elija la opción “Barras de herramientas” => y luego toque “Caja de herramientas de control”. Opción.
Etapa 4
Presione el botón superior presente en “Caja de herramientas de control” para habilitar el “Modo de diseño”. En el “Modo de diseño” puede dibujar una estructura de objeto en su libro de Excel que aceptará su objeto como un GIF animado.
Paso 5
Toque el botón inferior presente en “Caja de herramientas de control”. Ahora, en el menú desplegable, elija “Navegador web de Microsoft”. De esta forma, “Microsoft Web Browser” habilitará la visualización de GIF animados.
Paso 6
Haga clic con el botón izquierdo en la hoja de cálculo donde desea incrustar el GIF animado. Dibuja un cuadro grande que pueda contener fácilmente el GIF animado.
Paso 7
Toque la opción de nuevo “Modo de diseño” para deshabilitar el modo de diseño. A continuación, cierre la barra de herramientas abierta “Caja de herramientas de control”.
Paso 8
Desde el teclado manteniendo pulsada la tecla “Otro” presiona el botón “F11”. Esto abrirá la ventana de la aplicación Microsoft Visual Basic en Excel.
Paso 9
Haga doble clic en la hoja de trabajo donde desea agregar la imagen GIF animada. Ahora desde la lista de proyectos presente en la parte superior izquierda de la ventana de VB. Se abrirá la ventana Código de Visual Basic.
Paso 10
en la ventana de código abierto, copie y pegue este código:
Hoja de trabajo secundaria privada_Activar ()
Finalizar sub
Proporcione el nombre de archivo apropiado y el nombre de la ruta presente entre comillas para el archivo GIF.
Paso 11
Toque las diferentes hojas de cálculo de Excel y vuelva a tocar la hoja de cálculo donde agregó la imagen GIF. El GIF animado agregado debería aparecer en el cuadro de elementos de diseño.
Si se ve así, ¡entonces ya está todo listo…! Puedes disfrutar viendo la animación de tus imágenes gif.
Puede ver este video para comprender claramente cómo insertar imágenes GIF animadas en Excel.
Para agregar imágenes GIF animadas desde cualquier dirección web
Pues puedes añadir una imagen gif animada en Excel y desde cualquier dirección web. Para realizar esta tarea, intente con el siguiente código:
Hoja de trabajo secundaria privada_Activar ()
Navegador web1. Navegar “acerca de:
Dim p como objeto, t como doble, l como doble, w como doble, h como doble
Si TypeName(ActiveSheet) <> “Hoja de trabajo”, Salir de Sub
Si Dir(PictureFileName) = “”, Salir de Sub
‘importar imagen
Establecer p = ActiveSheet.Pictures.Insert (PictureFileName)
‘ determinar las posiciones
con células objetivo
t = .Arriba
l = .Izquierda
w = .Offset(0, .Columns.Count).Izquierda – .Izquierda
h = .Offset(.Rows.Count, 0).Superior – .Superior
termina con
imagen de posición
Con p
.sup = t
.Izquierda = l
.Ancho = a
.Altura = h
termina con
Conjunto p = Nada
Finalizar sub
Explicación de la codificación VBA anterior escrita para insertar imágenes gif en celdas o rangos específicos:
Parte 1:
Sub TestInsertPictureInRange()InsertPictureInRange “C:\FolderName\PictureFileName.gif”, _Range(“B5:D10”)
Finalizar sub
La subrutina mencionada anteriormente llamará a la subrutina principal, es decir, InsertPictureInRange, que contiene solo 2 argumentos. En el primer argumento, está la dirección del archivo de imagen con el nombre. Mientras que en el segundo argumento, el rango se establece en el lugar donde desea insertar la imagen en Excel.
Parte 2:
Sub InsertPictureInRange (PictureFileName As String, TargetCells As Range) ‘inserta una imagen y cambia el tamaño para ajustarse al rango TargetCells Dim p As Object, t As Double, l As Double, w As Double, h As Double
Si TypeName(ActiveSheet) <> “Hoja de trabajo”, Salir de Sub
Si Dir(PictureFileName) = “”, Salir de Sub
‘importar imagen
Establecer p = ActiveSheet.Pictures.Insert (PictureFileName)
‘ determinar las posiciones
con células objetivo
t = .Arriba
l = .Izquierda
w = .Offset(0, .Columns.Count).Izquierda – .Izquierda
h = .Offset(.Rows.Count, 0).Superior – .Superior
termina con
imagen de posición
Con p
.sup = t
.Izquierda = l
.Ancho = a
.Altura = h
termina con
Conjunto p = Nada
Finalizar sub
Es la subrutina principal que agrega y escala la imagen para que encaje fácilmente dentro del rango asignado.
Sumerjámonos.
Dim p como objeto, t como doble, l como doble, w como doble, h como doble
Las variables se declaran en esta línea. Aquí p es una variable de objeto y su imagen será propiedad de esta variable únicamente.
Si TypeName(ActiveSheet) <> “Hoja de trabajo”, Salir de Sub
El código anterior verifica si la hoja de trabajo es una hoja de cálculo o algo más. Si no, soltará inmediatamente el código. despues de eso no pasara nada
Si Dir(PictureFileName) = “”, Salir de Sub
Compruebe que ha proporcionado la dirección para insertar las imágenes en la celda de la hoja de cálculo de Excel. Si en caso de que no lo haya dado, saldrá inmediatamente y no pasará nada.
Establecer p = ActiveSheet.Pictures.Insert (PictureFileName)
Es una línea muy importante de su codificación Excel VBA. Básicamente, para esto usamos la función de inserción, es decir, ActiveSheet.Pictures. También mantenga el valor en el objeto p que declaramos al principio.
Usando la variable de objeto p puede ajustar fácilmente la longitud y el ancho de la imagen.
Con TargetCellst = .Topl = .Leftw = .Offset(0, .Columns.Count).Left – .Lefth = .Offset(.Rows.Count, 0).Top – .TopEnd Con
En este segmento del rango dado, puede obtener fácilmente Longitud, Superior, Izquierda, Ancho, etc.
Con p.Top = t.Left = l.Width = wHeight = hEnd Con
Esta parte es básicamente para ajustar la imagen dentro de un cierto rango.
¡Ya está todo listo…! Finalmente, estableceremos la variable p simplemente estableciendo el valor de p en nada.
Conjunto p = Nada
Esta línea libera espacio en la memoria.
El código anterior funcionará bien en el siguiente Excel 2007/2010/2013/2016.
Por ejemplo: supongamos que desea agregar una imagen en el rango A1: C10. Para eso, cambia el código así
Sub TestInsertPictureInRange()InsertPictureInRange “C:\Users\Manish Singh\Downloads\biker.jpg”, _Range(“A1:C10”)
Finalizar sub
Aquí está el resultado:
Envase:
Debe tener suficiente conocimiento sobre cómo insertar una imagen gif animada en Excel. Así que siéntete libre de probar lo anterior. métodos de insertar imagenes gif en excel.