error 5854 el parámetro de la cadena es demasiado largo
Publicado por Andrea (1 intervención) el 19/01/2021 20:00:08
Buenas tardes,
recurro a este foro porque estoy intentando automatizar la tarea de cumplimentsar una plantilla Word a parti de datos almacenados en excel.
He encontrado este codigo:
Pero cuando lo ejecuto me da el error 5854 el parámetro de la cadena es demasiado largo cuando hay campos de textos muy largos. Como podría solucionarlo (sin tener que reducir los campos de textos evidentemente)?
Muchas gracias por vuestra ayuda.
recurro a este foro porque estoy intentando automatizar la tarea de cumplimentsar una plantilla Word a parti de datos almacenados en excel.
He encontrado este codigo:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
Sub Generar_Ficha()
ruta = "C:\Users\xxx\xxx\Ifilename.docx"
Set ObjWord = CreateObject("Word.Application")
ObjWord.Visible = True
ObjWord.Documents.Add template:=ruta, NewTemplate:=False, DocumentType:=0
For i = 2 To Hoja5.Range("F1").Value
busqueda = Hoja5.Range("D" & i).Text 'Aquí está el texto que tiene que buscar el documento'
remplazar = Hoja5.Range("C" & i).Text 'Aquí está el texto que tiene que remplazar'
With ObjWord.Selection.Find
.Text = busqueda
.Replacement.Text = remplazar
.Execute Replace:=2
.End With
Next i
ObjWord.ActivateEnd Sub
Pero cuando lo ejecuto me da el error 5854 el parámetro de la cadena es demasiado largo cuando hay campos de textos muy largos. Como podría solucionarlo (sin tener que reducir los campos de textos evidentemente)?
Muchas gracias por vuestra ayuda.
Valora esta pregunta
0