Tablas dinámicas complejas

Una función personalizada podría hacer el trabajo, algo como:

Function ContarEnTodasLasHojas(Buscado As Variant) As Long
Dim wksH As Worksheet
For Each wksH In Worksheets
If wksH.Name <> Application.Caller.Parent.Name Then
ContarEnTodasLasHojas = ContarEnTodasLasHojas + WorksheetFunction.CountIf(wksH.UsedRange, Buscado)
End If
Next wksH
Set wksH = Nothing
End Function

Esta función tendrías que pegarla en un módulo creado por ti (no en ninguno de los de las hojas ni en el del libro). Lo que hace es contar las veces que aparece el argumento "Buscado" en todas las hojas _excepto_ en la que llama a la función.

No sé si hará exactamente lo que necesitas, y además es posible que se pudiera refinar --por ejemplo, diciéndole a la función los rangos en que debe contar--, pero con los datos que nos has dado no veo posible ser más concreto por ahora.

La sintaxis es:

=BuscarEnTodasLasHojas(ValorBuscado)

si lo que se busca fuera un número, o

=BuscarEnTodasLasHojas("TextoBuscado")

si fuera una cadena de texto.
Un saludo.


Fernando Arroyo
MS MVP - Excel

"Martape" escribió en el mensaje news:f53f01c3f186$d93a1580$
Hola a todos!
A ver si alguien me puede ayudar.
Tengo en un libro de Excel muchas pestañas con datos
sobre clientes. Cada pestaña corresponde a un mes
determinado.
Lo que quiero hacer es una tabla donde se me diga cuántas
veces sale cada cliente, no por pestaña sino en el total
de todas las pestañas.
La función count se queda corta.
Lo ideal sería una tabla dinámica, pero esta, solo
consigo hacerla en una de las pestañas; no encuentro la
manera de hacer una tabla dinámica que incluya todas las
pestañas que tengo a la vez.
Quisiera saber si se puede hacer esto, y si se os ocurre
alguna otra manera de hacer esto, aunque no sea con
tablas dinámicas.
Cada mes las pestañas aumentan, y en principio, no tengo
posibilidad de unirlas todas en una.

Muchas gracias a todos por vuestra
ayuda