I have the following code:
Dim Rpt As Report
Dim grphChart As Graph.Chart
Dim msg As String, lngType As Long, cr As String
Dim ctype As String, typ As Integer, j As Integer
Dim recSource As String
Dim colmCount As Integer, chartType(1 To 6) As String
Const twips As Long = 1440...