ExcelTonnie
Gebruiker
- Lid geworden
- 5 jul 2016
- Berichten
- 311
Hallo allen,
Ik hoop dat iemand mij hiermee kan helpen ik zit namelijk tegen het volgende aan.
Ik heb een draaitabel die automatisch wordt bijgewerkt als ik nieuwe data toevoeg in een invoegblad.
Nu heb ik van de draaitabel tevens grafieken gemaakt om een overzicht te verkrijgen.
Deze heb ik voorzien van slicers om selecties te kunnen maken en werkt prima.
Nu heb ik ook een kolom ("Invoer verwerkt") waar automatisch de aanmaak datum en tijd in komen te staan, van deze kolom wil ik dus de laatst ingevoerde laten zien.
Via de slicer is dit simpel door aan te klikken maar hoe kan ik nou een filter maken die voor mij die selectie maakt dmvm een makro.
IK heb wel een stukje code die ervoor zorgt dat wanneer eenmaal een selectie gemaakt is om deze weer uit te schakelen door alles weer te geven.
Hieronder de code die ik gebruik om selectie ongedaan te maken.
Sub Draaitabelfilter()
ActiveSheet.PivotTables("Draaitabel1").PivotFields("Invoer verwerkt").ClearAllFilters
End Sub
Hier moet dus een stukje code bij om de laatst ingevoerde te filteren, of misschien de code om uit die kolom te kunnen selecteren.
Groet Tonnie
Ik hoop dat iemand mij hiermee kan helpen ik zit namelijk tegen het volgende aan.
Ik heb een draaitabel die automatisch wordt bijgewerkt als ik nieuwe data toevoeg in een invoegblad.
Nu heb ik van de draaitabel tevens grafieken gemaakt om een overzicht te verkrijgen.
Deze heb ik voorzien van slicers om selecties te kunnen maken en werkt prima.
Nu heb ik ook een kolom ("Invoer verwerkt") waar automatisch de aanmaak datum en tijd in komen te staan, van deze kolom wil ik dus de laatst ingevoerde laten zien.
Via de slicer is dit simpel door aan te klikken maar hoe kan ik nou een filter maken die voor mij die selectie maakt dmvm een makro.
IK heb wel een stukje code die ervoor zorgt dat wanneer eenmaal een selectie gemaakt is om deze weer uit te schakelen door alles weer te geven.
Hieronder de code die ik gebruik om selectie ongedaan te maken.
Sub Draaitabelfilter()
ActiveSheet.PivotTables("Draaitabel1").PivotFields("Invoer verwerkt").ClearAllFilters
End Sub
Hier moet dus een stukje code bij om de laatst ingevoerde te filteren, of misschien de code om uit die kolom te kunnen selecteren.
Groet Tonnie
