Visual Basic para Aplicaciones - Paso de argumentos a una macro de word

Life is soft - evento anual de software empresarial
 
Vista:

Paso de argumentos a una macro de word

Publicado por Natalia (1 intervención) el 24/06/2002 13:04:28
Hola a todos,
tengo un documento word que tiene asociada una macro que he hecho yo para que haga una serie de cosas. El problema que tengo, es que necesito pasar argumentos a la macro para que ella los manipule y no se hacerlo.

He intentado hacer esto (la macro se llama Combinar):

Sub Combinar(as_nombre AS String, as_direccion As String)
...

código de la macro en la que necesito manipular los argumentos as_nombre y as_direccion
.....

End Sub

Pero en cuanto gravo la macro, ésta desaparece del documento, y en cuanto quito los argumentos ya vuelve a aparecer.

¿Alguien me puede ayudar?, necesito urgentemente poder pasar argumentos a una macro.

Muchísimas gracias de antemano.
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:Paso de argumentos a una macro de word

Publicado por Angel Eduardo Ribera Aquino (1 intervención) el 25/06/2002 01:41:13
Esto puede ser una solución
Se define nombres
Se selecciona el nombre y en el menu Insertar seleccionar la opción marcador, luego se pone Nombre y agregar lo mismo se hace para la direccion
luego copia esta macro en un modulo
Sub macro()
Dim nombre As String
Dim direccion As String
Selection.GoTo What:=wdGoToBookmark, Name:="nombre"
nombre = Selection
Selection.GoTo What:=wdGoToBookmark, Name:="Direccion"
direccion = Selection
MsgBox "Nombre : " & nombre & " Dirección : " & direccion

........ resto del programa
End Sub

Espero que esto te resuelva el problema

Angel Ribera

Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar