Suma total con textbox
Buenas noches Luis
Quisiera hacerte una consulta
Abajo presento un código donde al Textbox3 le cargo la sumatoria de la col M de la planilla excel llamada "Histórico M"
¿Esta bien utilizar DSUM? ¿Qué estoy haciendo mal?
Un abrazo y nuevamente gracias!
'CARGO AL TextBox3 LA SUMATORIA DE LA COL M "SUPERFICIE TOT":
lÚltimaFila = Worksheets("Histórico M").[M3].End(xlDown).Row
SEGUIMIENTO. TextBox3 = Format(Evaluate("=DSUM('Histórico Montaje'!M3:M" & lÚltimaFila & "))"), "0.00")
Daniel.
Quisiera hacerte una consulta
Abajo presento un código donde al Textbox3 le cargo la sumatoria de la col M de la planilla excel llamada "Histórico M"
¿Esta bien utilizar DSUM? ¿Qué estoy haciendo mal?
Un abrazo y nuevamente gracias!
'CARGO AL TextBox3 LA SUMATORIA DE LA COL M "SUPERFICIE TOT":
lÚltimaFila = Worksheets("Histórico M").[M3].End(xlDown).Row
SEGUIMIENTO. TextBox3 = Format(Evaluate("=DSUM('Histórico Montaje'!M3:M" & lÚltimaFila & "))"), "0.00")
Daniel.
{"Lat":-34.6084175,"Lng":-58.3731613}
1 Respuesta
Respuesta de Luis_P
1
Dsum es para sumar con condiciones.
Si tan solo deseas sumar utiliza "sum".
Si tan solo deseas sumar utiliza "sum".
Luis, no tuve éxito
Solo deseo sumar toda la columna M de la excel Histórico M y tengo el siguiente código:
lÚltimaFila = Worksheets("Histórico M").[M3].End(xlDown).Row
SEGUIMIENTO.TextBox3 = Format(Evaluate("=SUM('Histórico Montaje'!M3:M" & lÚltimaFila & "))"), "0.00")
... le corregí el DSUM por el SUM y me sale "error 13, no coinciden los tipos"
A tu juicio, ¿qué estoy haciendo mal?
Muchas gracias
Daniel.
Solo deseo sumar toda la columna M de la excel Histórico M y tengo el siguiente código:
lÚltimaFila = Worksheets("Histórico M").[M3].End(xlDown).Row
SEGUIMIENTO.TextBox3 = Format(Evaluate("=SUM('Histórico Montaje'!M3:M" & lÚltimaFila & "))"), "0.00")
... le corregí el DSUM por el SUM y me sale "error 13, no coinciden los tipos"
A tu juicio, ¿qué estoy haciendo mal?
Muchas gracias
Daniel.
Mmmm y asi:
variable=application.WorksheetFunction.Sum(Range("M:M"))
Asi le pasas por codigo la suma a una variable o si lo prefieres a un control.
variable=application.WorksheetFunction.Sum(Range("M:M"))
Asi le pasas por codigo la suma a una variable o si lo prefieres a un control.
LuisHice lo siguiente:lÚltimaFila = Worksheets("Histórico M").[M3].End(xlDown).RowSEGUIMIENTO.TextBox3 = application.WorksheetFunction.Sum(Range("M:M"))..... y anduvo perfecto!!Muchas gracias por todo!Sigo trabajando porque como veras, por mi insistencia con tantas preguntas, estoy casi liquidando mi trabajo que tantas horas nocturnas me lleva! Si me lo permitís haré algunas otras preguntas mas pero no dejes de tener presente que agradezco tus respuestas infinitamente!Un abrazo, Daniel.
