Observação
O acesso a essa página exige autorização. Você pode tentar entrar ou alterar diretórios.
O acesso a essa página exige autorização. Você pode tentar alterar os diretórios.
Retorna um objeto que representa um único eixo ou uma coleção de eixos em um gráfico.
Sintaxe
expressão. Eixos (Tipo, AxisGroup)
expressão Uma variável que representa um objeto Chart.
Parâmetros
| Nome | Obrigatório/Opcional | Tipo de dados | Descrição |
|---|---|---|---|
| Type | Opcional | Variant | Especifica o eixo a ser retornado. Pode ser uma das seguintes constantes do Office.XlAxisType : xlValue, xlCategory ou xlSeriesAxis (xlSeriesAxis é válido apenas para gráficos 3D). |
| AxisGroup | Opcional | Office.XlAxisGroup | Especifica o grupo de eixos. O valor predefinido é xlPrimary; ou seja, se o argumento AxisGroup for omitido, será utilizado o grupo primário. Os gráficos 3D têm apenas um grupo de eixos. |
| Type | Opcional | Variant | |
| AxisGroup | Opcional | XLAXISGROUP |
Valor de retorno
Object
Exemplos
A macro SetAxisTitle adiciona uma etiqueta de eixo ao eixo de categorias no gráfico.
Sub SetAxisTitle()
Dim chartShape As Shape
Dim reportName As String
reportName = "Simple scalar chart"
Set chartShape = ActiveProject.Reports(reportName).Shapes(1)
With chartShape.Chart.Axes(xlCategory)
.HasTitle = True
.AxisTitle.Text = "Task"
End With
End Sub
A macro AddCategoryGridlines adiciona linhas de grelha ao eixo de categorias no gráfico.
Sub AddCategoryGridlines()
Dim chartShape As Shape
Dim reportName As String
reportName = "Simple scalar chart"
Set chartShape = ActiveProject.Reports(reportName).Shapes(1)
chartShape.Chart.Axes(xlCategory).HasMajorGridlines = True
End Sub
A macro RemoveGridlines remove as linhas de grelha principais dos eixos de categoria e valor.
Sub RemoveGridlines()
Dim chartShape As Shape
Dim reportName As String
Dim axes As Object
Dim a As Object
reportName = "Simple scalar chart"
Set chartShape = ActiveProject.Reports(reportName).Shapes(1)
chartShape.Chart.Axes(xlCategory).HasMajorGridlines = False
chartShape.Chart.Axes(xlValue).HasMajorGridlines = False
End Sub
Suporte e comentários
Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.