|
Título: Macro en una Mac Publicado por: YessML en 20 Septiembre 2021, 23:45 pm Hola buenas tardes
Estoy intentando hacer una macro, dónde se pueda abrir una plantilla que tengo en word y se llenen los datos automáticamente con la información que tengo en excel, pero cuando corro la macro, ya no me abre el archivo. y me marca error, esta es mi ruta, ˇPor favor, ayuda! Sub genera_word() ruta = "/Users/yeseniamunozlopez/Desktop/CGV CORRESPONDENCIA/VCCR/02 DV OFICIO ACUERDO ADMISION CFCRL.CGV.VCCR.00__.2021.docx" Set objWord = CreateObject("word.Application") objWord.Visible = True objWord.Visible = True objWord.Documents.Add template:=ruta, NewTemplate:=False, documentType:=0 For i = 7 To 100 busqueda = Hoja2.Range("E" & i).Text reemplazar = Hoja2.Range("D" & i).Text With objWord.Selection.Find .Text = busqueda .Replacement.Text = reemplazar .Execute Replace:=2 End With Next i objWord.Activate End Sub |