Hi Terry,

Am Mon, 03 Feb 2020 21:23:17 +0000 schrieb Terry Pinnell:

Here's a copy of my current sweetly running version. It's just yours
plus some minor alignment statements and a bit of code at the end to
turn 'Sunday' into 'Sun' etc (which saves me doing that in MX Pro).

if you want the short version of the weekday change the line that writes
the weekday in the cell to:
Case "A"
.Cells(LRow, varCols(i)) = Format(myDate, "ddd dd\/mm\/yy")


Regards
Claus B.
--
Windows10
Office 2016