VBA Convert only a particular worksheet to CSV

[[email protected]]

Hi,

I am writing a script which converts xls to csv.
However, before it save / converts it to csv, it should only be
selecting the correct worksheet and not whatever is shown when opened
up.

I have tried this

Workbooks.Open fileName:=fileNames(i)
ActiveWorkbook.Worksheets("wksTest").Activate
ActiveWorkbook.SaveAs fileName:=Left(fileNames(i),
Len(fileNames(i)) - 4) & ".csv", FileFormat:=xlCSV
ActiveWorkbook.Close


However it doesn't like the Activate command there. Whats wrong with
it?

Thanks.

[Mallycat]

try select instead of activate

[[email protected]]

Select doesn't work.

It says:
"Code Execution has been interrupted"



Mallycat wrote:
> try select instead of activate
>
>
> --
> Mallycat
> ------------------------------------------------------------------------
> Mallycat's Profile: http://www.excelforum.com/member.php...o&userid=35514
> View this thread: http://www.excelforum.com/showthread...hreadid=562338

[NickHK]

Dim WB As Workbook

Set WB=Workbooks.Open fileName:=fileNames(i)
WB.Worksheets("wksTest").SaveAs fileName:=Left(fileNames(i),
Len(fileNames(i)) - 4) & ".csv", FileFormat:=xlCSV
WB.Close

NickHK

<[email protected]> wrote in message
news:[email protected]...
> Hi,
>
> I am writing a script which converts xls to csv.
> However, before it save / converts it to csv, it should only be
> selecting the correct worksheet and not whatever is shown when opened
> up.
>
> I have tried this
>
> Workbooks.Open fileName:=fileNames(i)
> ActiveWorkbook.Worksheets("wksTest").Activate
> ActiveWorkbook.SaveAs fileName:=Left(fileNames(i),
> Len(fileNames(i)) - 4) & ".csv", FileFormat:=xlCSV
> ActiveWorkbook.Close
>
>
> However it doesn't like the Activate command there. Whats wrong with
> it?
>
> Thanks.
>