I kept getting such messages, logged or pop-up.
Found code:
Surely better to check for single typeface first, thus:
There does not seem to be the same problem with cell typefaces because there are both singular and plural subs.
I'm not actually using distinct typefaces, so I would not consider my usage to be a comprehensive test.
Mike.
Found code:
Sub SetHeaderTypeFaces():
If HeaderTypeFaces.Length <> mNumberOfColumns Then
ToastMessageShow("Invalid number of columns", False)
Log("SetHeaderTypeFaces: Invalid number of columns")
Return
End If
If HeaderTypeFaces.Length = 1 Then
cHeaderTypeFace = HeaderTypeFaces(0)
HeaderMultiTypeFace = False
Else
...
SetHeaderTypeFaces():
If HeaderTypeFaces.Length = 1 Then
cHeaderTypeFace = HeaderTypeFaces(0)
HeaderMultiTypeFace = False
Else
If HeaderTypeFaces.Length <> mNumberOfColumns Then
ToastMessageShow("Invalid number of columns", False)
Log("SetHeaderTypeFaces: Invalid number of columns")
Return
End If
cHeaderTypeFaces = HeaderTypeFaces
HeaderMultiTypeFace = True
End If
There does not seem to be the same problem with cell typefaces because there are both singular and plural subs.
I'm not actually using distinct typefaces, so I would not consider my usage to be a comprehensive test.
Mike.