Como eliminar el formato de campos de formulario

Hola Jorge :-)

Cordial Saludo;

El problema es que cuando yo relleno un formulario, todo queda escrito y
agrupado en un campo de texto, por tal motivo al yo seleccionar con el mouse
cualquier renglon de lo digitado, se me selecciona todo el campo de texto
completo y es bastante complicado realizar cualquier correcion dentro del
texto.
...

Sip recuerdo que era Sobre la macro de insertar imagenes :-)

bien pues el problema que ahora te pasa es porque tienes el formulario
desprotegido :-) para seleccionar parrafos de esos campos tendras que
» proteger » el formulario [ ya que estos campos cuando estan
desprotegidos cuando haces click con el mouse se seleccionan completos
corriendo el riesgo de borrar lo introducido en ellos ]

No se si sera neceserio para hacer esa seleccion el tener el formulario
desprotegido ???


Comentanos ok? :-)


Saludos
Monica


Estado: A la Espera By Fermu

Tic-Tac-Tic-Tac...

» Now We are free [Enya]
» United states of love [ Westbam and the love commitee ]

www.fermu.com

Hola Monica;

Gracias por la pronta respuesta.

No se si sera neceserio para hacer esa seleccion el tener el formulario
desprotegido ???

Comentanos ok? :-)

Estado: A la Espera By Fermu

Tic-Tac-Tic-Tac...

» Now We are free [Enya]
» United states of love [ Westbam and the love commitee ]

www.fermu.com

Si, lo que dices es correcto cuando se tiene el formulario desprotegido si
se da click en alguna parte del texto, se selecciona todo el campo completo y
como tu lo dices se corre el riesgo de borrar la informacion con un solo
"enter".
El problema es que despues que el formulario es diligenciado, otra persona
lo debe desproteger y corregir, por tanto necesita entrar a los campos de
texto teniendo el formulario desprotegido y realizar modificaciones.

No se si conoscas alguna opcion aparte de volver a proteger el fomulario,
para entrar libremente a esos campos de texto o hacer alguna modificacion
para que no se comporten como tal.

Cordial Saludo,
Jorge


Pd: Hablando de lo de insertar graficas (Tienes muy buena memoria que
todavia lo recuerdas, :) , ). Ya tengo la barra de herramienta habilitada
para insertar imagenes. Pero necesito otra para poder eliminar las imagenes,
ya que en caso de que inserten la imagen que no es por equivocacion, como las
plantillas estan bloqueadas no pueden pararse sobre ellas y eliminarlas.
Supongo que es con otra macro, pero la verdad no conosco muy bien los comando
para hacerlo. Cualquier ayuda sobre esto, tambien te lo agradeceria.

Hola Jorge :-)

No se si conoscas alguna opcion aparte de volver a proteger el fomulario,
para entrar libremente a esos campos de texto o hacer alguna modificacion
para que no se comporten como tal.

PUes me temo que hasta donde se no si si es posible hacerle algo a esos
campos :-? y no se como podrias hacerlo :-?

Pd: Hablando de lo de insertar graficas (Tienes muy buena memoria que
todavia lo recuerdas, :) , ). Ya tengo la barra de herramienta habilitada
para insertar imagenes. Pero necesito otra para poder eliminar las imagenes,
ya que en caso de que inserten la imagen que no es por equivocacion, como las
plantillas estan bloqueadas no pueden pararse sobre ellas y eliminarlas.
Supongo que es con otra macro, pero la verdad no conosco muy bien los comando
para hacerlo. Cualquier ayuda sobre esto, tambien te lo agradeceria.

Pues bien si solo es en un campo en el cual se insertan imagenes prueba
el siguiente codigo: [ y en el documento no hay mas imagenes mas que la
que se tiene que insertar en el campo o marcador habilatado para tal
funcion: [ y las imagenes insertadas son en linea con el texto ] igual
que el codigo que utilizabamos para insertar imagenes en linea con el
texto pues prueba los iguiente:

'[]


Sub test()

On Error Resume Next

ActiveDocument.Unprotect ("111")

ActiveDocument.InlineShapes(1).Delete

ActiveDocument.Protect Type:=wdAllowOnlyFormFields, _
NoReset:=True, Password:="111"

End Sub

'[]

Comentanos si hace falta modifica o añadir ok? :-)

Saludos
Monica




Estado: A la Espera By Fermu

Tic-Tac-Tic-Tac...

» Now We are free [Enya]
» United states of love [ Westbam and the love commitee ]

www.fermu.com

Hola monica;

"Tux" wrote:

PUes me temo que hasta donde se no si si es posible hacerle algo a esos
campos :-? y no se como podrias hacerlo :-?

Yo tambien Pense que no era posible eliminar ese formato. El problema que
tengo, es que la aplicacion la va a utilizar un señor que es mayor y me ha
dicho que le molesta bastante dar click y que se le seleccione todo el
parrafo completo. Voy a ver que mas pasa, por que con word fue la unica
opcion que encontre segun lo que se necesitaba.

Pues bien si solo es en un campo en el cual se insertan imagenes prueba
el siguiente codigo: [ y en el documento no hay mas imagenes mas que la
que se tiene que insertar en el campo o marcador habilatado para tal
funcion: [ y las imagenes insertadas son en linea con el texto ] igual
que el codigo que utilizabamos para insertar imagenes en linea con el
texto pues prueba los iguiente:

'[]


Sub test()

On Error Resume Next

ActiveDocument.Unprotect ("111")

ActiveDocument.InlineShapes(1).Delete

ActiveDocument.Protect Type:=wdAllowOnlyFormFields, _
NoReset:=True, Password:="111"

End Sub

'[]

Con respecto a este codigo que me diste, si hacen lo adecuado, te lo
agradesco. Solo ahi una cosa que se podria arreglar, pero no se como.
En algunos formularios se tienen 3 graficas, en otros formularios se tienen
6 graficas. En el codigo que me diste veo que en la linea
".InlineShapes(1).Delete" yo puedo seleccionar el numero de la grafica que
deseo eliminar. Si coloco 1, se borra la primera grafica que se encuentra en
la plantilla, si coloco 2 se borra la segunda grafica y asi sucesivamente.
Pero en ocasiones insertan la segunda grafica, sin insertar antes la
primera, pero se equivocan, por tal deben eliminar la segunda grafica,
estando ella en primer orden en la plantilla.

En otras palabras, lo que necesito es poder escoger la imagen que quiero
eliminar y no que sea la primera o segunda o tercera imagen en la plantilla,
ya que el orden en que se encuentren puede ser diferente. En las plantillas
cada imagen esta asignada por un marcador, entonces tal vez alla alguna forma
de seleccionar el marcador y eliminar esa imagen de forma especifica.

Espero hacerme enteder.

Cordialmente,
Jorge

Hola Jorge :-)

Yo tambien Pense que no era posible eliminar ese formato. El problema que
tengo, es que la aplicacion la va a utilizar un señor que es mayor y me ha
dicho que le molesta bastante dar click y que se le seleccione todo el
parrafo completo. Voy a ver que mas pasa, por que con word fue la unica
opcion que encontre segun lo que se necesitaba.

Pues es que no se que estas haciendo realmente :-P no acabo de hacerme a
la idea para darte alguna idea valga el rebuzdancia :D pero bien te
pregunto ok? :

una vez que se corrige ese formulario necesitaras de nuevo esos campos
de formulario ya corregido ??? y de ser asi son muchos campos los que
se necesita corregir ???

mediante una macro se puede quitar el formato pero lo dejarias como
texto plano o sin formato , te podria valer asi, no se eh? :-? ya nos
comentas :-)

.
En otras palabras, lo que necesito es poder escoger la imagen que quiero
eliminar y no que sea la primera o segunda o tercera imagen en la plantilla,
ya que el orden en que se encuentren puede ser diferente. En las plantillas
cada imagen esta asignada por un marcador, entonces tal vez alla alguna forma
de seleccionar el marcador y eliminar esa imagen de forma especifica.

Bien sustituyendo la siguiente linea:

ActiveDocument.InlineShapes(1).Delete


por lo siguiente :

'[]

With Selection

.GoTo What:=wdGoToBookmark, Name:="marcador_x"
.InlineShapes(1).Delete

End With

'[]


Tenemos que el codigo siempre elimininara la imagen que se encuentre en
el marcador_x

Y Tambien puedes ponerle un inputbox para introducir ahi el nombre de
marcador que por ejemplo puedes assignar a los marcadores de los campos
o marcadores normales , puedes ponerles el nombre de los graficos por
ejemplo:

'[]

Sub prueba1()

Dim x As String

x = InputBox("Escriba el nombre de marcador", "...")

On Error Resume Next

ActiveDocument.Unprotect ("111")
With Selection

.GoTo What:=wdGoToBookmark, Name:=x
.InlineShapes(1).Delete

End With

ActiveDocument.Protect Type:=wdAllowOnlyFormFields, _
NoReset:=True, Password:="111"
End Sub

'[]

Comentanos ok? :-)

Saludos
Monica



Estado: A la Espera By Fermu

Tic-Tac-Tic-Tac...

» Now We are free [Enya]
» United states of love [ Westbam and the love commitee ]

www.fermu.com