Macro para insertar imagenes desde determinada carpeta

[jeladio]

Buena tarde amigos: tendrá alguien por ahí algún macro para buscar e insertar imágenes pero al desplegar la ventana de búsqueda esté direccionada a una carpeta especifica?.

saludos

[Antoni]

.

De la ayuda de VBA sobre ChDir.

ChDir (Instrucción)

Vea también Ejemplo Detalles

Cambia el directorio o carpeta actual.

Sintaxis

ChDir ruta

El argumento requerido ruta, es una expresión de cadena que identifica el directorio o carpeta que va a ser el nuevo directorio o carpeta predeterminado. La ruta puede incluir la unidad de disco. Si no se especifica la unidad, la instrucción ChDir cambia el directorio o carpeta predeterminado de la unidad actual.

La instrucción ChDir cambia el directorio predeterminado, pero no la unidad predeterminada. Por ejemplo, si la unidad de disco predeterminada es C, la siguiente instrucción cambia el directorio predeterminado en la unidad D, pero C continúa siendo la unidad predeterminada:

ChDir "D:\TMP"

ChDir ".." ' Sube un directorio en Microsoft Windows.

.

[jeladio]

Buen día Macro Antonio, gracias por tu respuesta, la macro que estoy utilizando es la siguiente:

Sub ins()

If Application.Dialogs(xlDialogInsertPicture).Show = True Then

  With Selection

      Selection.Name = "Muestra"

      .ShapeRange.LockAspectRatio = msoTrue

      .ShapeRange.Height = 250

      .ShapeRange.Left = .ShapeRange.Left + 1

      .ShapeRange.Top = .ShapeRange.Top + 1

  End With

End If

End Sub[/CODE]

pero no se donde poner la ruta, ¿crees que sea posible?

saludos

[Antoni]

.

Suponiendo que tus archivos estén en C:\Archivos

ChDir("C:\Archivos") ante de mostrar el diálogo de selección de archivos.

.

[FranciscoQuintana]

Como puedo elegir en que cela ubicar la imagen?

Cita

a

[FranciscoQuintana]

Cita

En 3/4/2014 at 14:06 , Antoni dijo:

.

Suponiendo que tus archivos estén en C:\Archivos

ChDir("C:\Archivos") ante de mostrar el diálogo de selección de archivos.

.

Como elegir en que celda o piscion del archivo insertar la imagen?