I got it figured out. Here is the updated query and the results. Thanks for looking.
SELECT { [Measures].[Fact Email Count] } ON COLUMNS,
order (
union ( {([Dim Date].[year num].[year num], [Dim Date].[Month Name].[Month Name],
[Dim Domain Course User].[Faculty Name].&[User])},
{([Dim Date].[year num].[year num], [Dim Date].[Month Name].[Month Name],
[Dim Domain Course User].[Faculty Name].&[Faculty])} ,all),
settostr({([Dim Date].[year num], [Dim Date].[Month Name],
[Dim Domain Course User].[Faculty Name])}), asc)
DIMENSION PROPERTIES MEMBER_CAPTION, MEMBER_UNIQUE_NAME ON ROWS
FROM ( SELECT ( { [Dim Domain Course User].[Domain Name].[dom1] } ) ON COLUMNS
FROM ( SELECT ( {[Dim Date].[20070120]:[Dim Date].[20070515]} ) ON COLUMNS
FROM [ANGEL74DW]))
WHERE ( IIF( STRTOSET("dom1", CONSTRAINED).Count = 1, STRTOSET("dom1", CONSTRAINED),
[Dim Domain Course User].[Domain Name].currentmember )
)
CELL PROPERTIES VALUE, BACK_COLOR, FORE_COLOR, FORMATTED_VALUE, FORMAT_STRING, FONT_NAME, FONT_SIZE, FONT_FLAGS;
Fact Email Count
2007JanuaryFaculty1
2007JanuaryUser1
2007FebruaryFaculty1
2007FebruaryUser (null)
2007MarchFaculty3
2007MarchUser(null)
2007AprilFaculty(null)
2007AprilUser2
2007MayFaculty41
2007MayUser44