vba renaming a file and changing file type

I have 4 files in a folder and want to use VBA to rename and change file type
CSV to XLSX

Please see attached excel workbook

Thanks Carroll

Thanks PCI
I made some changes
CURRENTfolder = "c:\# CURRENT RIBBSTEST AUTOMATING\"
commented out XlsFolder = "C:\Users\user\Downloads\JOB7\" I want to stay in "c:\# CURRENT RIBBSTEST AUTOMATING\" and then kill all "csv" files, leaving only the xlsx files
My changes don't work - stops in the first if statement - don't understand why?
Thanks for your help


Option Explicit

Sub Macro1()

Dim CURRENTfolder As String
Dim XlsFolder As String
Dim fname As String
Dim wBook As Workbook

Dim COUNTER As Long
COUNTER = 1

CURRENTfolder = "c:\# CURRENT RIBBSTEST AUTOMATING\"
' XlsFolder = "C:\# CURRENT RIBBSTEST AUTOMATING\"


fname = Dir(CURRENTfolder & "*.csv")

Do While fname <> ""
Set wBook = Workbooks.Open(CURRENTfolder & fname, Format:=6, DELIMITER:=",")

If COUNTER = 1 Then _
ActiveWorkbook.SaveAs Filename:=CURRENTfolder & "DALLAS.xlsx" _
, FileFormat:=xlOpenXMLWorkbook, CreateBackup:=False
If COUNTER = 2 Then _
ActiveWorkbook.SaveAs Filename:=CURRENTfolder & "FRISCO.xlsx" _
, FileFormat:=xlOpenXMLWorkbook

If COUNTER = 3 Then _
ActiveWorkbook.SaveAs Filename:=CURRENTfolder & "MCKINNEY.xlsx" _
, FileFormat:=xlOpenXMLWorkbook

If COUNTER = 4 Then _
ActiveWorkbook.SaveAs Filename:=CURRENTfolder & "RICHARDSON.xlsx" _
, FileFormat:=xlOpenXMLWorkbook

wBook.Close False
fname = Dir
COUNTER = COUNTER + 1
Loop
Kill CURRENTfolder & "*.csv"


End Sub

PCI thanks for your patience

These lines in your code
CURRENTfolder = "C:\Users\user\Downloads\JOB7\"
XlsFolder = "C:\Users\user\Downloads\JOB7\"
the files I want to rename are in folder "C:\# CURRENT RIBBSTEST AUTOMATING\"
so shouldn't my code be
CURRENTfolder = "C:\# CURRENT RIBBSTEST AUTOMATING\"
XlsFolder = "C:\# CURRENT RIBBSTEST AUTOMATING\"

Also I want to put the code in commandbutton 3 not a macro
can I just copy your code - starting with the line Dim CURRENTfolder As String
carroll

Also, I don't understand your instructions...
You forgot the code tags : Just select the code and clic on the # icon
Where the code stops?
Next statement

When I select your code I don't see a # icon where the code stops
carroll