Move a label vertically downwards on a form

[westconn1]

you can load the whole board in one loop useing the Mod function to return that it is on the next line

your command to set the next row would be

With origin.ldate(n)
                .Left = origin.lday(n Mod 7).Left
                .Top = origin.ldate(0).Top + (origin.ldate(0).Height * (n \ 7))
                If .Top + .Height > origin.Height - 100 Then .Top = origin.ldate(0).Top
                If m = Format(d, "mm") Then .Visible = True
                .Caption = Format(d, "d ")
                .Tag = d
                .Visible = True
 
            End With

this was for a calander loaded labels 7 x 5 , so if you change the Mod 7 and \7 to 8 it should make your board

[johnfla]

thanks i'll give it a go