Segue anexo.

Código:

Private Sub Worksheet_Calculate()
Application.ScreenUpdating = False
Dim lFilt As Long, lFiltArrows As Long
Dim lFiltRow As Long
On Error Resume Next
Application.EnableEvents = False

lFiltRow = Me.AutoFilter.Range.Row
lFiltArrows = Me.AutoFilter.Filters.Count

If Me.FilterMode = False Then
Range("B3") = "CREDOR"
ElseIf Me.FilterMode = True Then
For lFilt = 1 To lFiltArrows
If Me.AutoFilter.Filters.Item(lFilt).On Then
Range("B3") = Replace(Me.AutoFilter.Filters.Item(lFilt).Criteria1, "=", "")
End If
Next lFilt
End If
Application.EnableEvents = True

On Error GoTo 0
End Sub

Adaptado do link:

http://www.mrexcel.com/forum/excel-ques ... ilter.html

Sem VBA também é possivel.

Segue anexo.

Código:

Private Sub Worksheet_Calculate()
Application.ScreenUpdating = False
Dim lFilt As Long, lFiltArrows As Long
Dim lFiltRow As Long
On Error Resume Next
Application.EnableEvents = False

lFiltRow = Me.AutoFilter.Range.Row
lFiltArrows = Me.AutoFilter.Filters.Count

If Me.FilterMode = False Then
Range("B3") = "CREDOR"
ElseIf Me.FilterMode = True Then
For lFilt = 1 To lFiltArrows
If Me.AutoFilter.Filters.Item(lFilt).On Then
Range("B3") = Replace(Me.AutoFilter.Filters.Item(lFilt).Criteria1, "=", "")
End If
Next lFilt
End If
Application.EnableEvents = True

On Error GoTo 0
End Sub

Adaptado do link:

http://www.mrexcel.com/forum/excel-ques ... ilter.html

Ao tentar utilizar o exemplo que me envio, meu computador travou por completo.
Não consegui visualizar a solução proposta, ainda assim agradeço.

Vou tentar novamente, em minha casa, pode ser que seja o computador da empresa.

Sem VBA também é possivel.

Sinceramente, não faço idéia de como vc conseguiu colocar aquele balão/imagem/forma, naquela posição, e com a função de se alterar com fórmula, isso é realmente interessante, mas infelizmente, a sua solução não me atendeu, pois, quando eu utilizo um filtro, a célula por exemplo: ($D$6) cuja é utilizada pelo balão/imagem/forma como referência para se igular, não aparece, consequentemente, o balão/imagem/forma, fica em branco.

Mas eu realmente gostaria de saber como fez aquele balão/imagem/forma, aparecer lá, poderia me ensinar.

Ainda estou aprendendo.

Alex,

pelo que eu entendi, tu precisava que, ao realizar um filtro, o NOME do credor que estive filtrado aparecesse como titulo, correto?

Para isso eu utilizei uma formula de SUBTOTAL com a média do código filtrado para retornar o nome do credor (celula B1). A utilização da média é para retornar o nome do credor apenas quando o filtro for de apenas um unico credor, quando forem dois credores diferentes retornar "lista de credores".
Depois disso só vinculei a imagem recortada com a função camera.

Não entendi bem o que tu precisa.

Acho que sou mais leigo do que eu imaginava, não sei o que é função Camera, vou pesquisar um pouco, pode ser que ela me seja útil tmb.

Com relação à fórmula, o filtro que eu preciso que apareça em cima é o do CDC (centro de custo), para mostrar pro patrão, de qual CDC que é os valores abaixo.

Estou com outra questão em mãos, um pouco mais complicada.

Após filtrar receita e despesa por CDC, gostaria que aparecesse em outra planilha, os valores de cada cdc filtrado.

Quero entregar um relatório completo, preciso entregar em uma folha as informações de receita e despesa.

segue planilhas (nomes alterados, porém, não alterei os cdc's, os quais quero filtrar.

pode me dar uma mão por favor chefe?

Agradeço

Posta o arquivo .zip, com .rar nao consigo abrir.

Ok, postando.

Veja se é isso.

Tu quer que ao filtrar em uma planilha seja exibido o valor em outra? Somente o valor ou o nome também?
E se tu tiver dois CDC filtrados, quer que apareceça os dois nomes e mais os valores?

Então,
sobre o filtro, eu vou filtra-los e imprimi-los um a um pra entregar para o Patrão.
por isso, eu gostaria que ele aparecesse como título em algum luga de destaque, e eu vou filtrar apenas um. então não terá o problema de aparecer mais de um na função "camera"; função essa que eu acabei de aprender (obrigado por isso)

agora, com relação ao restante do meu problema, será que vc poderia me dar uma mão?

basicamente eu queria imprimir as receitas e despesas de cada cdc, porém em uma única planilha, e se possível, fazer um resultado final, com qual o valor de lucro no período.

Agradeço.

Alex,

Como não sou muito fã de auto-filtro, deixo no anexo uma forma de capturar o que vc precisa somente com a utilização de fórmulas.

Fiz o resumo que vc pediu (por CDC, pelo que entendi para imprimir para seu chefe) com a opção de ordenamento por qualquer coluna. Com somatório ao fim dos registros.

Repare que não é necessário listar nada. O modelo reconhece os registros únicos e os mesmos são disponibilizados no combo para sua seleção.

Preparado para até mil registros.

Abs,