Anyone can help me on excel QUEUE vbA?

\1
pic 1 position of BP and TP
BP(base pointer), TP(top pointer) TP always up 1 level from BP

\1
Pic 2
when click the button Push, will add 1 event number,and TP will also up 1 level

\1
Pic 3
When research the max, msgbox will appear Queue Full.

\1
when click button pop, will start delete from the base. and the entire column number & TP will moving down 1 level. Finally when the TP pointer back to the orginal place,msgbox appear queue empty