Separar bookmark y añadirlo en listbox, creando un menu multiopción

30/03/2007 - 12:43 por riderbcn | Informe spam
Buenas

Dese dotar de una funcionalidad a un userform.

onsiste en recuperar unas determinadas lineas de texto de un bookmark,
agregarlas a un listbox y seleccionar una como opción, la cual quiero
que se quede en el contenido del bookmark, desechando las otrar


De momento recupero y agrego el texto, pero al particionarlo con
split, me queda todo en una linea si intento separar con retornos de
carro (Vbcrlf) y me aparece un carácter especial que no sé eliminar.¶

Si cambio el carácter separador por uno de texto como el punto, la
opcón funciona correctamente, pero en el list box aparece el carácter
¶.

Si en split utilizo ese carácter como separador, no funciona.

De este modo podemos hacer textos con opciones seleccionables tan solo
marcando todas las opciones denro de un bookmark y cargandolas en el
listbox. Es más rápido que cargar y diseñar options buttons. Si a
alguien se le ocurre otra manera.. pues bienvenida sea.

Public Sub Mostraropcion(resmarcador As String)
'Array dinámico para almacenar las lineas mediante Split
Dim a() As String
Dim i As Integer

a = Split(ActiveDocument.Bookmarks(resmarcador).Range, ".") ' Aqui
cambiando el punto por VBclrf, vbKeyReturn no funcionan.

'Recorremos el arreglo y vamos insertando los items en el ListBox
For i = LBound(a) To UBound(a)
UserForm1.ListBox1.AddItem a(i)
Next
InformeAuditoria.Hide
ActiveDocument.Bookmarks(resmarcador).Select
UserForm1.Show
ActiveDocument.Bookmarks(resmarcador).Range.Text UserForm1.ListBox1.Value ' cargo el valor
End Sub

En el userform solo hay un control listbox y un boton para aceptar,
que oculta el formulario (con unload, no devuelvo el valor
seleccionado del listbox).

De momento sólo con conseguir quitar el caracter ¶ ya estará perfecto.
 

Leer las respuestas

#1 Tux
01/04/2007 - 01:22 | Informe spam
riderbcn escribió:
Buenas

Dese dotar de una funcionalidad a un userform.

onsiste en recuperar unas determinadas lineas de texto de un bookmark,
agregarlas a un listbox y seleccionar una como opción, la cual quiero
que se quede en el contenido del bookmark, desechando las otrar
..




Buenas Javier :-)

Pues bien despues de darle vueltas y mas vueltas con el codigo y con el
tema de la dichosa marquita de parrafo [¶ ], disfrutando en todo
momento del proceso eso si eh? ;-) , pues desde que mi tostadora ha
puesto el play hata que he cantado Bingo pues ufhhhhhh! pero.

sisisiisisissiisisis! ya se porque, ya se porque y su solucion :-)
sisiisisis!, perooooooooo ahora me voy a dormir jajajajajaj! asi que lo
contare mañana, veras que es nada una pequeña cosilla de nada :-)
perooooo ya comento mañana :-D !!!


Muy Buenas noches ;-)!!

Saludos
Monica



Estado: A la Espera By Fermu

Tic-Tac-Tic-Tac...

Now We are free [Enya]

www.fermu.com

Preguntas similares