ID do artigo: 213644 - Última revisão: quinta-feira, 23 de novembro de 2006 - Revisão: 3.5

XL2000: Como definir automaticamente o mínimo e máximo de escala de eixo y

Dica do SistemaEste artigo aplica-se a um sistema operativo diferente do que está a utilizar. Foi desactivado o conteúdo do artigo, que pode não ser relevante para si.

Nesta página

Expandir tudo | Recolher tudo

Sumário

No Microsoft Excel, você pode definir as propriedades mínimo e máximo da escala do eixo y para qualquer valor. O exemplo neste artigo mostra as etapas necessárias para criar um Microsoft Visual Basic for Applications procedimento que determina os valores mínimos e máximo contidos em seus dados e define a escala com base nesses valores.

Mais Informações

Microsoft fornece exemplos de programação apenas para ilustração, sem garantia expressa ou implícita, incluindo, mas não se limitando às garantias implícitas de comercialização e/ou adequação a uma finalidade específica. Este artigo presume que você esteja familiarizado com a linguagem de programação demonstrada e as ferramentas usadas para criar e depurar procedimentos. Profissionais de suporte da Microsoft podem ajudar a explicar a funcionalidade de um determinado procedimento, mas eles não modificarão esses exemplos para fornecer funcionalidades adicionais ou construir procedimentos para atender às suas necessidades específicas.
Se você não tenha muita experiência de programação, talvez queira em contato com um Microsoft Certified Partner ou Microsoft Advisory Services. Para obter mais informações, visite da Microsoft:

Microsoft Certified Partners - https://partner.microsoft.com/global/30000104 (https://partner.microsoft.com/global/30000104)

Comunicado de Microsoft Services - http://support.microsoft.com/gp/advisoryservice (http://support.microsoft.com/gp/advisoryservice)

Para obter mais informações sobre as opções de suporte estão disponíveis e sobre como entrar em contato com a Microsoft, visite o seguinte site: http://support.microsoft.com/default.aspx?scid=fh;EN-US;CNTACTMS (http://support.microsoft.com/default.aspx?scid=fh;en-us;cntactms) A macro de Visual Basic a seguir define os valores mínimos e máximo para a escala do eixo y em um gráfico para os valores máximo e mínimo dos dados usados para criar o gráfico.

Digite o seguinte em uma folha de módulo Visual Basic:
   Sub SetScaleToMinAndMaxValues()
      Dim ValuesArray(), SeriesValues As Variant
      Dim Ctr As Integer, TotCtr As Integer
      ' Uses the first chart on the active worksheet.
      With ActiveSheet.ChartObjects(1).Chart
         ' Note: Instead of the preceding line, you could use this line:
         '
         '    With ActiveChart
         '
         ' if you wanted to be able to run this macro on a chart sheet.
         ' Loops through all of the Series and retrieves the values
         ' and places them into an array named ValuesArray.
         For Each X In .SeriesCollection
            SeriesValues = X.Values
            ReDim Preserve ValuesArray(1 To TotCtr + UBound(SeriesValues))
            For Ctr = 1 To UBound(SeriesValues)
               ValuesArray(Ctr + TotCtr) = SeriesValues(Ctr)
               
            Next
            TotCtr = TotCtr + UBound(SeriesValues)
         Next
         ' Reset the minimum and maximum scale to the minimum and
         ' maximum values in the ValuesArray.
         .Axes(xlValue).MinimumScaleIsAuto = True
         .Axes(xlValue).MaximumScaleIsAuto = True
         .Axes(xlValue).MinimumScale = Application.Min(ValuesArray)
         .Axes(xlValue).MaximumScale = Application.Max(ValuesArray)
      End With
   End Sub
				

Usando a macro

  1. Selecione a planilha que contém o gráfico.
  2. Para ativar a macro, clique em macro no menu Ferramentas e executar a macro SetScaleToMinAndMaxValues .
Os valores mínimo e máximo do eixo y agora devem ser iguais para os valores mínimos e máximo dos dados.

A informação contida neste artigo aplica-se a:
  • Microsoft Excel 2000 Standard Edition
Palavras-chave: 
kbmt kbdtacode kbhowto kbprogramming KB213644 KbMtpt
Tradução automáticaTradução automática
IMPORTANTE: Este artigo foi traduzido por um sistema de tradução automática (também designado por Machine Translation ou MT), não tendo sido portanto traduzido ou revisto por pessoas. A Microsoft possui artigos traduzidos por aplicações (MT) e artigos traduzidos por tradutores profissionais, com o objetivo de oferecer em português a totalidade dos artigos existentes na base de dados de suporte. No entanto, a tradução automática não é sempre perfeita, podendo conter erros de vocabulário, sintaxe ou gramática. A Microsoft não é responsável por incoerências, erros ou prejuízos ocorridos em decorrência da utilização dos artigos MT por parte dos nossos clientes. A Microsoft realiza atualizações freqüentes ao software de tradução automática (MT). Obrigado.
Clique aqui para ver a versão em Inglês deste artigo: 213644  (http://support.microsoft.com/kb/213644/en-us/ )