Try this:
Code:
strSQL = "Select [helpTable].[userID], "
For index1 = 1 To countOfFieldsToAdd
strSQL = strSQL & "Cstr(icc4) AS Item_" & index1 & ", Cstr(qcc42) AS Qty_" & index1 & ",'" & masochine & "',"
Next index1
strSQL = Left(strSQL,Len(strSQL)-1) & " INTO [TableForExport] FROM helpTable ORDER BY [helpTable].[userID]"
Debug.Print strSQL
Note that in addition to remove that comma, you will want a space before the word "INTO" (which I showed above).
EDIT: Looks like aytee111 exposed my slow typing skills and posted in the time I was crafting this response!