O Kutools for Excel é um poderoso add-in que libera você de realizar operações demoradas no Excel, como combinar planilhas rapidamente, mesclar células sem perder dados, colar somente células visíveis, contar células por cor e assim por diante. 300 + poderosos recursos / funções para Excel 2019, 2016, 2013, 2010, 2007 ou Office 365!
Ele permite a navegação por guias, edição e gerenciamento de aplicativos do Microsoft Office. Você pode abrir vários documentos / arquivos em uma única janela com guias, como o uso do navegador IE 8 / 9 / 10, Firefox e Google Chrome. É compatível com o Office 2019, o 2016, o 2013, o 2010, o 2007, o 2003 ou o Office 365. Demo
O Kutools for Outlook é um poderoso add-in que libera você de operações demoradas que a maioria dos usuários do Outlook deve realizar diariamente! Pode poupar o seu tempo de utilização do Microsoft Outlook 2019, 2016, 2013, 2010 ou Office 365!
O Kutools for Word é um poderoso add-in que libera você de operações demoradas que a maioria dos usuários do Word precisa realizar diariamente! Pode poupar o seu tempo ao utilizar o Microsoft Word / Office 2019, o 2016, o 2013, o 2010, o 2007, o 2003 ou o Office 365!
Restaura a aparência antiga e os menus do Office 2003 para o Microsoft Office 2019, 2016, 2013, 2010, 2007 ou Office 365. Não perca tempo em encontrar comandos na nova fita. Fácil de implantar em todos os computadores de empresas e organizações.
Navegação--Auto texto (adicione gráficos usualmente usados ao painel AutoTexto. Então, clique para inseri-lo quando precisar). |
Extraia dados do gráfico com VBA1. Você precisa criar uma nova planilha e renomeá-la como ChartData. Ver captura de tela:
| Kutools for Excel, com mais de 120 Funções úteis do Excel, melhorar a eficiência de trabalho e economizar tempo de trabalho. |
2. Em seguida, selecione o gráfico do qual deseja extrair dados e pressione Alt + F11 chaves ao mesmo tempo, e uma Microsoft Visual Basic para Aplicações Janela pops.
3. Clique inserção > Módulo, então cole abaixo o código VBA para o aparecimento Módulo janela.
VBA: extrair dados do gráfico.
Sub GetChartValues()
'Updateby20150203
Dim xNum As Integer
Dim xSeries As Object
xCount = 2
xNum = UBound(Application.ActiveChart.SeriesCollection(1).Values)
Application.Worksheets("ChartData").Cells(1, 1) = "X Values"
With Application.Worksheets("ChartData")
.Range(.Cells(2, 1), _
.Cells(xNum + 1, 1)) = _
Application.Transpose(ActiveChart.SeriesCollection(1).XValues)
End With
For Each xSeries In Application.ActiveChart.SeriesCollection
Application.Worksheets("ChartData").Cells(1, xCount) = xSeries.Name
With Application.Worksheets("ChartData")
.Range(.Cells(2, xCount), _
.Cells(xNum + 1, xCount)) = _
Application.WorksheetFunction.Transpose(xSeries.Values)
End With
xCount = xCount + 1
Next
End Sub
4. Então clique Corrida botão para executar o VBA. Ver captura de tela:
Então você pode ver os dados serem extraídos para ChartData Folha.
Escala de exportação como gráfico |
| Kutools' Escala de exportação como gráfico visa salvar ou exportar uma seleção de células como vários formatos gráficos. |
Dica:
1. Você pode formatar as células conforme você precisa.
2. Os dados do gráfico selecionado são extraídos para a primeira célula da tabela ChartData em padrão.
 Se você está interessado neste addi-in, baixe o teste gratuito do 60-days. |
Português
English
العربية
简体中文
繁體中文
Nederlands
Français
Deutsch
Italiano
日本語
한국어
Русский
Español