Conversion de Numeros a Letras

Hola de nuevo Ludico :-)

Hola Amigos...sera posible que en word yo pueda a través de codigo digitar un
numero y que me aparezca el mismo numero pero en letras...si alguien tiene
algo...os agradeceria.

Saludos

Bien mirate la siguiente conversacion :

http://tinyurl.com/2juc9t

en ella dan un codigo , pruebala y comentanos cualquier ...

...duda y demas 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 nuevamente por tu ayuda..esa macro esta
perfecta...pero...lo que ocurre es que tengo el documento aquel en el cual
estoy haciendo la combinacion de correspondencia y la base de datos tiene
una variable con el nombre valor, el cual viene en numeros y debo
transformarlo a letras, de igual forma se repite varias veces en el
documento. Ahora bien, intente haciendo en el codigo que cantida = valor
pero no me funciona y adicionalmente se requiere que sea automaticamente sin
tener que ejecutar la macro...se que de seguro esto sera facil para ti pero
no para mi...ayudame por fa...

Saludos

LUDICO

"Tux" escribió:

Hola de nuevo Ludico :-)

> Hola Amigos...sera posible que en word yo pueda a través de codigo digitar un
> numero y que me aparezca el mismo numero pero en letras...si alguien tiene
> algo...os agradeceria.
>
> Saludos

Bien mirate la siguiente conversacion :

http://tinyurl.com/2juc9t

en ella dan un codigo , pruebala y comentanos cualquier ...

duda y demas 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 Ludico :-)

Hola Monica..gracias nuevamente por tu ayuda..esa macro esta
perfecta...pero...lo que ocurre es que tengo el documento aquel en el cual
estoy haciendo la combinacion de correspondencia y la base de datos tiene
una variable con el nombre valor, el cual viene en numeros y debo
transformarlo a letras, de igual forma se repite varias veces en el
documento. Ahora bien, intente haciendo en el codigo que cantida = valor
pero no me funciona y adicionalmente se requiere que sea automaticamente sin
tener que ejecutar la macro...se que de seguro esto sera facil para ti pero
no para mi...ayudame por fa...

Saludos

LUDICO

Una pregunta :-P ,

Estas empleando Access ????

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, no no estoy empleando access, el archivo de combinacion es un txt

Saludos

Ludico

"Tux" escribió:

Hola Ludico :-)

> Hola Monica..gracias nuevamente por tu ayuda..esa macro esta
> perfecta...pero...lo que ocurre es que tengo el documento aquel en el cual
> estoy haciendo la combinacion de correspondencia y la base de datos tiene
> una variable con el nombre valor, el cual viene en numeros y debo
> transformarlo a letras, de igual forma se repite varias veces en el
> documento. Ahora bien, intente haciendo en el codigo que cantida = valor
> pero no me funciona y adicionalmente se requiere que sea automaticamente sin
> tener que ejecutar la macro...se que de seguro esto sera facil para ti pero
> no para mi...ayudame por fa...
>
> Saludos
>
> LUDICO
>

Una pregunta :-P ,

Estas empleando Access ????

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 Ludico :-)

Hola Monica, no no estoy empleando access, el archivo de combinacion es un txt

Saludos

Ludico

Bien se me ocurre que vamos a hacer lo siguiente ok? :-)

Bien selecciona un campo combinado y ves a menu Insertar » Marcador y en
esa ventana de dialogo ponle como nombre de marcardor » lunes «

Bien ahora te vas a menu Tabla y debajo del campo combinado en el que
hemos creado un maracador » Inserta una tabla de » 1 fila y 1 columna


Bien una vez hecho esto » » Añade a la macro anterior lo siguiente:


'[]

Dim cTexto As String

Sub Conversion()

Dim Cantidad As String
Dim Respuesta As Integer
Dim NumTmp As String
Dim c01 As Integer
Dim c02 As Integer
Dim pos As Integer
Dim dig As Integer
Dim cen As Integer
Dim dec As Integer
Dim uni As Integer
Dim letra1 As String
Dim letra2 As String
Dim letra3 As String
Dim Leyenda As String
Dim Leyenda1 As String
Dim TFNumero As String

With Selection
.GoTo What:=wdGoToTable, Which:=1
.Tables(1).Select
.Delete Unit:=wdCharacter, Count:=1
.Fields.Add Range:=Selection.Range, _
Type:=wdFieldEmpty, Text:= _
"REF lunes ", PreserveFormatting:=False
.MoveUp Unit:=wdLine, Count:=1
.MoveRight Unit:=wdWord, Count:=1, Extend:=wdExtend

End With

Cantidad = Selection.Text

Cantidad = Validar_Datos(Cantidad) 'Checa que sea un numero

If Cantidad <> "" Then 'Si es diferente de cadena vacia

'resto del codigo anterior .

'[]


Una vez que has colocado el codigo y creado el marcador para ese campo
combinado, colocate en cualuqier punto del documento y dale a ejecutar
la macro , bien eso de momento porque para hacerla automatica
necesitaria saber exactamente como tienes los campos en el documento
combinado ya que no entiendo cuando dices que tienes el campo [ Valor ]
varias veces en el documento ???


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