obligada > microsoft.* > microsoft.word

Angel Romero (13-02-2007, 18:08)
Muy buenas,

ya he leido un par de artículos del grupo de noticias donde te indican como
combinar imagenes en Word. Pero no me ha funcionado.

Tengo un excel donde ubico los datos, y ahí en una columna ubico las
direcciones de las fotos, incluyendo "\\\\....\\....\\aaa.jpg" y de diversas
maneras también, pero nada. Cuando hago la combinación y eso que sigo los
pasos de los documentos que he visto, no ha funcionado. Exceptuando una vez,
que escribí a mano el direccionamiento del campo, que si me logró insertar
una foto, pero nada!!!

Me dais alguna ayuda?

Gracias
Tux (14-02-2007, 13:16)
Angel Romero escribió:
[..]
> una foto, pero nada!!!
> Me dais alguna ayuda?
> Gracias


Hola Angel :-)

Bien para los campos de correspondencia de imagenes, por ejemplo:

En tu columna de Excel tenemos lo siguiente:

Por ejemplo Columna A y en la fila uno en A1 tenemos IMAGENES

En A2 ya tenemos la ruta de la imagen así [todo en una linea ]:

C:\\Documents and Settings\\Monica\\Mis documentos\\Mis
imágenes\\image007.jpg

Para poderla visualizar en Word : [nota : pulsa Alt+F9, para visualizar
los campos, luego vuelvelo a pulsar para verlo normal]

Hemos de insertar un campo llamado INCLUDEPICTURE, para ello tu te
situas en el lugar del documento de word donde quieres incluir la
imagen, entonces te vas a Menu Insertar > campo en el ventana de dialogo
buscas INCLUDEPICTURE le das un click y sin tocar nada mas le das a
aceptar .

Te quedara algo asi:

{INCLUDEPICTURE \* MERGEFORMAT}

Bien pues ahora para insertar la ruta de la imagen de tu libro de excel:

Colocate con el cursor al lado de la "E" de INCLUDEPICTURE, ahi entre
medio de ese campo.

y ya ahora vas a la barra de herramientas de combinar correspondenias e
insertas ahi mismo el campo IMAGENES quedandote asi [con alT+F9 pulsado
anteriormente]

{INCLUDEPICTURE {MERGEFIELD "IMAGENES"} \* MERGEFORMAT}

una vez hecho esto colocate en el campo y dale F9 para actualizarlo y ya
puedes quitar ALT+F9 para verlo normal :-)

No se si me explique bien, pero comentanos ok? :-)

Saludos
MOnica
Angel Romero (14-02-2007, 18:22)
Gracias Monica,
eso era lo que estuve probando. Al final me ha funcionado MÁS O MENOS,
porque estaba usando direcciones de red y no me las cogía, así que me he
creado una unidad donde redireccionarlo y señalarle así las fotos.

Esto me ha funcionado, PERO tengo todavía un problema. No me actualiza las
fotos, tengo que ir registro por registro dándole a F9 para que me actualice
la foto, y si le doy a combinar, me saca todas las hojas con la foto que
tenga activa en ese momento. ALGUNA IDEA PARA SOLUCIONARLO????

Un saludo,

Ángel

"Tux" wrote:
[..]
Tux (14-02-2007, 20:34)
Angel Romero escribió:
> Gracias Monica,
> eso era lo que estuve probando. Al final me ha funcionado MÁS O MENOS,
> porque estaba usando direcciones de red y no me las cogía, así que me he
> creado una unidad donde redireccionarlo y señalarle así las fotos.
> Esto me ha funcionado, PERO tengo todavía un problema. No me actualiza las
> fotos, tengo que ir registro por registro dándole a F9 para que me actualice
> la foto, y si le doy a combinar, me saca todas las hojas con la foto que
> tenga activa en ese momento. ALGUNA IDEA PARA SOLUCIONARLO????
> Un saludo,
> Ángel


Hola Angel :-)

Pues me temo que asi esta hecho, para darle a F9 por cambio de registro
en la barra de herramientas de combinacion, [o por lo menos hasta donde
yo se...:-( ] peroooooo, por codigo es posible hacerlo me explico:

Es posible que al darle al siguiente registro o al anterior registro
desde la barra de herramientas de combinacion de correspondencia,
mediante codigo actualicemos las imagenes al cambiar el codigo pero
tengo que hacer unas pruebas ok? de aqui unas horas te lo subo aqui :-)

Saludos
Monica
Tux (15-02-2007, 01:20)
Angel Romero escribió:
> Gracias Monica,
> eso era lo que estuve probando. Al final me ha funcionado MÁS O MENOS,
> porque estaba usando direcciones de red y no me las cogía, así que me he
> creado una unidad donde redireccionarlo y señalarle así las fotos.
> Esto me ha funcionado, PERO tengo todavía un problema. No me actualiza las
> fotos, tengo que ir registro por registro dándole a F9 para que me actualice
> la foto, y si le doy a combinar, me saca todas las hojas con la foto que
> tenga activa en ese momento. ALGUNA IDEA PARA SOLUCIONARLO????
> Un saludo,
> Ángel


Hola Angel :-)

Bien el codigo para anterior registro y siguiente registro y que te los
actualice es el siguiente:

'------------------------------------------

Sub CombinarRegistroAnterior()
ActiveDocument.MailMerge.DataSource.ActiveRecord = wdPreviousRecord
Selection.WholeStory
Selection.Fields.Update
Selection.EndKey Unit:=wdLine

End Sub

Sub CombinarRegistroSiguiente()
ActiveDocument.MailMerge.DataSource.ActiveRecord = wdNextRecord
Selection.WholeStory
Selection.Fields.Update
Selection.EndKey Unit:=wdLine
End Sub
'----------------------------------------------

Nota: Pon este codigo en un modulo [menu > insertar > modulo]

o ponlo en NewMacros [este modulo se crea cuando grabas una macro en el
documento que estas activo, con solo grabar y sin hacer nada paras la
grabacion ya tienes en visual basic ese modulo para entrar en el ALT+F11
] si tuvieras dudas y demas sobre codigo, modulos y demas tu comentanos
ok? :-)

Se me hace tarde y me he liado haciendo demas cosas y no llego a todo
jejejeej!

Al codigo hace falta pulirlo porque hay que salvar el error que da
cuando no hay mas registros en la base de datos :-) entonces eso pa
mañana :-)

Bueno ya nos comentas ok? :-)

Saludos
Monica
Angel Romero (16-02-2007, 14:30)
Muchas gracias Mónica, eres una máquina, jejeje.
Aunque lo único malo es que cuando le doy a combinar, me saca en el
documento nuevo la imagen activa, y no vuelca los demás registros.
Alguna idea?
Pero gracias en serio.

Ángel Romero

"Tux" wrote:
[..]
Tux (16-02-2007, 19:45)
Angel Romero escribió:
> Muchas gracias Mónica, eres una máquina, jejeje.
> Aunque lo único malo es que cuando le doy a combinar, me saca en el
> documento nuevo la imagen activa, y no vuelca los demás registros.
> Alguna idea?
> Pero gracias en serio.
> Ángel Romero


Hola Angel :-)

Estoy pensando que si seleccionas todo el documento nuevo y le das a F9
¿te lo actualiza? no lo se te pregunto porque a mi me ha pasado una
cosa que llevo rato con ello resulta que cuando crea el nuevo documento
me saca los campos sin comillas y con mucho espacio entre el campo osea
me lo saca asi [Todo esto en el nuevo documento] Le doy a Alt+F9 y me lo
pone asi:

{INCLUDEPICTURE G:\\Documents and Settings\\Monica\\Mis documentos\\Mis
imágenes\\image001.jpg \* MERGEFORMAT}

¿Te pasa a ti eso? comprueba primero selecciona todo el documento Ctrl+E
y luego dale a F9 y si asi no actualiza comprueba esto que he comentado :-)

Comentanos :-)

Saludos
Monica
Tux (17-02-2007, 12:37)
Angel Romero escribió:
> Muchas gracias Mónica, eres una máquina, jejeje.
> Aunque lo único malo es que cuando le doy a combinar, me saca en el
> documento nuevo la imagen activa, y no vuelca los demás registros.
> Alguna idea?
> Pero gracias en serio.
> Ángel Romero


Hola Angel :-)

Bien ya he solucionado el problema que tenia :-) despistes que tiene una
jajajajaja! estos campos son muy sensibles y nada que te comas un
espacio o no pongas bien la ruta en excel se pierde el foco :-( bueno te
digo:

Para solventar el error de la macro cuando le damos a anterior registro
y llega a uno y te sale un letrerito que se ha producido un error en
tiempo de ejecucion pues amos a poner las lineas siguientes para que no
nos diga nada cuando le das a la flecha de anterior registro:

No se si me estoy explicando :-( bueno nos quedaria asi:

Sub CombinarRegistroAnterior()

On Error Resume Next
ActiveDocument.MailMerge.DataSource.ActiveRecord = wdPreviousRecord
Selection.WholeStory
Selection.Fields.Update
Selection.EndKey Unit:=wdLine
On Error GoTo 0

End Sub

Con eso gestionamos el error y luego te paso esta otra macro para que
cuando le des a "Combinar en un nuevo Documento" te salga ya actualizado :

Sub CombinarEnDocumento()

Dialogs(wdDialogMailMerge).Show

Selection.WholeStory
Selection.Fields.Update
Selection.HomeKey Unit:=wdLine

End Sub

La puedes poner debajo de las otras ok? :-)

Bueno ya nos comentas :-)

Saludos
Monica
jegaonav89 (10-12-2018, 04:51)
El sábado, 17 de febrero de 2007, 4:37:53 (UTC-6), Tux escribió:
[..]
> Tic-Tac-Tic-Tac...
>
>


Hola
Su post me ayudo mucho con un problema de correspondencia que tenia pero hace poco dejo de actualizar las imagenes cuando le doy "editar documentos individuales", es un problema por que edito unas 20 correspondencias a la vezy mandar a imprimir manualmente cada registro es una lata, agradezco si mepueden ayudar a corregir esto.

Saludos
Temas Similares