Filter problems

[skosman]

Hi again,


My filter does not work and i do not get it, i tried to delete the empty cells but that doesn't work either...

does someone got a clue?

Artikelnr.	person 1	category	Food	price	discount	net price	vat	bonus
1	arie	china	apple	€ 1,00	€ 0,10	€ 0,90	€ 0,05	€ 0,25
2	robin	US	banana	€ 1,50	€ 0,10	€ 1,40	€ 0,05	€ 0,25
3	yannick	Russia	kiwi	€ 2,00	€ 0,10	€ 1,90	€ 0,05	€ 0,25
4	gijs	Netherlands	melon	€ 2,50	€ 0,10	€ 2,40	€ 0,05	€ 0,25
5	remy	France	grape	€ 3,00	€ 0,10	€ 2,90	€ 0,05	€ 0,25
6	xander	Germany	orange	€ 3,50	€ 0,10	€ 3,40	€ 0,05	€ 0,25
7	felix	Spain	strawberry	€ 4,00	€ 0,10	€ 3,90	€ 0,05	€ 0,25
8	jansen	Portugal	blue berries	€ 4,50	€ 0,10	€ 4,40	€ 0,05	€ 0,25
9	mike	Italy	banana	€ 5,00	€ 0,10	€ 4,90	€ 0,05	€ 0,25
10	harbers	Greece	apple	€ 5,50	€ 0,10	€ 5,40	€ 0,05	€ 0,25
11	moerman	Swiss	melon	€ 6,00	€ 0,10	€ 5,90	€ 0,05	€ 0,25
12						#VALUE!
13						#VALUE!
14						#VALUE!
15						#VALUE!
16						#VALUE!
17						#VALUE!
18						#VALUE!
19						#VALUE!
20						#VALUE!
21						#VALUE!
22						#VALUE!
23						#VALUE!

<COLGROUP><COL style="WIDTH: 34pt; mso-width-source: userset; mso-width-alt: 1440" width=45><COL style="WIDTH: 124pt; mso-width-source: userset; mso-width-alt: 5280" width=165><COL style="WIDTH: 109pt; mso-width-source: userset; mso-width-alt: 4640" width=145><COL style="WIDTH: 192pt; mso-width-source: userset; mso-width-alt: 8192" width=256><COL style="WIDTH: 47pt; mso-width-source: userset; mso-width-alt: 1984" width=62><COL style="WIDTH: 51pt; mso-width-source: userset; mso-width-alt: 2176" width=68><COL style="WIDTH: 50pt; mso-width-source: userset; mso-width-alt: 2144" width=67><COL style="WIDTH: 44pt; mso-width-source: userset; mso-width-alt: 1856" width=58><COL style="WIDTH: 47pt; mso-width-source: userset; mso-width-alt: 2016" width=63><TBODY>
</TBODY>

 

[HeyYouYesYouNoNotYouYou]

Hi skosman,

This is the code I use for vba for accessing the filter;

Sub filtering()


Windows("name of workbook").Activate
Sheets("sheet name").Select
    Cells.Select
    Selection.AutoFilter
    Range("A1").Select
End Sub

Or if you don't need code to do it click in a cell on the top row,then click data in the top ribbon, then filter and it should work fine.

Hope this helps,

HeyYouYesYouNoNotYouYou