Código para cambiar número a negativo

5 envíos / 0 nuevos
Último envío
Jesús Martínez
Imagen de Jesús Martínez
Offline
última acción: Hace 4 años 5 meses
Nivel 1 - 200 puntosNivel 2 - 500 puntosNivel 3 - 1000 puntosNivel 4 - 2000 puntos
alta: 31/03/2013 - 17:15
Puntos: 5008
Código para cambiar número a negativo

Hola amig@s:

Como puedo hacer que el valor del textbox7 pase formato negativo a la hoja2 ?

Hoja2.Cells(por, 19).Value = CDbl(TextBox7.Text) 'NETO BS

En el textbox7 ingreso el dato positivo sin signo de - , pero al pasar a la hoja2 quisiera que pase con negativo para restar el saldo.

Gracias

Jesús

Etiquetas: 

visitante (no verificado)
Imagen de visitante
Re: Código para cambiar número a negativo

no se si te vale

 

crea un string

 

a$="-"

b$="tu numero"

 

c$= a$+b$

 

pasa el strig a numero  val(c$)

Jesús Martínez
Imagen de Jesús Martínez
Offline
última acción: Hace 4 años 5 meses
Nivel 1 - 200 puntosNivel 2 - 500 puntosNivel 3 - 1000 puntosNivel 4 - 2000 puntos
alta: 31/03/2013 - 17:15
Puntos: 5008
Re: Código para cambiar número a negativo

Si me podrias explicar un poco mas por favor te agradeceria

Saludos

Jesús

Jesus Martinez Plantarosa

pacomegia
Imagen de pacomegia
Offline
última acción: Hace 2 semanas 11 horas
Nivel 1 - 200 puntosNivel 2 - 500 puntosNivel 3 - 1000 puntosNivel 4 - 2000 puntosNivel 5 - 4000 puntosadministrador
alta: 27/12/2006 - 23:26
Puntos: 11175
Re: Código para cambiar número a negativo

yo simplemente pondría un signo menos delante de la conversión a doble.

Hoja2.Cells(por, 19).Value = -CDbl(TextBox7.Text) 'NETO BS

 

------
Ya sé Excel, pero necesito más.

Jesús Martínez
Imagen de Jesús Martínez
Offline
última acción: Hace 4 años 5 meses
Nivel 1 - 200 puntosNivel 2 - 500 puntosNivel 3 - 1000 puntosNivel 4 - 2000 puntos
alta: 31/03/2013 - 17:15
Puntos: 5008
Re: Código para cambiar número a negativo

Capoooo, gracias esta barbara la idea

Saludos

Jesús

Jesus Martinez Plantarosa