Cómo cargar una imagen en Excel en Autoopen tiempo usando Visual Basic

Visual Basic (VB) es el lenguaje de programación de la suite Microsoft Office, incluyendo Excel. Con VB puede realizar las mismas funciones disponibles para los usuarios de la interfaz estándar de Excel, incluyendo la importación de gráficos cuando se abre un libro de trabajo. Un paso en escribir un programa de VB para realizar esta tarea es identificar las funciones y objetos del modelo de objetos de Excel necesarias para importar imágenes. Este proyecto requiere relativamente pocas líneas de código del programa, y ​​que hace que sea una introducción ideal a la programación VB para Excel.

Instrucciones

1 Abrir Excel, a continuación, haga clic en la pestaña "Sheet1" en la parte inferior de la pantalla. Haga clic en la opción "Ver código" para visualizar el entorno de codificación VB.

2 Haga doble clic en el elemento "ThisWorkbook" en el panel de "Proyecto" a la izquierda de pantalla. Esta acción muestra una ventana de código en blanco proporcionando un espacio para introducir programas que afectan a todo el libro.

3 Haga clic en la lista desplegable de más a la izquierda cerca de la parte superior de la pantalla - que en la actualidad muestra "General". Haga clic en el tema "Libro de trabajo" en la citada lista. El extremo derecho lista desplegable mostrará una lista de funciones que se ejecutan cuando se producen varios eventos que involucra el libro. Una de estas funciones de eventos, "abierto", se ejecuta cuando se abre por primera vez el libro.

4 Haga clic en la opción "Abrir" en el extremo derecho de lista desplegable para crear una función de eventos en blanco llamado "Workbook_Open." Pegue el siguiente código anterior declaración "End Sub" de esta función:

ActiveSheet.Pictures.Insert ( "<YOUR_PICTURE_FILENAME_HERE>"). Seleccionar

5 El tipo sobre el texto "<YOUR_PICTURE_FILENAME_HERE>" con el nombre de ruta de un archivo de imagen en su disco duro (por ejemplo, "C: \ Users \ ClarkKent \ imágenes \ MyBeachParty.jpg").

6 Volver a la interfaz estándar de Excel con la tecla "Alt-F11" y pulse "Alt-F4" para iniciar cerrar el libro. Escriba un nombre de archivo para el libro cuando se le solicite, y seleccione "libro habilitado para macros (* .xlsm)" para el tipo de archivo.

7 A abrir el libro. El programa se completó en el paso 4 se ejecutará, y cargar el archivo gráfico especificado en una célula en la primera hoja.

8 Regresar a su programa repitiendo el paso 2, a continuación, reemplace la instrucción actual en el programa con éste:

ActiveSheet.SetBackgroundPicture Nombre del archivo: = "<YOUR_PICTURE_FILENAME_HERE>"

9 Repita el paso 5 para personalizar el código de programa para cargar la imagen de su disco duro, a continuación, cierre y vuelva a abrir el libro. Excel mostrará una imagen de fondo de azulejos a través de la primera hoja de cálculo.

10 Regreso a su programa en el entorno VB (usando instrucciones paso de 2). Reemplace la instrucción individual con los siguientes:

Dim strFile

strFile = InputBox ( "Introducir nombre de ruta de imagen")

ActiveSheet.SetBackgroundPicture Nombre del archivo: = strFile

11 Cerrar y volver a abrir el libro. Su programa le pedirá el nombre de la ruta completa de un archivo gráfico en esta ocasión. Introduzca el nombre de la ruta, a continuación, haga clic en "OK" para cargar el gráfico en el fondo de la primera hoja de cálculo.