ciao a tutti,
che formula devo scrivere per far visualizzare a mò di titolo in una cella al di sopra del filtro, ciò che si filtra nella colonna A?
Moderatori: Anthony47, Flash30005
=B2
Sub TrovaFiltro()
URF = Worksheets("Foglio1").Cells(Rows.Count, 2).End(xlUp).Row
Range("B3:B" & URF).Copy Destination:=Range("E2")
For RR = 3 To URF
Range("E" & RR).ClearContents
Next RR
End Sub
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Application.EnableEvents = False
Call TrovaFiltro
Application.EnableEvents = True
End Sub
Function Chefiltro()
Application.Volatile
If ActiveSheet.AutoFilter.Filters(1).On Then
Chefiltro = ActiveSheet.AutoFilter.Filters(1).Criteria1
If ActiveSheet.AutoFilter.Filters(1).Operator Then Chefiltro = Chefiltro & " ..."
End If
End Function
=chefiltro()
Torna a Applicazioni Office Windows
cerca.x che riporta cella "veramente" vuota Autore: marcoc |
Forum: Applicazioni Office Windows Risposte: 1 |
contare specifica parola in una colonna o matrice Autore: matzap |
Forum: Applicazioni Office Windows Risposte: 4 |
Visitano il forum: Nessuno e 156 ospiti