Tem certeza de que precisa de uma macro? Uma possível configuração não macro:
- O texto está na coluna A
- Na coluna B
=IF(LEFT(A1;1)="§";"";TRIM(A1))
, isso substitui a string por uma string vazia, se se inicia com § e, por outro lado, remove qualquer espaço à esquerda, à direita ou duplo - Na coluna C
=IF(LEN(B1)=0;0;LEN(B1)-LEN(SUBSTITUTE(B1;" ";""))+1)
Esse é o número de palavras. Para cadeias vazias, mostra 0 palavras. Caso contrário, conta o número de espaços e adiciona 1 para calcular o número de palavras. - Na coluna D
=LEN(B1)
Esse é o número de caracteres. Se algumas das suas strings tiverem espaços duplos que você deseja contar, talvez seja necessário ajustar essa última fórmula (já que a função TRIM remove espaços duplos e espaços à direita).
Todas as fórmulas podem ser copiadas para baixo e copiar quantas colunas forem necessárias. Então você pode somar as contagens de palavras e caracteres em outra célula.