PARA DAM: Posicionar una Imagen en una celda en especifico.
Amigo Dam, espero me puedas ayudar.
Quiero posicionar una imagen en la celda D1 (Todo esto mediante una macro), pero al momento de que la macro termina su proceso posiciona la imagen que quiero en la celda A3. Este es mi código:
Sub IMAGEN()
'
' IMAGEN Macro
'
'
Range("D1").Select
ActiveSheet.Pictures.Insert("C:\Documents and Settings\Mis documentos\SIMULADOR\PRUEBAS\AOL_125.JPG").Select
Selection.OnAction = "Calcular_imagen"
Range("A3").Select
End SubExiste alguna forma de poder posicionarla en la celda que yo deseo?.
Saludos amigo, quedo atento a tu respuesta.
JPC.
1 Respuesta
Respuesta de Dante Amor
1
De esta forma.
Sub IMAGEN()
' IMAGEN Macro
'
ActiveSheet.Pictures.Insert("C:\Documents and Settings\Mis documentos\SIMULADOR\PRUEBAS\AOL_125.JPG").Select
Selection.OnAction = "Calcular_imagen"
Selection.ShapeRange.Top = Range("D1").Top
Selection.ShapeRange.Left = Range("D1").Left
Range("A3").Select
End Sub Saludos. Dante Amor
No olvides finalizar la pregunta.
