M
mevetts
Hi,
To set the scene, I'm developing a excel based register for m
classes.
I currently have a button that inserts the date and moves down to th
next row.
I would like to develop this code so that it not only puts the date i
but, also inserts a tick symbol next to each of the pupils in tha
class.
I have all my classes on one worksheet, with hyperlinks to navigate t
each of the groups.
Each class will have a different number of pupils, but next to eac
pupil is a number beginning at one and then going up depending on ho
many pupils in the class.
The macro needs to see if there's a number in column A and if there i
then put a tick in that row. It needs to work down the column puttin
the ticks in, but then stop at the end of the list.
I have attached a screen shot of just one of the classes to show what
mean and give a clearer idea as to what layout I'm working with. So th
date will go in the row where the active cell is currently located an
the ticks need to be inserted next to each pupil below the date.
Here's the code I have so far -
Public Sub Date_Today()
With ActiveCell
.Value = Date
.NumberFormat = "dd-mmm-yy"
ActiveCell.Offset(1, 0).Select
End With
End Sub
Any help would be just great, as this would be a big step towards m
completing a significant section of this workbook.
If I haven't explained anything well or you just don't get what I'
going on about then let me know.
Many thanks,
Mark
+-------------------------------------------------------------------
|Filename: screen.jpg
|Download: http://www.excelforum.com/attachment.php?postid=4170
+-------------------------------------------------------------------
To set the scene, I'm developing a excel based register for m
classes.
I currently have a button that inserts the date and moves down to th
next row.
I would like to develop this code so that it not only puts the date i
but, also inserts a tick symbol next to each of the pupils in tha
class.
I have all my classes on one worksheet, with hyperlinks to navigate t
each of the groups.
Each class will have a different number of pupils, but next to eac
pupil is a number beginning at one and then going up depending on ho
many pupils in the class.
The macro needs to see if there's a number in column A and if there i
then put a tick in that row. It needs to work down the column puttin
the ticks in, but then stop at the end of the list.
I have attached a screen shot of just one of the classes to show what
mean and give a clearer idea as to what layout I'm working with. So th
date will go in the row where the active cell is currently located an
the ticks need to be inserted next to each pupil below the date.
Here's the code I have so far -
Public Sub Date_Today()
With ActiveCell
.Value = Date
.NumberFormat = "dd-mmm-yy"
ActiveCell.Offset(1, 0).Select
End With
End Sub
Any help would be just great, as this would be a big step towards m
completing a significant section of this workbook.
If I haven't explained anything well or you just don't get what I'
going on about then let me know.
Many thanks,
Mark
+-------------------------------------------------------------------
|Filename: screen.jpg
|Download: http://www.excelforum.com/attachment.php?postid=4170
+-------------------------------------------------------------------