Após construir um gráfico queria ajustar automaticamente a escala dele pelos valores que o usuario entrou, por exemplo:
Escala_X = InputBox("Digite o valor de x máximo para o gráfico.")
With ActiveChart.Axes(xlCategory)
.MinimumScale = 0
.MaximumScale = 480 '<-- Aqui queria declarar a variável "Escala_X", como faço isso?
.MinorUnitIsAuto = True
.MajorUnitIsAuto = True
.Crosses = xlAutomatic
.ReversePlotOrder = False
.ScaleType = xlLinear
.DisplayUnit = xlNone
End With
O outro problema é que eu queria colocar uma imagem de fundo no gráfico, mas como fazer para o usuário escolher em seu computador o arquivo da imagem e, depois, para o código inserir essa variável no gráfico? Supondo que eu chame a variável de "figura":
Selection.Fill.UserPicture PictureFile:="C:\imagem.jpg" '<-- como fazer aqui para ele buscar a varíável "figura"?
Pergunta
ara00
Após construir um gráfico queria ajustar automaticamente a escala dele pelos valores que o usuario entrou, por exemplo:
Escala_X = InputBox("Digite o valor de x máximo para o gráfico.")
With ActiveChart.Axes(xlCategory)
.MinimumScale = 0
.MaximumScale = 480 '<-- Aqui queria declarar a variável "Escala_X", como faço isso?
.MinorUnitIsAuto = True
.MajorUnitIsAuto = True
.Crosses = xlAutomatic
.ReversePlotOrder = False
.ScaleType = xlLinear
.DisplayUnit = xlNone
End With
O outro problema é que eu queria colocar uma imagem de fundo no gráfico, mas como fazer para o usuário escolher em seu computador o arquivo da imagem e, depois, para o código inserir essa variável no gráfico? Supondo que eu chame a variável de "figura":
Selection.Fill.UserPicture PictureFile:="C:\imagem.jpg" '<-- como fazer aqui para ele buscar a varíável "figura"?
Selection.Fill.Visible = True
Link para o comentário
Compartilhar em outros sites
2 respostass a esta questão
Posts Recomendados
Participe da discussão
Você pode postar agora e se registrar depois. Se você já tem uma conta, acesse agora para postar com sua conta.