Determina o número de subdivisões das escalas horizontais da grade. O valor padrão desta propriedade é 1 (um). Exemplo:

Sub CommandButton1_Click()
  Set E3Chart1 = Screen.Item("E3Chart1")
  Old = E3Chart1.HorMinorTicks
  For i = 0 To 5
    E3Chart1.HorMinorTicks = i
    MsgBox "Próximo valor"
  Next
  E3Chart1.HorMinorTicks = Old
End Sub