tag:blogger.com,1999:blog-4623278671508370136.post4246875037058957094..comments2023-08-01T13:39:53.991+02:00Comments on EXCEL FORO: Un blog de Excel: VBA: macro para acumular cantidades.Excelforo - Ismael Romerohttp://www.blogger.com/profile/17680553534095355222noreply@blogger.comBlogger26125tag:blogger.com,1999:blog-4623278671508370136.post-76383424399569150282019-06-21T10:08:28.381+02:002019-06-21T10:08:28.381+02:00Hola,
modifica la macro del ejemplo empleando la f...Hola,<br />modifica la macro del ejemplo empleando la función PROMEDIO (AVERAGE en VBA)...<br />al ser valores calculados en la macro en cualquier momento podrás sobreescribir a cero<br /><br />Espero haberte entendido<br /><br />SldsExcelforo - Ismael Romerohttps://www.blogger.com/profile/17680553534095355222noreply@blogger.comtag:blogger.com,1999:blog-4623278671508370136.post-24450629260376107582019-06-21T00:03:15.716+02:002019-06-21T00:03:15.716+02:00Buenas es q quiero que en una serie de celdas no s...Buenas es q quiero que en una serie de celdas no se borre el valor de un promedio que sale de de meter valores en otra hoja que cuando borre los valores de la hoja quede el promedio para seguir mes a mes metiendo las compras pero tamboen cuando quiera bajarlo a cero lo haga con facilidad Anonymoushttps://www.blogger.com/profile/17414340737742654029noreply@blogger.comtag:blogger.com,1999:blog-4623278671508370136.post-8493798583373883952017-03-16T15:07:23.005+01:002017-03-16T15:07:23.005+01:00Exacto! Era justamente lo que necesitaba. Muchísim...Exacto! Era justamente lo que necesitaba. Muchísimas gracias!!!!!Anonymousnoreply@blogger.comtag:blogger.com,1999:blog-4623278671508370136.post-69097070587730338402017-03-16T13:17:21.691+01:002017-03-16T13:17:21.691+01:00Hola,creo que te refieres a esto:
http://excelforo...Hola,creo que te refieres a esto:<br /><a href="http://excelforo.blogspot.com.es/2016/04/vba-mostrar-los-sumandos.html" rel="nofollow">http://excelforo.blogspot.com.es/2016/04/vba-mostrar-los-sumandos.html</a><br />Un saludo y gracias!!Excelforo - Ismael Romerohttps://www.blogger.com/profile/17680553534095355222noreply@blogger.comtag:blogger.com,1999:blog-4623278671508370136.post-63948506064027467532017-03-14T05:22:23.902+01:002017-03-14T05:22:23.902+01:00Buenas. Excelente foro. Me viene ayudando mucho pa...Buenas. Excelente foro. Me viene ayudando mucho para resolver algunos problemas en el trabajo. Me preguntaba cómo hacer para que en vez de que en la celda de resultados me devuelva el total del acumulado, me devuelva el mismo pero en formato 1er número + 2do número + ... + Nesimo número. Es decir como si en vez de hacer usado una macro parecía que sólo hice =número 1 + número 2 etc. En decir como si hice una suma manual y que se vean los sumandos. Se entiende? Gracias por su tiempo. EnriqueAnonymousnoreply@blogger.comtag:blogger.com,1999:blog-4623278671508370136.post-52751884194293031012017-02-28T21:32:09.843+01:002017-02-28T21:32:09.843+01:00Hola,
aplica un condicional
IF Cells(i, 17).Value ...Hola,<br />aplica un condicional<br />IF Cells(i, 17).Value - Cells(i, 18).Value<0 THEN<br />Cells(i, 17).Formula = 0<br />ELSE<br />Cells(i, 17).Formula = Cells(i, 17).Value - Cells(i, 18).Value<br />END IF<br /><br />SaludosExcelforo - Ismael Romerohttps://www.blogger.com/profile/17680553534095355222noreply@blogger.comtag:blogger.com,1999:blog-4623278671508370136.post-30060431854070721982017-02-28T15:07:24.491+01:002017-02-28T15:07:24.491+01:00Buenos dias,
Me ha funcionado genial tu publicaci...Buenos dias, <br />Me ha funcionado genial tu publicación, la he adaptado a mi excel de esta manera: Sub limpiar()<br /><br />' sumatorio Macro<br /><br />'macro que calcula el acumulado de todas las entradas de datos.<br /><br />Dim i As Integer<br />x = 1<br />For i = 5 To 100<br />'realiza la suma acumulada del valor anterior mas el nuevo<br />'para cada ref.<br />Cells(i, 19).Formula = Cells(i, 17).Value - Cells(i, 18).Value<br />Cells(i, 17).Formula = Cells(i, 17).Value - Cells(i, 18).Value<br /><br />Next i<br />x = 1<br />For i = 5 To 100<br />Cells(i, 20).Formula = Cells(i, 20).Value + Cells(i, 18).Value<br />'limpia los campos para poder introducir los nuevos valores<br />'para cada ref.<br /><br />Cells(i, 18).ClearContents<br /><br />Next i<br />'Da formato personalizado, añadiendo el texto Entrada<br />Range("Q1").NumberFormat = """Entrada""0"<br />'genera un autonumérico en la celda A1<br />'que nos indicará qué entrada es la última introducida.<br />Range("Q1").Value = Range("Q1").Value + x<br /><br />End Sub<br /><br />El problema que yo tengo es que cuando hago: <br />Cells(i, 17).Formula = Cells(i, 17).Value - Cells(i, 18).Value<br />y la resta me da negativa, a mi me gustaria que me devolviese un 0 en vez de un valor negativo y no se como escribirlo en la macro.<br /><br />Espero que me haya podido explicar bien.<br /><br />Muchas gracias y un saludo de antemanoAnonymoushttps://www.blogger.com/profile/14184422161669963535noreply@blogger.comtag:blogger.com,1999:blog-4623278671508370136.post-68165956157294406012016-12-04T10:16:46.979+01:002016-12-04T10:16:46.979+01:00Hola Fabio,
creo que lo que necesitas se encuentra...Hola Fabio,<br />creo que lo que necesitas se encuentra en este post.. necesitando algo de programación:<br /><a href="http://excelforo.blogspot.com.es/2015/02/vba-trasladar-datos-de-inventario.html" rel="nofollow">http://excelforo.blogspot.com.es/2015/02/vba-trasladar-datos-de-inventario.html</a><br /><br />Espero te resulte de utilidad<br />Slds<br />Excelforo - Ismael Romerohttps://www.blogger.com/profile/17680553534095355222noreply@blogger.comtag:blogger.com,1999:blog-4623278671508370136.post-87692528046554681362016-12-04T07:16:49.478+01:002016-12-04T07:16:49.478+01:00Buenas noches, excelente tu publicacion. Necesito ...Buenas noches, excelente tu publicacion. Necesito acumular valores en una base de datos de clientes pero el cliente 001 hoy puede estar en al fila 1 y mañana en la 3, poderlo llamar por un buscarv y acumularle puntos a ese cliente.<br />mil gracias.Anonymoushttps://www.blogger.com/profile/15786725986096161463noreply@blogger.comtag:blogger.com,1999:blog-4623278671508370136.post-42432627840913013932016-07-15T09:18:33.700+02:002016-07-15T09:18:33.700+02:00Hola Jaki,
espero estés bien, un gusto poder salud...Hola Jaki,<br />espero estés bien, un gusto poder saludarte igualmente.<br /><br />Mejor lee las Normas de uso del blog.<br /><br />Un cordial saludoExcelforo - Ismael Romerohttps://www.blogger.com/profile/17680553534095355222noreply@blogger.comtag:blogger.com,1999:blog-4623278671508370136.post-67754485828599676492016-07-13T23:31:13.644+02:002016-07-13T23:31:13.644+02:00necesito registrar los abonos a un columna de celd...necesito registrar los abonos a un columna de celdas acumulativa ,me borre la informacion y reciba nuevamente un nuevo abono y me lo descuente del saldo,y asi sucesivamente para llevar elestado de cuenta en un hoja de excel 2007Anonymoushttps://www.blogger.com/profile/00067487058940487301noreply@blogger.comtag:blogger.com,1999:blog-4623278671508370136.post-10237526559359506352016-07-10T06:09:27.575+02:002016-07-10T06:09:27.575+02:00Gracias...!!!
Me has sacado de un apuro.
Mil graci...Gracias...!!!<br />Me has sacado de un apuro.<br />Mil gracias por tus aportes.<br />Te felicito y te animo a seguir siempre ayudando.Anonymoushttps://www.blogger.com/profile/15717488174776894681noreply@blogger.comtag:blogger.com,1999:blog-4623278671508370136.post-74556830405149453002016-07-09T09:33:09.635+02:002016-07-09T09:33:09.635+02:00Hola,
entiendo la idea es ir copiando sobre una ho...Hola,<br />entiendo la idea es ir copiando sobre una hoja 'Informe' los nuevos datos añadidos en hojas (nuevas y viejas ya existentes).<br />Si es así, este post te puede ayudar:<br /><a href="http://excelforo.blogspot.com.es/2014/04/vba-select-case-para-distribuir-datos.html" rel="nofollow">http://excelforo.blogspot.com.es/2014/04/vba-select-case-para-distribuir-datos.html</a><br /><br />La cosa sería recorrer siempre todas las hojas (menos la de informe) para ir llevando los registros a 'Informe'...<br />En caso necesario habría que añadir un control , por ejemplo con un IF..THEN...), para verificar si existe ya pegado en Informe el registro...<br /><br />Espero te sirva la pista.<br />SaludosExcelforo - Ismael Romerohttps://www.blogger.com/profile/17680553534095355222noreply@blogger.comtag:blogger.com,1999:blog-4623278671508370136.post-61725592124532677012016-07-08T21:38:14.057+02:002016-07-08T21:38:14.057+02:00Hola, me han ayudado mucho tus aportes, gracias.
A...Hola, me han ayudado mucho tus aportes, gracias.<br />Ahora tengo un problemita, tal vez puedas ayudarme. Tengo un archivo en el cual una macro crea una copia de una hoja modelo con un formato establecido. Mi duda es si se puede hacer que los datos ingresados a estas hojas nuevas se copien a una hoja llamada "informe" en el mismo libro. Se debe tomar en cuenta que las hojas se crean constantemente y los datos deben copiarse no sumarse y colocarse en columnas, una por cada hoja nueva. No se si me logre dar a entender o si se puede. De ante mano muchas gracias!Anonymoushttps://www.blogger.com/profile/15717488174776894681noreply@blogger.comtag:blogger.com,1999:blog-4623278671508370136.post-63077507115435651252016-05-21T09:26:38.486+02:002016-05-21T09:26:38.486+02:00Hola Lina,
el ejemplo está pensado para introducir...Hola Lina,<br />el ejemplo está pensado para introducir manual y secuencialmente cada grupo de datos... si tienes 105 datos, tendrás que introducirlos uno tras otro.<br />Salvo que ya los tengas en alguna parte de la hoja, en cuyo caso podrías recorrerlos con algún loop y replicar la acción.<br />SaludosExcelforo - Ismael Romerohttps://www.blogger.com/profile/17680553534095355222noreply@blogger.comtag:blogger.com,1999:blog-4623278671508370136.post-78427383243804343012016-05-20T23:17:25.036+02:002016-05-20T23:17:25.036+02:00hola mira y para hacer sumatoria de 105 datos c...hola mira y para hacer sumatoria de 105 datos como aplicaria no comprendo agradezco resouestaAnonymoushttps://www.blogger.com/profile/17223194259002926758noreply@blogger.comtag:blogger.com,1999:blog-4623278671508370136.post-57404996300908579452016-05-02T10:20:02.696+02:002016-05-02T10:20:02.696+02:00Hola Rolando,
no hace falta macro para esto, simpl...Hola Rolando,<br />no hace falta macro para esto, simplemente aplica una fórmula SUMA en 3D, aquí puedes ver un ejemplo:<br /><a href="http://excelforo.blogspot.com.es/2012/02/formulas-3d-tridimensionales-en-excel.html" rel="nofollow">http://excelforo.blogspot.com.es/2012/02/formulas-3d-tridimensionales-en-excel.html</a><br />y listo<br /><br />SldsExcelforo - Ismael Romerohttps://www.blogger.com/profile/17680553534095355222noreply@blogger.comtag:blogger.com,1999:blog-4623278671508370136.post-66224268902683812192016-05-02T03:19:59.933+02:002016-05-02T03:19:59.933+02:00Hola, he probado esta macro y la he ajustado a mis...Hola, he probado esta macro y la he ajustado a mis necesidades y me funciona de maravilla, mil gracias, pero tengo una situación, tengo un archivo con 6 hojas diferentes que se llaman "lunes, martes, miércoles, jueves, viernes, sábado", estas hojas tienen el mismo formato (las mismas filas y columnas). Cada una de estas hojas las voy llenando con datos numéricos conforme al dia que se le corresponde, o sea la que dice lunes la lleno el lunes y asi sucesivamente hasta el sábado. Lo que quiero es que en una hoja adicional que se llama "resumen" me valla acumulando todos los datos que voy introduciendo en las otras, o sea que lo que introdusco el lunes se me acumule en la hoja resumen, lo que introduzco el martes se sume a lo que lo del lunes pero en la hoja resumen y asi sucesivamente hasta el día sábado, pero que no se borre lo que tengo en las diferentes hojas.<br />Imagino que esta misma macro se puede pero hay que hacer los ajustes para trabaje con varias hojas. Anonymoushttps://www.blogger.com/profile/15700096936855282372noreply@blogger.comtag:blogger.com,1999:blog-4623278671508370136.post-79932367749152602652015-12-14T13:43:20.492+01:002015-12-14T13:43:20.492+01:00Hola José,
la macro, como puedes ver en el ejemplo...Hola José,<br />la macro, como puedes ver en el ejemplo, está pensada para un listado de artículos...<br />Sigue los pasos y lógicamente ajusta los rangos a tu caso concreto.<br /><br />También podrías gestionar tu Stock con funciones tipo SUMAR.SI.CONJUNTO<br /><br />SaludosExcelforo - Ismael Romerohttps://www.blogger.com/profile/17680553534095355222noreply@blogger.comtag:blogger.com,1999:blog-4623278671508370136.post-24286113450253412362015-12-13T20:09:30.118+01:002015-12-13T20:09:30.118+01:00Hola a todos los foristas.
Mi problema es que teng...Hola a todos los foristas.<br />Mi problema es que tengo varios articulos en Excel que quiero acumular(restar del stock) a medida que voy vendiendo. Hice la macro en VB y me funciona para una celda pero necesito hacer para la totalidad de artículos. Me podrían explicar como hacerlo? Gracias.Anonymoushttps://www.blogger.com/profile/03036040510424504958noreply@blogger.comtag:blogger.com,1999:blog-4623278671508370136.post-69967576928697741132013-08-17T11:17:47.725+02:002013-08-17T11:17:47.725+02:00Hola Joao,
sólo cambia el límite del FOR:
For i = ...Hola Joao,<br />sólo cambia el límite del FOR:<br />For i = 3 to 5<br />por<br /><b>For i = 3 to 1003</b><br /><br />Ese 1003 representa la última fila donde se encuentren tus artículos.<br /><br />Slds cordialesExcelforo - Ismael Romerohttps://www.blogger.com/profile/17680553534095355222noreply@blogger.comtag:blogger.com,1999:blog-4623278671508370136.post-55216265130749223682013-08-17T01:31:41.630+02:002013-08-17T01:31:41.630+02:00Hola todos.
A mi, la primera solucion me funciona...Hola todos.<br /><br />A mi, la primera solucion me funcionaria perfectamente pero el problema es que yo tengo una cantidad enorme de articulos. (Mas de 1000).<br />Como tendria que hacer en ese caso? porque asi solo me funcionan las primeras 3<br /><br />Agradecido Anonymoushttps://www.blogger.com/profile/08588071852856955339noreply@blogger.comtag:blogger.com,1999:blog-4623278671508370136.post-18728521815983681482013-01-30T10:18:30.139+01:002013-01-30T10:18:30.139+01:00Hola Fernando,
has pensado emplear una función SUM...Hola Fernando,<br />has pensado emplear una función SUMAR.SI para acumular esas cantidades.<br />Por ejemplo, el rango definido es A1:A1000 en el que hay diferentes celdas con el valor 100; entonces C1 escribes:<br /><b>=SUMAR.SI(A1:A1000;100)</b><br /><br />En principio no hace una macro para eso.<br />SldsExcelforo - Ismael Romerohttps://www.blogger.com/profile/17680553534095355222noreply@blogger.comtag:blogger.com,1999:blog-4623278671508370136.post-64138776011952727062013-01-29T21:56:03.769+01:002013-01-29T21:56:03.769+01:00Hola,
He seguido los ejemplos anteriores porque bu...Hola,<br />He seguido los ejemplos anteriores porque busco la solución para acumular en una celda, el valor acumulado de varias celdas alternadas en una misma fila, dentro de un rango definido, pero que solo contengan el valor 100. conoces una macro que lo haga?<br /><br />Saludos y muchas gracias desde ya.Fernando Brownhttps://www.blogger.com/profile/01371102912692533386noreply@blogger.comtag:blogger.com,1999:blog-4623278671508370136.post-73044450320723940762011-11-30T08:48:43.735+01:002011-11-30T08:48:43.735+01:00Hola Roberto,
entiendo que tus registros empiezan ...Hola Roberto,<br />entiendo que tus registros empiezan en la fila 6 pero no sabes hasta qué fila llegan (no que tengas saltos entres esas 94 filas que has marcado).<br />Si es así, entonces yo cambiaría el 100 por una variable definida por ti...<br />echa un vistazo a<br /><a href="http://excelforo.blogspot.com/2010/05/macro-para-convertir-en-numero-valores.html" rel="nofollow">http://excelforo.blogspot.com/2010/05/macro-para-convertir-en-numero-valores.html</a><br />en este post puedes ver un ejemplo de cómo definir la variable que necesitarías.<br />Basicamente con la variable localizamos la última fila con datos de tu hoja de trabajo.<br />Espero te sirva.<br />Un saludoExcelforo - Ismael Romerohttps://www.blogger.com/profile/17680553534095355222noreply@blogger.com