Search results for query: *

Thanks skip, ill keep that in mind

ahhhh ok this worked fine...Thanks again Skip! WorksheetFunction.Sum(Trim(Sess0.Screen.GetString(12, 59, 10)), Trim(Sess0.Screen.GetString(14, 39, 12)))

Hi, not sure why this is not adding. Substract, divide and multiply all work but does not add, instead it puts the numbers together Trim(Sess0.Screen.GetString(12, 59, 10)) + Trim(Sess0.Screen.GetString(14, 39, 12)) thanks!

got it :) just turned off the prompts under Options | Global Preferences

Looking but cant seem to find what im looking for. even looked under Macros. dont have any examples

sorry skip but what do u mean?

Hey Skip, i have this code below. however, when it tries to close it, there is a pop up box asking me if i want to disconnect sessions Mainframe. I just want it to close without having to click on yes or no. Sub test() Set oSystem = CreateObject("Extra.System") Set oSess =...

Thanks SkipVought, that makes more sense. Let me give this a try

Not quite understanding it :(

Attachmate!Extra

For example, i put this code below in notepad and saved the file as "Testing.vbs". Now when i double click on this file, excel application and the workbook testA.xlsm opens. I would like to do the same for Mainframe. Set objExcel = CreateObject("Excel.Application") Set objWorkbook =...

I like to open an Excel file and Attachmate mainframe using notepad. Is this possible? Thanks

got it working now. replaced .Range("D1").Offset(1).Value = Trim(Sess0.Screen.GetString(7, 2, 25)) to .Range("D" & Rows.Count).End(xlUp).Offset(1, 0) = Trim(Sess0.Screen.GetString(7, 2, 25))

crap thats right...got it working now but one problem. The value that is extracted from Mainframe to column D keeps getting overwritten and does not move to next row Sub Extract() Dim Sessions, System As Object, Sess0 As Object Set System = CreateObject("EXTRA.System") Set Sessions =...

Code below extracts the data for the first account # that is in column A but does not continue the loop to goto next account #. Column A has the accounts numbers and column D would be the data that is extracted from mainframe into excel Sub Extract() Dim Sessions, System As Object, Sess0 As...

Hi Skip, thanks for your help but now im getting error 'Type Mismatch" Dim dMaxDTE As Date, rw As Integer Do For i = 8 To 17 If Trim(Sess0.Screen.GetString(i, 54, 8)) = "" Then Exit For If dMaxDTE < DateValue(Trim(Sess0.Screen.GetString(i, 54, 8)))...

im just confused about this statement you posted earlier If Trim(DateString) = "" Then Exit For This would just exit the loop

Can you please show me how i can incorporate the code into the code you provided earlier

sorry i didn't understand your post "But YOUR date string is that Sess.scrn.GetString() statement in your code."

not really