Since I don't know VB, is there a way to take the code below and instead of making the user intervene and input a Rep # each time, can the coding be set up so that it will create a separate file for each rep (based on the Rep #), no matter if there are 50 reps, 100 reps, or 500 reps. And each separate rep file should be named according to Rep # and Rep Name - columns A & B and saved in the same folder.
A file is attached.
Dim myValue As String
Set myWorkbook = ActiveWorkbook
myValue = InputBox("Make sure you have saved this workbook first!" & Chr(13) & Chr(13) & "Which rep number do you want?")
If myValue <> "" Then
introw = 2
Do Until Cells(introw, 1) = ""
Select Case Cells(introw, 1)
introw = introw + 1
If Cells(2, 2) = "" Then
MsgBox "No data!"
Application.DisplayAlerts = False
l\" & Cells(2, 1) & " - " & Cells(2, 2) & ".xlsx", FileFormat:=xlOpenXMLWorkb
Application.DisplayAlerts = True
l\Kevin Sample Data - macro enabled.xlsm"