Imprimir E3chart via Multiplos XObject

Boa Tarde,

Gostaria de uma ajuda de como poderia realizar a impressão do Chart dentro do relatório para multiplos XObject. No meu codigo preciso que a linha 9 seja dinâmica onde altero o xcontrol de acordo com a tela que estou.

1 Sub OnFormat
2
3 End Sub
4
5 Sub OnBeforePrint
6
7 Set Chart = Report.Sections(“PageHeader”).Controls(“E3Chart1”)
8
9 set ChartTela = Application.GetFrame(“Tela”).Screen.Item(“xc_Trend_CRAH1”).Item(“E3Chart1”)
10
11 Chart.HorScaleBegin = ChartTela.HorScaleBegin
12 Chart.HorScaleEnd = ChartTela.HorScaleEnd
13
14 Chart.CopyConfig(ChartTela)
15
16
17 Chart.LoadData()
18
19
20 End Sub
21
22 Sub OnAfterPrint
23
24 End Sub

Obrigado

A Elipse Software criou este espaço com a ideia de estimular a troca de informações entre usuários de nossos produtos. Reservamo-nos o direito de não responder por este canal. Se você deseja suporte imediato, por gentileza, entre em contato pelo e-mail suporte@elipse.com.br ou pelos telefones (11) 3061-2828 / (21) 2430-5912 / (31) 4062-5824 / (41) 4062-5824 / (51) 3346-4699.

Elipse Software created this space aiming to stimulate the exchange of information among users of our products. We reserve the right to not respond through this channel. If you want immediate support, please contact us through the e-mail suporte@elipse.com.br or through our phone numbers (+55 11) 3061-2828 / (+55 21) 2430-5912 / (+55 31) 4062-5824 / (+55 41) 4062-5824 / (+55 51) 3346-4699.