Save as.csv ( the macro- it doesnt run)

algae · #1 (**permalink**) July 30th, 2013, 06:41 AM

hi people,

my macro to save each sheet (50sheets) of the excelfile as a csv file. Each sheet has a name which i want the macro to use to name the csv file. It doesnt run (it would be a wonder if it did, so seeking your help to put it on track)

HTML Code:

Application.Sheets(c:\M-C\Hist\ronnie30.xlsx).Select
     Application.Sheets(Sheet_Name)
Application.DisplayAlerts = False 
ActiveWorkbook.SaveAs Filename:=filename(sheetname1-50), FileFormat:=xlCSV, _
     CreateBackup:=False
     CreateBackup:=False
    Application.DisplayAlerts = False
    
repeat every 60 min

algae · #2 (**permalink**) July 31st, 2013, 01:28 AM

Hello there,
Ok you folks probably were too busy to tackle the above macro. No matter. Anyway thats been resolved.

May i request for your time and knowledge in editting this small macro ? would be immensely grateful.

this macro does the following

insert row 2 in sheet 2 (only on sheet two , ie not on all sheets of the workbook)
copy paste row 1 onto row 2 of sheet two
(repeat every 75 minutes. It doesnt open, save or close the workbook)

HTML Code:

Sub insert_row()
Selection.Insert Shift:=xlDown
Copy ([row1])
Paste ([row2])
End Sub

but after pasting cell1 the macro gives a 400 error.

can u kindly help with the macro

thanks in advance

algae · #3 (**permalink**) August 1st, 2013, 05:49 AM

Brother,

Yo man. Nobody have the time to edit the small macro. Thats sad, man.

request someone to put that dashed macro thingy on tracks

thanks bro

Need to download code?

Navigation