UniversoExcelForo

Respuesta a consultas.
Fecha de creación: 09.Abril.2012

Fundadores: Wibly,Tyno,Servando,Sakkar,Rosendo2,RMaximo,Railar,Mcoronel,Ioyama,Igtelo,Hugotron,Drochar,Dedos,Alberto,Adolfo

No se pueden hacer consultas de Excel o VBA por mensaje privado.
Utiliza el botón buscar del foro y te ahorras tiempo para obtener "ayuda".

No estás conectado. Conéctate o registrate

Ver el tema anterior Ver el tema siguiente Ir abajo  Mensaje [Página 1 de 1.]

1RESUELTO Actualización de dato el 23/12/15, 02:57 pm

juseth


Buen día!

Tengo un pequeño detalle en un archivo que maneja entradas y salidas de material.

Al momento de ingresar una cantidad de entrada y posteriormente realizar alguna entrada extra..que ese valor ingresado se sume con el anterior.


Espero me allá explicado y me puedan apoyar.

Saludos.
Archivos
2PRUEBA.xlsm
No tienes los permisos para descargar los archivos.
(90 KB)

2RESUELTO Re: Actualización de dato el 23/12/15, 11:22 pm

jhon1904


hola juseth
utiliza el siguiente codigo, espero te sirva 

Código:
a = Application.WorksheetFunction.Match([e7], Hoja2.Range("B:B"), 0)
Hoja2.Range("d" & a) = Hoja2.Range("d" & a) + [E11]
Hoja1.Range("E7:e12") = ""

saludos,

3RESUELTO Re: Actualización de dato el 23/12/15, 11:30 pm

jhon1904


hola, 

que pena sale un error, con este ya no


Código:
Sub guardar(): On Error Resume Next

a = Application.WorksheetFunction.CountA(Hoja2.Range("B:B")) + 6

For i = 6 To a
    If Hoja2.Range("B" & i) Like Hoja1.Range("E7") Then
        Hoja2.Range("d" & i) = Hoja2.Range("d" & i) + [E11]
        Hoja1.Range("E7:e12") = ""
    End If
Next i

End Sub

saludos

4RESUELTO Re: Actualización de dato el 28/12/15, 03:39 pm

juseth


Gracias Jhon.

Una disculpa, estuve fuera y no pude revisar el foro..


Ya revise el codigo que me compartiste cordialmente, me temo decirte que no hace lo que deseo...


Ya que quiero que se sume la cantidad de la celda "existencias" y la "cantidad" y el resultado copiarlo a los registros de entrada.

Saludos.

5RESUELTO Re: Actualización de dato el 28/12/15, 04:26 pm

Igtelo


Hola Juseth / Jhon.

Juseth: Si te hace lo que quieres, sólo es cuestión de que lo adaptes a tus necesidades.

Ve el tutorial de como corre una macro y la hoja simultáneamente, estoy seguro que podrás complementar, sino te sale Jhon te lo ajusta.

Está fácil, tú puedes...

Saludos y felicidades
Ignacio Téllez

6RESUELTO Re: Actualización de dato el 29/12/15, 11:20 pm

Igtelo


Hola Juseth / Jhon.

Como veo que no se animan a terminar esto, aquí va para los botones de Entrada y Salida.

En módulo 2 están los códigos que te dio Jhon y también con Find.
Quité tu formato de color en ambas hojas, trata de evitar eso, "nunca" formatees toda una hoja sólo el rango que sea necesario, haces el archivo muy pesado, te consume mucha memoria, (es un mal hábito formatear de más, causa muchos problemas).

Saludos
Ignacio Téllez
Archivos
Juseth-Entradas y Salidas.zip
No tienes los permisos para descargar los archivos.
(123 KB)

7RESUELTO Re: Actualización de dato el 30/12/15, 09:16 pm

jhon1904


hola, nacho / juseth

excelente simplificación de códigos

saludos,

8RESUELTO Re: Actualización de dato el 02/01/16, 01:42 pm

Admin


Admin
Se da por resuelto y se cierra por abandono, norma 5.

Administración

http://www.universoexcelforo.com

Ver el tema anterior Ver el tema siguiente Volver arriba  Mensaje [Página 1 de 1.]

Permisos de este foro:
No puedes responder a temas en este foro.