scalextric59....thank you very much for your help! This site has always proved to be a valuable resource of knowledge.
Here is the code I used...
Private Sub Detail_Format(Cancel As Integer, FormatCount As Integer)
If Me.fmt = "A" Then
Me.[1].Format = "#,##0"
Me.[2].Format = "#,##0"...