By using this site, you agree to our updated Privacy Policy and our Terms of Use. Manage your Cookies Settings.
434,640 Members | 2,095 Online
Bytes IT Community
+ Ask a Question
Need help? Post your question and get tips & solutions from a community of 434,640 IT Pros & Developers. It's quick & easy.

AS400 vbscript question

P: 1
I hope this is the right forum...
I am a code dabling engineer attempting to write vbscript to access Excel from the AS400. Initially I want to be able to activate an Excell worksheet copy a part number and jump back to the AS400 to make changes.

Does anyone know how I can activate the Excell sheet?
So far I have successfully opened an Excell file but since I want to be able to loop through many part numbers I don't want to have to slow things down by opening the Excell file every time.
...one thing I tried
Application.Windows("Copy down list.xls").Activate
... this doesn't work.

[PCOMM SCRIPT HEADER]
LANGUAGE=VBSCRIPT
DESCRIPTION=
[PCOMM SCRIPT SOURCE]

Set objExcel = CreateObject("Excel.Application")
objExcel.Visible = True
objExcel.Workbooks.Open ("F:\Copy down List.xls")


objExcel.Cells(1, 1).Select
objExcel.ActiveCell.Offset(1, 0).Select
objExcel.Selection.Copy

autECLSession.SetConnectionByName(ThisSessionName)
autECLSession.autECLPS.SendKeys "[edit-paste]"
autECLSession.autECLPS.SendKeys "[enter]"


Any help would be greatly appreciated. It will save me hours of manual entry!
Apr 8 '08 #1
Share this question for a faster answer!
Share on Google+

Post your reply

Sign in to post your reply or Sign up for a free account.