Hola!

Registrándote como bakuno podrás publicar, compartir y comunicarte en privado con otros bakuos :D

Regístrame ya!

ayuda, suma con enter en inventario de excel

cuestasmejia

Bovino adolescente
Desde
2 Sep 2007
Mensajes
70
Q tal bakunos, tengo un sistema de inventarios en excel que suma y resta las entradas y salidas con un boton, pero ahora quiero que lo haga presionando enter, este es el codigo que utilizo actualmente para ir sumando cada vez que presiono el boton
Sub BotónC()

Range("a2").Select
claveentrada = ActiveCell.FormulaR1C1 + 4
celdaentrada = "c" & claveentrada
Range("c2").Select
entradaproducto = ActiveCell.FormulaR1C1
Range(celdaentrada).Select
ActiveCell.FormulaR1C1 = Val(ActiveCell.FormulaR1C1) + Val(entradaproducto)
Range("c2").Select
ActiveCell.FormulaR1C1 = ""
End Sub
 
Q tal bakunos, tengo un sistema de inventarios en excel que suma y resta las entradas y salidas con un boton, pero ahora quiero que lo haga presionando enter, este es el codigo que utilizo actualmente para ir sumando cada vez que presiono el boton, les agradeceria mucho si me ayudan.

Sub BotónC()

Range("a2").Select
claveentrada = ActiveCell.FormulaR1C1 + 4
celdaentrada = "c" & claveentrada
Range("c2").Select
entradaproducto = ActiveCell.FormulaR1C1
Range(celdaentrada).Select
ActiveCell.FormulaR1C1 = Val(ActiveCell.FormulaR1C1) + Val(entradaproducto)
Range("c2").Select
ActiveCell.FormulaR1C1 = ""
End Sub
 
Puedes meter el código en la opción cuando haya un cambio en la hoja y cuando aprietes enter lo va a realizar
 
Volver
Arriba