OK, nevermind, figured it out:
Private Sub btn_StartNewSeason_Click()
Dim wbNew As Workbook
Dim wsNew As Worksheet
Dim Rng As Range
Dim i As Long
Dim J As Long
Set wbNew = Workbooks.Add("C:\....\templateseason.xlsm")
Set Rng = Worksheets("Client List").Range("A1")
For i = 0 To lstBrandsNewSeason.ListCount - 1
For J = 0 To lstBrandsNewSeason.ColumnCount - 1
Rng.Offset(i, J).Value = lstBrandsNewSeason.List(i, J)
Next J
Next i
wbNew.SaveAs Filename:="C:\...\" & txtNewSeasonName.Value
wbNew.Close
Unload Me
End Sub
This was the proper code needed...Thanks to both of you!!
Bookmarks