automatizar formulario, autorellenar un campo al elegir una opción de lista desplegable

hola,

...documento que contiene una tabla de word..
.. por un lado una columna llamada "tipo de producto",
...se rellena mediante un cuadro de lista desplegable.

Es un control de Formularios o de controles Active X ???

... al seleccionar una opcion de esta lista, se
autocomplete un campo de otra columna.
la columna 2 del documento, selecciono "Refresco de
cola", y quiero que automaticamente en la columna 3
me ponga "RC"
.. Word 2003... es para el trabajo, debe funcionar en
Word 97.

Si son controles de Formularios >>

- Cuantas opciones tienes anadidas ???

Si son controles Active X >>

Como cargas dichos controles con esas opciones???

Word 97 o Word 2007 ???

Comentanos...!

Saludos
Monica

www.fermu.com
www.teladearana.es

pues si, se trata de WORD u OFICCE 97.

cómo cargo los controles pues no lo sé bien, te puedo detallar los
pasos.

me pongo en la celda que quiero la lista desplegable y le doy en la
barra de herramientas FORMULARIO, al botón de campo de formulario con
lista, donde luego edito las opciones que me vá a dejar la lista.

Creo que la mejor manera de hacerlo sin tener que recurrir a
aplicaciones externas es con el editor de visual basic, generando una
macro, pero a partir de ahí me pierdo totalmente.

On 5 nov, 00:10, "Monica May" wrote:

hola,

>...documento que contiene una tabla de word..
>.. por un lado una columna llamada "tipo de producto",
>...se rellena mediante un cuadro de lista desplegable.

Es un control de Formularios o de controles Active X ???

>... al seleccionar una opcion de esta lista, se
>autocomplete un campo de otra columna.
> la columna 2 del documento, selecciono "Refresco de
>cola", y quiero que automaticamente en la columna 3
> me ponga "RC"
>.. Word 2003... es para el trabajo, debe funcionar en
>Word 97.

Si son controles de Formularios >>



- Cuantas opciones tienes anadidas ???

Si son controles Active X >>

Como cargas dichos controles con esas opciones???

Word 97 o Word 2007 ???

Comentanos...!

Saludos
Monica

hola,

WORD u OFICCE 97.
me pongo en la celda que quiero
la lista desplegable y le doy en la
barra de herramientas FORMULARIO,
al boton de campo de formulario con
lista, donde luego edito las opciones que me va a dejar la lista.

Bien se tratan pues de campos de formulario (mucho mejor), puedes poner el
siguiente codigo en un modulo de Visual basic y luego en las propiedades del
campo de lista del formulario, en el apartado de [Ejecutar macro al Salir ]
le asignas el siguiente codigo [Sub campos_lista_formularios()] cuando
salgas con la tecla [ tab] o salgas del campo de lista entonces se ejecutara
el codigo

El siguiente codigo te desprotegera el formulario (se supone que sin
contrasena, ya que si lleva habra que anadirsela al codigo) y si se
seleciona Refresco de Limon entonces en la TABLA 1, Fila 2 columna 2 se
insertara RL y el resto ya para que lo pruebres ??


Puedes probar el siguiente codigo Vba >>

'[]

Sub campos_lista_formularios()

On Error Resume Next
ActiveDocument.Unprotect
Select Case ActiveDocument.FormFields("Listadesplegable1").Result
Case "Refresco de cola"
ActiveDocument.Tables(1).Cell(1, 2).Range = "RC"
Case "Refresco de limon"
ActiveDocument.Tables(1).Cell(2, 2).Range = "RL"
Case "etc"
ActiveDocument.Tables(1).Cell(3, 2).Range = "etc"
End Select
ActiveDocument.Protect wdAllowOnlyFormFields, True
End Sub

'[]

Comentanos!

Saludos
Monica

www.fermu.com
www.teladearana.es

Pues eso era, he utilizado el código y me funciona perfectamente. Es
justo lo que quería.

Muchísimas gracias!


On 5 nov, 22:50, "Monica May" wrote:

hola,

>WORD u OFICCE 97.
>me pongo en la celda que quiero
>la lista desplegable y le doy en la
>barra de herramientas FORMULARIO,
>al boton de campo de formulario con
>lista, donde luego edito las opciones que me va a dejar la lista.

Bien se tratan pues de campos de formulario (mucho mejor), puedes poner el
siguiente codigo en un modulo de Visual basic y luego en las propiedades del
campo de lista del formulario, en el apartado de [Ejecutar macro al Salir ]
le asignas el siguiente codigo [Sub campos_lista_formularios()] cuando
salgas con la tecla [ tab] o salgas del campo de lista entonces se ejecutara
el codigo

El siguiente codigo te desprotegera el formulario (se supone que sin
contrasena, ya que si lleva habra que anadirsela al codigo) y si se
seleciona Refresco de Limon entonces en la TABLA 1, Fila 2 columna 2 se
insertara RL y el resto ya para que lo pruebres ??

Puedes probar el siguiente codigo Vba >>

'[]

Sub campos_lista_formularios()

On Error Resume Next
ActiveDocument.Unprotect
Select Case ActiveDocument.FormFields("Listadesplegable1").Result
Case "Refresco de cola"
ActiveDocument.Tables(1).Cell(1, 2).Range = "RC"
Case "Refresco de limon"
ActiveDocument.Tables(1).Cell(2, 2).Range = "RL"
Case "etc"
ActiveDocument.Tables(1).Cell(3, 2).Range = "etc"
End Select
ActiveDocument.Protect wdAllowOnlyFormFields, True
End Sub

'[]

Comentanos!

Saludos
Monica

Pues gracias muchas a ti por el feed-back :) !!

Saludos
Monica