Hi Leslie,

The following macro might give you somewhere to start. It selects 3
different ranges and clicks the toolbar button for each range. If your
tables are dynamic (ie they change in size from day to day) , post back with
more details on their size and postion. Also post back if you don't know how
to run the macro from a button.


Regards,
Vic Eldridge


Sub SendMultipleRangesToiSeries()

Range("A1:C10").Select
Application.CommandBars("Data").Controls("Transfer Data To
iSeries").Execute

Range("E1:H22").Select
Application.CommandBars("Data").Controls("Transfer Data To
iSeries").Execute

Range("J1:P13").Select
Application.CommandBars("Data").Controls("Transfer Data To
iSeries").Execute

End Sub



"Leslie" wrote:

> I have installed an add-in for the transfer of data from my excel data to
> iSeries. Every time I upload the data to iSeries, I have to select the data
> range on the sheet and click "Data"->"Transfer Data To iSeries". As I have
> several tables of data needed to upload in the sheet, I have to perform the
> this procedure repeatedly. In order to save time, I'm trying to make use of
> Macros to create a button with lines of code which automatically perform the
> above action when I press the button. However, I'm not that familiar with
> Excel Macro, I just couldn't find the add-in in the Object Browser and I
> don't know the exact syntax to perform this function.
> Can anybody help??
>
> Thanks,
> Leslie