Is "Copy Test.Doc" the actual name of the file?
which path can't it find - the network or local?
add:
On error resume next
objFSO.CopyFile "\\kceiscp202a\bus_sale_dev\Copy Test.doc", strFolder & "\", OverwriteExisting
If err <> 0 Then wsh.echo err.number,err.description
There are additional parameters you can add to the open command.
Set objApp = CreateObject("Excel.Application")
Set objBook = objApp.Workbooks.open(filename,Notify)
I have not tested this so be sure to run thru the mill.
All the available parameters are...
I found another solution because of a slight problem. If the users' creditials, running the script, does not have permissions to return any information then there is a possibility of a problem. However, there is another solution within Excel. Here it is:
'Open the workbook (.xls) file
Set...
found this script - works like a charm
Set objServerObject = GetObject("WinNT://PUT SERVERNAME HERE/LanmanServer")
If (IsEmpty(objServerObject) = False) Then
iCounter = 0
For Each objresource In objServerObject.resources
If (Not objresource.User = "") And (Not Right(objresource.User,1) =...
Need some help to determine if an excel spreadsheet is open. If you attempt to open a spreadsheet (outside of a script) you'll receive a notice that the spreadsheet is open and have a choice to open a read only copy. I would like to offer the similar functionality in a vbscript.
Basically, the...
Need help adding sheets to a workbook after the last sheet.
I can get a new sheet added but it is not the last sheet and the name I need. The code I'm using is below.
What do I need to get this to work?
Thanks
Dim objXL,objBook,blnSiteFound
blnSiteFound = False
strFile =...
Thanks
You'll have to hold my hand on this one.
What I have so far is :
Set objXL = WScript.CreateObject("Excel.Application")
objXL.Visible = FALSE
objXL.Workbooks.Open(<path to xls file>)
Where does "set wbk = you Excel workbook object" fit in?
I need a little help in accessing different sheets in Excel.
I have scripts to open and retrieve cell contexts located on the first sheet. How do I move to the next sheet?
Using script snippit below I need a way to determine if the grp parameter is a user or a group.
Does anyone have a suggestion?
Thanks
Sub EnumGroupMembers(server,grp)
Dim Group
Dim Member
On Error Resume Next
'Bind to a group object.
Set Group = GetObject("WinNT://"+server+"/"+grp)
If Err...
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.