Windows 2003 R2 Standard Member Server SP2
Excel 2010 SP1
a expert on here helped me with this script
from a command prompt
this error happens
csvmerge.vbs(23,17) Microsoft Excel Cannot rename a sheet to the same name as another sheet a referenced object library or a workbook referenced by visual basic
This same script ran great on my Windows 7 Pro computer where it was developed.
This Server runs a Inventory program that runs a script that generates 20 .cvs2 files
This script is suppose to place all the csv2 files into one spreadsheet and each on an individual sheet.
One Note I am having another issue installing Office SP2 on this server tring to fix that now
Dont know if this may be the issue.
Set fso = CreateObject("Scripting.FileSystemObject")
Set CurrentFolder = fso.GetFolder("D:\inventory")
Set objExcel = CreateObject("Excel.Application")
Sub ProcessFolder(ByVal Folder)
Set Files = Folder.Files
For Each File In Files
If right(File.Name,3) = "csv" Then
If not boolfirst Then
Set ToWorkbook = objExcel.Workbooks.Open(File)
boolFirst = true
Set FromWorkbook = objExcel.Workbooks.Open(File)
Set ToWorkbook = Nothing