Report.SelectionObject

Sets the selected embedded object within the report.

Syntax Parameters Assignment value
- - Object

SVB Example

Adding an item to a report: 

Option Base 1
Option Explicit
Sub Main
    Dim rpt As Report
    'assign the report object rpt to the active report
    Set rpt = ActiveReport
    'sets the report selection object to the activedataset
    'the active dataset will be placed into the report
    rpt.SelectionObject = ActiveDataSet
End Sub