macro para incrustar un bojeto de excel
Publicado por Daniel (1 intervención) el 04/04/2014 12:12:38
tengo un macro grabada donde puedo incrustar un excel. Pero para hacerlo mas dinámico quiero que te deje seleccionar el archivo a incrustar. Alguien me ayuda
1
2
3
4
5
6
7
8
9
10
11
12
Sub incrustar()
'
'
'
Workbooks.Open Filename:="D:\prueba.xlsx"
ActiveWindow.Visible = False
ActiveSheet.OLEObjects.Add(Filename:="D:\prueba.xlsx", Link:= _
False, DisplayAsIcon:=True, IconFileName:= _
"C:\Windows\Installer\{90140000-0011-0000-0000-0000000FF1CE}\xlicons.exe", _
IconIndex:=0, IconLabel:="D:\prueba.xlsx").Select
End Sub
Valora esta pregunta
0