Estou criando gráficos em Excel mas não estou conseguindo alterar o tamanho e a posição para colocar vários gráficos em uma mesma Planilha. Também estou com dificuldade para criar um gráfico em cada planilha, pois quando o novo gráfico é criado, a nova planilha fica selecionada, e preciso selecionar a primeira Planilha que é onde os dados estão, qual é o comando pra isso?
Simula o que vc está querendo fazer gravando macro no Excel, depois vc olha o código do macro e transpõe para progress, muito mais simples
para selecionar uma planilha vc pode usar o comando x-app:Sheets:item("Nome da planilha "):select(). funções exemplos de funções para o grafico..... orientacao = (1 ou 2) x-app:ActiveChart:Axes(orientacao,1):HasMajorGridLines = yes / no -> exibi ou oculta linhas de grade x-app:ActiveChart:Axes(orientacao,1):TickLabels:font:ColorIndex = (1-56). -> define a cor da fonte dos ticks x-app:ActiveChart:Axes(orientacao,1):TickLabels:font:name = nome da fonte -> define o tipo de fonte dos ticks x-app:ActiveChart:Axes(orientacao,1):TickLabels:font:size = tamanho da fonte -> define o tamanho da fonte dos ticks x-app:ActiveChart:Axes(orientacao,1):TickLabels:font:FontStyle = (1-8) -> define o estilo da fonte dos ticks x-app:ActiveChart:Axes(orientacao,1):TickLabelsrientation = (-90 /90) -> define a orientação dos ticks x-app:ActiveChart:Axes(orientacao,1):TickLabelSpacing = espaçamento -> define os espaçamento entre os ticks x-app:ActiveChart:ChartArea:Border:ColorIndex = (1-56) define a cor da borda do grafico x-app:ActiveChart:ChartArea:Border:LineStyle = (1-56) define o estilo da borda do grafico
Segue mais alguns comandos. x-app:ActiveChart:ChartArea:Border:Weight = (1-4) define a largura da borda do grafico x-app:ActiveChart:ChartArea:Interior:ColorIndex = (1-56) define a cor de fundo do gráfico x-app:ActiveChart:ChartArea:Shadow = yes/no define a sombra do grafico x-app:ActiveChart:ApplyDataLabels(texto auto,leg.da serie,Linhas H.,Nomes da serie,Nomes da categoria,Valores da serie,%da serie,Valor a cada dado). yes ou no. Habilita ou desabilita os labels de dados do grafico x-app:ActiveChart:Legendosition = (T,B,L,R,C) posicao da legenda Para inserir um grafico na planilha x-app:Sheets(NomedaPlanilha):ChartObjects:Add(Posicao X,Posicao Y,Tamanho W,Tamanho H):Activate x-app:ActiveChart:ChartWizard(intervalo de celula, Tipo de grafico, Subtipo de grafico, orientacao(1-2), 1, 1, true, Nome do grafico, Nome do eixo X, Nome do eixo Y,). x-app:ActiveChart:Location(Toda planilha ou area(f-w),Nome da planilha de destino). x-app:ActiveChart:SeriesCollection(Nome da serie):delete(). - deleta a serie x-app:ActiveChart:SeriesCollection(Nome da serie):name = nome da serie - define o nome da serie x-app:ActiveChart:SeriesCollection:NewSeries(). cria uma nova serie de dados para o grafico x-app:ActiveChart:SetSourceData(intervalo de celula,orientacao(1-2). define os dados de origem do gráfico x-app:ActiveChart:ChartTitle:Border:ColorIndex = (1-56) define a cor da borda do titulo x-app:ActiveChart:ChartTitle:Border:LineStyle = (1-8) define o estilo da linha da borda do titulo x-app:ActiveChart:ChartTitle:Border:Weight = (1-4) define a largura da borda do titulo x-app:ActiveChart:ChartTitle:Interior:ColorIndex = (1-56) define a cor de fundo do titulo x-app:ActiveChart:ChartTitle:font:ColorIndex = (1-56) define a cor da fonte do titulo x-app:ActiveChart:ChartTitle:font:name = nome da fonte - define a fonte do titulo x-app:ActiveChart:ChartTitle:font:size = tamanho da fonte - define o tamanho da fonte do titulo x-app:ActiveChart:ChartTitle:font:FontStyle = nome do estilo - define o estilo da fonte do titulo x-app:ActiveChart:ChartTitle:shadow = yes/no define a sombra do titulo Acho que era isso....
