#include <Excel.au3>

$excelFile = FileOpenDialog("Select test file", @DesktopDir, "Excel files (*.xls*)")

$oExcel = _Excel_Open(False, False, False, False, True)
$oWorkbook = _Excel_BookOpen($oExcel, $excelFile, True, False)
$table = _Excel_RangeRead($oWorkbook, Default, Default, 1, True)
_Excel_BookClose($oWorkbook)

$table[0][0] &= ". pp." & ChrW(0xA0) & $table[0][1] & ChrW(0x2011) & $table[0][2]
_ArrayColDelete($table, 2)
_ArrayColDelete($table, 1)

$oWorkbook = _Excel_BookNew($oExcel, 1)
_Excel_RangeWrite($oWorkbook, Default, $table, "A1", True, True)
_Excel_BookSaveAs($oWorkbook, @DesktopDir & "\test.csv", $xlCSV, True)
_Excel_BookClose($oWorkbook)
_Excel_Close($oExcel)