VBA to automatically filter out blank returns and sort two columns for excel 2007

alfredp666

New Member
Joined
Mar 31, 2013
Messages
4
Hello, I am a manager at a martial arts studio who created the mega attendance sheet from hell...Long story short it accounts for many scenarios that come up in the business. It records attendance for the entire year (which is actually necessary for things like end of year awards). We have switched from an attendance card system to a list the instructor can check off. I have created a printable version of the sheet good for a month. This sheet uses references from the "Master Mega list". I have formatted the 0's that come from blank returns with the 0;0;;@ trick and similar ones for other columns. My question is, can I create a macro that filters out the blank returns in the "keub" column, then sorts them in ascending order, then sorts the name column alphabetically within each "keub" rank. I have added extra keub ranks at the bottom so there are some spaces in between each level. Also is there any way to have a running count in the number column associated with the students names in the Name column. I need a VBA to do it because there are a lot of hands on the computer and need to protect this sheet. I know this is probably not clear so I will paste a condensed version below. I would appreciate any help. Thank you in advance. Also, I used the insert table function to create the sheet if that makes any difference.
ATTENDANCE SHEET
#
Name
Last Test
Keub
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
john doe
07/26
9
a
05/20
4
b
05/20
6
c
05/17
2
d
03/22
7
e
05/20
7
f
05/17
2
g
11/16
3
h
07/29
2
i
N/A
10
j
07/11
6
k
03/22
6
l
05/17
2
m
05/20
5
n
07/26
5
o
07/26
9
p
07/26
3
q
N/A
1
r
05/17
2
s
08/12
4
t
N/A
10
u
07/26
7
v
05/17
2
w
05/17
2
x
04/11
2
y
07/26
3
x
05/17
2
a
03/22
6
b
N/A
10
c
05/17
2
d
09/21
1
e
09/27
3
f
05/17
3
g
05/17
2
h
05/17
2
i
N/A
10
j
07/26
7
k
05/20
6
l
09/21
1
m
08/01
7
n
03/22
1
o
07/29
7
p
07/26
9
q
07/26
4
r
07/26
7
s
05/17
2
t
03/22
1
u
05/17
8
v
05/17
8
w
05/17
5
x
05/17
5
y
N/A
10
z
N/A
10
a
03/21
9
b
N/A
10
1
1
2
2
3
3
4
4
5
5
6
6
7
7
8
8
9
9
10
10
10
Total Students
55

<tbody>
</tbody>
 

Excel Facts

Formula for Yesterday
Name Manager, New Name. Yesterday =TODAY()-1. OK. Then, use =YESTERDAY in any cell. Tomorrow could be =TODAY()+1.

Forum statistics

Threads
1,215,516
Messages
6,125,285
Members
449,218
Latest member
Excel Master

We've detected that you are using an adblocker.

We have a great community of people providing Excel help here, but the hosting costs are enormous. You can help keep this site running by allowing ads on MrExcel.com.
Allow Ads at MrExcel

Which adblocker are you using?

Disable AdBlock

Follow these easy steps to disable AdBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the icon in the browser’s toolbar.
2)Click on the "Pause on this site" option.
Go back

Disable AdBlock Plus

Follow these easy steps to disable AdBlock Plus

1)Click on the icon in the browser’s toolbar.
2)Click on the toggle to disable it for "mrexcel.com".
Go back

Disable uBlock Origin

Follow these easy steps to disable uBlock Origin

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back

Disable uBlock

Follow these easy steps to disable uBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back
Back
Top