Boa noite Edvar

Seja bem vindo ao fórum!

No Excel 2003 não precisa usar macro para substituir a função SOMASES, basta usar a função SOMARPRODUTO que funciona em qualquer versão do Excel.

Anexa um exemplo da tua planilha que eu tento resolver para você.

Leia essas instruções:
viewtopic.php?f=10&t=3841
viewtopic.php?f=7&t=3784

Att.

Olá Patropi, grato por sua atenção.
Sim, sei... no entanto tenho usado essa macro pq inseri uma característica a mais nela.. qual seja... a de usar caracteres curingas nas pesquisas, pois a condição1 analisa texto e pode usar elementos intermediários como * ? ou # que o SOMARPRODUTO não tem ou faz... assim como o SE(... também não pode usar.
É um pouco mais complicado do que tratar com números...

Bom dia Edvar

Estou movendo teu tópico para o sub fórum VBA & Macros, pois aqui é exclusivo para fórmulas e funções sem VBA.

Att.

Bom dia!!

Poste seu arquivo modelo compactado!!

Att

Segue o arquivo modelo com detalhes no seu final...

Boa noite!!

Uma formula não resolve seu problema?
Coloque a data em A1

=SOMARPRODUTO(--(B3:B69>=A1);E3:E69)

Att

Grato pela atenção !
Não deu certo não...

Sem ver a "macro" que utiliza ou um exemplo de sua planilha, e com a info "Não deu certo...";utilizando de adivinhação; creio que vai ser difícil (beirando o impossível) ajuda-lo

Perdoe-me a grosseria... não mandei o arquivo com a macro !
Agora vai !

Edvar, eu não analisei a Função que tem em VBA, e tambem não entendi os resultados e valores, mas segue um exemplo utilizando a função SOMARPRODUTO, onde somamos pelas condições se a Data é = < ou > e se contiver o Texto.

Faça alguns testes e veja se estamos no caminho certo, va ajustando a formula com as variaveis.

SOMARPRODUTO condição Datas e Parte do Texto

No modelo utilizei a dica do Hamilton no forum ExcelBr :
[ExcelBr] Somar Usando Parte de Texto Como Condição
http://br.groups.yahoo.com/group/ExcelBr/message/78803

Você pode ver outra dica no link baixo :
SOMARPRODUTO COM 3 CONDIÇÕES
http://social.msdn.microsoft.com/Forums ... c68096a440

E neste, alemm de umaótima explicação sobre SOMARPRODUTO, você pode baixar alguns exemplos:
http://www.ambienteoffice.com.br/excel/SOMARPRODUTO/

Qualquer coisa retorne.

[]s

Bom dia Edvar

Não cheguei a ver o teu anexo, porque ele foi excluído pelo fórum, devido vc ter anexado sem compactar.

No link abaixo tem uma excelente explicação do mestre JValq sobre como utilizar as fórmulas do Excel em VBA:
No exemplo postado ele usa a função PROCV, mas no teu caso é só substituir pela função SOMARPRODUTO que segundo vc informou, é do teu inteiro conhecimento.

http://info.abril.com.br/forum/viewtopi ... cro#p55049

Um abraço.

Arquivo compactado (embora minusculo)

Olá Mauro ! Muito grato !
Engenhoso seu raciocínio mas não resolve por completo...
Vou aproveitar essa sua idéia em outro caso que tenho a resolver !

Bom dia Edvar

Não cheguei a ver o teu anexo, porque ele foi excluído pelo fórum, devido vc ter anexado sem compactar.

No link abaixo tem uma excelente explicação do mestre JValq sobre como utilizar as fórmulas do Excel em VBA:
No exemplo postado ele usa a função PROCV, mas no teu caso é só substituir pela função SOMARPRODUTO que segundo vc informou, é do teu inteiro conhecimento.

http://info.abril.com.br/forum/viewtopi ... cro#p55049

Um abraço.

Ops... já corrigi !