Aumentar 1 número mas al madeficar una celda

15/02/2006 - 21:37 por K.M. **Ve | Informe spam
Hola amigo como hago que me aumenta un número una celda al madeficar una
celda



En la celda (U2) tengo un numero 5542, quiero que me aumente este numero
cada ves que se madefica la celda (E9) que se aumenta un numero mas = 5543,
con el macro que tengo abajo eso yo lo hacia manual mente que se aumenta un
numero mas cada ves que yo quiera.


Sub Macro1()
'
' Macro1 Macro
' Macro grabada el 15/02/2006 por ***
Folio = Range("U2").Value
Folio = Folio + 1
Range("U2").Value = Folio
End Sub

Preguntas similare

Leer las respuestas

#1 KL
15/02/2006 - 23:02 | Informe spam
Hola K.M. **Ve,

Prueba hacer lo siguiente:

1) Haz clic-derecho sobre el nombre de la hoja en cuestion (en una de las pestanas de la parte de abajo de la ventana de Excel).
2) Elige la opcion Ver Codigo para abrir el editor VBA.
3) Una vez en el Editor VBA, en la ventana mas grande a la derecha pega el codigo que te pongo a continuacion:

'--
Private Sub Worksheet_Change(ByVal Target As Range)
If Intersect(Target, [E9]) Is Nothing Then Exit Sub
[U2] = [U2] + 1
End Sub
'--

4) Ahora pulsa Alt+F11 para volver a la hoja.
5) Prueba cambiar el valor en el rango [E9]

Saludos,
KL


"K.M. **Ve" wrote in message news:e%23cQ4%
Hola amigo como hago que me aumenta un número una celda al madeficar una celda



En la celda (U2) tengo un numero 5542, quiero que me aumente este numero cada ves que se madefica la celda (E9) que se aumenta un
numero mas = 5543, con el macro que tengo abajo eso yo lo hacia manual mente que se aumenta un numero mas cada ves que yo quiera.


Sub Macro1()
'
' Macro1 Macro
' Macro grabada el 15/02/2006 por ***
Folio = Range("U2").Value
Folio = Folio + 1
Range("U2").Value = Folio
End Sub

Respuesta Responder a este mensaje
#2 K.M. **Ve
15/02/2006 - 23:47 | Informe spam
hola amigo KL ya lo hice y no me funciona puede verificar cual es la falla.


Gracias
KM**VE

"KL" escribio en el mensaje
news:%
Hola K.M. **Ve,

Prueba hacer lo siguiente:

1) Haz clic-derecho sobre el nombre de la hoja en cuestion (en una de las
pestanas de la parte de abajo de la ventana de Excel).
2) Elige la opcion Ver Codigo para abrir el editor VBA.
3) Una vez en el Editor VBA, en la ventana mas grande a la derecha pega el
codigo que te pongo a continuacion:

'--
Private Sub Worksheet_Change(ByVal Target As Range)
If Intersect(Target, [E9]) Is Nothing Then Exit Sub
[U2] = [U2] + 1
End Sub
'--

4) Ahora pulsa Alt+F11 para volver a la hoja.
5) Prueba cambiar el valor en el rango [E9]

Saludos,
KL


"K.M. **Ve" wrote in message
news:e%23cQ4%
Hola amigo como hago que me aumenta un número una celda al madeficar una
celda



En la celda (U2) tengo un numero 5542, quiero que me aumente este numero
cada ves que se madefica la celda (E9) que se aumenta un numero mas =
5543, con el macro que tengo abajo eso yo lo hacia manual mente que se
aumenta un numero mas cada ves que yo quiera.


Sub Macro1()
'
' Macro1 Macro
' Macro grabada el 15/02/2006 por ***
Folio = Range("U2").Value
Folio = Folio + 1
Range("U2").Value = Folio
End Sub




Respuesta Responder a este mensaje
#3 KL
16/02/2006 - 00:06 | Informe spam
Dime TU que quiere decir "no me funciona" tal vez entonces pueda encontrar la falla ;-)

? Algun error concreto?
? Igual has olvidado comentar algun detalle?
? Tal vez la celda [E9] cambia su valor porque tiene formula y "se modifica(n)" otra(s) celda(s)?
? Estan los macros habilitados?

Saludos,
KL


"K.M. **Ve" wrote in message news:
hola amigo KL ya lo hice y no me funciona puede verificar cual es la falla.


Gracias
KM**VE

"KL" escribio en el mensaje news:%
Hola K.M. **Ve,

Prueba hacer lo siguiente:

1) Haz clic-derecho sobre el nombre de la hoja en cuestion (en una de las pestanas de la parte de abajo de la ventana de Excel).
2) Elige la opcion Ver Codigo para abrir el editor VBA.
3) Una vez en el Editor VBA, en la ventana mas grande a la derecha pega el codigo que te pongo a continuacion:

'--
Private Sub Worksheet_Change(ByVal Target As Range)
If Intersect(Target, [E9]) Is Nothing Then Exit Sub
[U2] = [U2] + 1
End Sub
'--

4) Ahora pulsa Alt+F11 para volver a la hoja.
5) Prueba cambiar el valor en el rango [E9]

Saludos,
KL


"K.M. **Ve" wrote in message news:e%23cQ4%
Hola amigo como hago que me aumenta un número una celda al madeficar una celda



En la celda (U2) tengo un numero 5542, quiero que me aumente este numero cada ves que se madefica la celda (E9) que se aumenta
un numero mas = 5543, con el macro que tengo abajo eso yo lo hacia manual mente que se aumenta un numero mas cada ves que yo
quiera.


Sub Macro1()
'
' Macro1 Macro
' Macro grabada el 15/02/2006 por ***
Folio = Range("U2").Value
Folio = Folio + 1
Range("U2").Value = Folio
End Sub








Respuesta Responder a este mensaje
#4 KM ** Ve
16/02/2006 - 02:17 | Informe spam
el macro no aumenta la numeracion que estas en la celda (U2) y el valor de
(E9) es una que tiene formula.


Gracias
KM**VE


"KL" escribio en el mensaje
news:
Dime TU que quiere decir "no me funciona" tal vez entonces pueda encontrar
la falla ;-)

? Algun error concreto?
? Igual has olvidado comentar algun detalle?
? Tal vez la celda [E9] cambia su valor porque tiene formula y "se
modifica(n)" otra(s) celda(s)?
? Estan los macros habilitados?

Saludos,
KL


"K.M. **Ve" wrote in message
news:
hola amigo KL ya lo hice y no me funciona puede verificar cual es la
falla.


Gracias
KM**VE

"KL" escribio en el mensaje
news:%
Hola K.M. **Ve,

Prueba hacer lo siguiente:

1) Haz clic-derecho sobre el nombre de la hoja en cuestion (en una de
las pestanas de la parte de abajo de la ventana de Excel).
2) Elige la opcion Ver Codigo para abrir el editor VBA.
3) Una vez en el Editor VBA, en la ventana mas grande a la derecha pega
el codigo que te pongo a continuacion:

'--
Private Sub Worksheet_Change(ByVal Target As Range)
If Intersect(Target, [E9]) Is Nothing Then Exit Sub
[U2] = [U2] + 1
End Sub
'--

4) Ahora pulsa Alt+F11 para volver a la hoja.
5) Prueba cambiar el valor en el rango [E9]

Saludos,
KL


"K.M. **Ve" wrote in message
news:e%23cQ4%
Hola amigo como hago que me aumenta un número una celda al madeficar
una celda



En la celda (U2) tengo un numero 5542, quiero que me aumente este
numero cada ves que se madefica la celda (E9) que se aumenta un numero
mas = 5543, con el macro que tengo abajo eso yo lo hacia manual mente
que se aumenta un numero mas cada ves que yo quiera.


Sub Macro1()
'
' Macro1 Macro
' Macro grabada el 15/02/2006 por ***
Folio = Range("U2").Value
Folio = Folio + 1
Range("U2").Value = Folio
End Sub











Respuesta Responder a este mensaje
#5 KL
16/02/2006 - 12:03 | Informe spam
Hola,

necesito saber la formula de E9...:-)

saludos,
KL


"KM ** Ve" wrote in message news:
el macro no aumenta la numeracion que estas en la celda (U2) y el valor de
(E9) es una que tiene formula.


Gracias
KM**VE


"KL" escribio en el mensaje news:
Dime TU que quiere decir "no me funciona" tal vez entonces pueda encontrar la falla ;-)

? Algun error concreto?
? Igual has olvidado comentar algun detalle?
? Tal vez la celda [E9] cambia su valor porque tiene formula y "se modifica(n)" otra(s) celda(s)?
? Estan los macros habilitados?

Saludos,
KL


"K.M. **Ve" wrote in message news:
hola amigo KL ya lo hice y no me funciona puede verificar cual es la falla.


Gracias
KM**VE

"KL" escribio en el mensaje news:%
Hola K.M. **Ve,

Prueba hacer lo siguiente:

1) Haz clic-derecho sobre el nombre de la hoja en cuestion (en una de las pestanas de la parte de abajo de la ventana de
Excel).
2) Elige la opcion Ver Codigo para abrir el editor VBA.
3) Una vez en el Editor VBA, en la ventana mas grande a la derecha pega el codigo que te pongo a continuacion:

'--
Private Sub Worksheet_Change(ByVal Target As Range)
If Intersect(Target, [E9]) Is Nothing Then Exit Sub
[U2] = [U2] + 1
End Sub
'--

4) Ahora pulsa Alt+F11 para volver a la hoja.
5) Prueba cambiar el valor en el rango [E9]

Saludos,
KL


"K.M. **Ve" wrote in message news:e%23cQ4%
Hola amigo como hago que me aumenta un número una celda al madeficar una celda



En la celda (U2) tengo un numero 5542, quiero que me aumente este numero cada ves que se madefica la celda (E9) que se aumenta
un numero mas = 5543, con el macro que tengo abajo eso yo lo hacia manual mente que se aumenta un numero mas cada ves que yo
quiera.


Sub Macro1()
'
' Macro1 Macro
' Macro grabada el 15/02/2006 por ***
Folio = Range("U2").Value
Folio = Folio + 1
Range("U2").Value = Folio
End Sub















Respuesta Responder a este mensaje
Ads by Google
Help Hacer una preguntaSiguiente Respuesta Tengo una respuesta
Search Busqueda sugerida