Figured it out - I added this snippet at the bottom before "hyperlinks generated". Thanks @Tim Williams

 For Each dcell In drg.Cells
        dFormat = dcell.Worksheet.Evaluate("=CELL(""format""," & dcell.Address & ")")
        IsFormatValid = False
        If dFormat = "F6" Then
            dcell.Font.Color = RGB(255, 255, 255)
        End If
    Next dcell