Artigo: 213644 - Última revisão: quinta-feira, 23 de Novembro de 2006 - Revisão: 3.5

XL2000: Como definir automaticamente mínimo e máximo escala para o 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 | Reduzir tudo

Sumário

No Microsoft Excel, pode definir as propriedades mínimo e máximo da escala do eixo dos YY para qualquer valor. O exemplo neste artigo mostra os passos necessários para criar uma Microsoft Visual Basic for Applications procedimento que determina os valores mínimos e máximo contidos nos dados e define a escala com base nestes valores.

Mais Informação

Microsoft fornece exemplos de programação ilustração só, sem garantia expressa ou implícita, incluindo, sem limitação, garantias implícitas de comercialização e/ou adequação a um fim específico. Este artigo pressupõe que está familiarizado com a linguagem de programação apresentada e as ferramentas utilizadas para criar e depurar procedimentos. Profissionais de suporte da Microsoft podem ajudar a explicar a funcionalidade de um determinado procedimento, mas não modificarão estes exemplos para proporcionarem funcionalidades adicionais nem criarão procedimentos adaptados às necessidades específicas.
Se dispõe de limitada experiência de programação, poderá contactar um Microsoft Certified Partner ou a serviços de aviso. Para obter mais informações, visite estes Web sites da Microsoft:

Microsoft certificado Partner - https://partner.microsoft.com/global/30000104 (https://partner.microsoft.com/global/30000104)

Serviços Microsoft aviso - 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 contactar a Microsoft, visite o seguinte Web site da Microsoft: http://support.microsoft.com/default.aspx?scid=fh;EN-US;CNTACTMS (http://support.microsoft.com/default.aspx?scid=fh;en-us;cntactms) A seguinte macro do Visual Basic define os valores mínimos e máximo para a escala do eixo y num gráfico para os valores máximo e mínimos dos dados utilizados para criar o gráfico.

Escreva o seguinte na folha de módulo do 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
				

Utilizar a macro

  1. Seleccione a folha de cálculo que contém o gráfico.
  2. Para activar a macro, clique em ' macro ' no menu Ferramentas e executar a macro SetScaleToMinAndMaxValues .
Os valores mínimos 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 revisto ou traduzido por humanos. A Microsoft tem artigos traduzidos por aplicações (MT) e artigos traduzidos por tradutores profissionais. O objectivo é simples: oferecer em Português a totalidade dos artigos existentes na base de dados do suporte. Sabemos no entanto que a tradução automática não é sempre perfeita. Esta pode conter erros de vocabulário, sintaxe ou gramática? erros semelhantes aos que um estrangeiro realiza ao falar em Português. A Microsoft não é responsável por incoerências, erros ou estragos realizados na sequência da utilização dos artigos MT por parte dos nossos clientes. A Microsoft realiza actualizações frequentes 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/ )