Contar celdas distintas hojas

[carmencoll]

Buenas tardes,

He leído distintas entradas en este foro pero no consigo encontrar la solución exacta a mi problema.

Tengo una hoja por cada día del mes y una hoja resumen. En la hoja resumen he de sumar la celda A1 de todas las hojas con "SUMA($'Día 1'.$A1:$'Día 31'.$A1)" y por otro lado quiero contar el numero de celdas cuyo valor es mayor a cero. En principio creo que sería con la función CONTAR.SI(), pero no me deja ponerlo de igual modo CONTAR.SI($'Día 1'.$A1:$'Día 31'.$A1;">0").

Alguien me podría decir como hacerlo.

Gracias de antemano.

[mauricio]

Para la suma, esto funciona, no veo claro si usaste una comilla simple, no la uses:

Código: Seleccionar todo

=SUMA(Hoja1.A1,Hoja2.A1,Hoja3.A1)

Saludos

[xiseme]

A lo bruto, de manera simple, para contar ...
=(Dia_1.A1>0)+(Dia_2.A1>0)+(Dia_3.A1>0)+ … + ... +(Dia_31.A1>0)

Nota: Si en los nombres de las hojas, rangos, etc. no incluímos espacios mejor; nos ahorrará un montón de comillas simples «'» ... como ya ha dicho Mauricio.

[carmencoll]

Pensé que existiría un modo bonito y elegante de resolverlo al igual que con la suma, ya que al ser 31 hojas... en fin...Gracias chicos!

[mauricio]

Veamos esta forma elegante:

Código: Seleccionar todo

=SUMATODO(CELDA("ADDRESS";A1))

Usando esta función personalizada

Código: Seleccionar todo

Option Explicit

Function SumaTodo(Celda As String)
Dim oDoc As Object
Dim oHojas As Object
Dim co1 As Integer
Dim Suma As Double

	oDoc = ThisComponent
	For co1 = 0 To oDoc.getSheets().getCount() - 1
		Suma = Suma + oDoc.getSheets().getByIndex(co1).getCellRangeByName(Celda).getValue()
	Next
	
	SumaTodo = Suma

End Function

Anexo archivo de pruebas... este método tiene un pequeño "inconveniente", que creo puede omitirse, su tarea es, si deciden aceptarla, decirme cual es ese inconveniente...

Saludos

[SLV-es]

Jejejeje, un modo bonito y elegante.

Al menos, hay un modo de resolverlo.

Hacer que ese modo sea bonito y elegante ya es cosa tuya

[xiseme]

Ummmm ... y a mí sin embargo, casi me resultan más in-elegante 31 hojas repetitivas que una (larga)fórmula con 31 sumandos repetitivos. Es evidente que sobre gustos ... cada uno tiene el suyo.

[modo broma on]
@Mauricio deja de sumar y ponte a contar (las que no son 0).

[mauricio]

Ummmm ... y a mí sin embargo, casi me resultan más in-elegante 31 hojas repetitivas que una (larga)fórmula con 31 sumandos repetitivos. Es evidente que sobre gustos ... cada uno tiene el suyo.

De acuerdo, veo un problema de estructura, pero como bien dices, sobre gustos...

[modo broma on]
@Mauricio deja de sumar y ponte a contar (las que no son 0).

No, esa no es mi tarea...