Important:

Quaisquer soluções e/ou desenvolvimento de aplicações pessoais, ou da empresa, que não constem neste Blog podem ser tratados como consultoria freelance.

Views

Vitrine

+Views

Widgets Mundo Blogger

DONUT PROJECT 2015 - Excel - Formatting A Pivot Field's Data - Formatando os Campos de uma Tabela Dinâmica

DONUT PROJECT 2015 - Excel - Formatting A Pivot Field's Data - Formatando os Campos de uma Tabela Dinâmica



Sub DP_PivotField_DataFormatting()

Dim pf As PivotField

Set pf = ActiveSheet.PivotTables("PivotTable1").PivotFields("Months")

'Change Data's Number Format
  pf.DataRange.NumberFormat = "#,##0;(#,##0)"
  
'Change Data's Fill Color
  pf.DataRange.Interior.Color = RGB(219, 229, 241)

'Change Data's Font Type
  pf.DataRange.Font.FontStyle = "Arial"

End Sub


Ei! Envie seus comentários e sugestões de artigos. Compartilhe este artigo com seus chefes, colegas de trabalho e amigos.

DONUT PROJECT 2015 - Excel - Formatting A Pivot Table's Data - Formatando os Dados de um Tabela Dinâmica

DONUT PROJECT 2015 - Excel - Formatting A Pivot Table's Data - Formatando os Dados de um Tabela Dinâmica



Sub DP_PivotTable_DataFormatting()

Dim pvt As PivotTable

Set pvt = ActiveSheet.PivotTables("PivotTable1")

'Change Data's Number Format
  pvt.DataBodyRange.NumberFormat = "#,##0;(#,##0)"

'Change Data's Fill Color
  pvt.DataBodyRange.Interior.Color = RGB(0, 0, 0)

'Change Data's Font Type
  pvt.DataBodyRange.Font.FontStyle = "Times New Roman"

End Sub



Ei! Envie seus comentários e sugestões de artigos. Compartilhe este artigo com seus chefes, colegas de trabalho e amigos.

DONUT PROJECT 2015 - Excel - Expand/Collapse Entire Field Detail - Ampliando Detalhadamente os Campos da Tabela Dinâmica

DONUT PROJECT 2015 - Excel - Expand/Collapse Entire Field Detail - Ampliando Detalhadamente os Campos da Tabela Dinâmica



Sub PivotField_ExpandCollapse()

Dim pf As PivotField

Set pf = ActiveSheet.PivotTables("PivotTable1").PivotFields("Month")

'Collapse Pivot Field
  pf.ShowDetail = False
  
'Expand Pivot Field
  pf.ShowDetail = True

End Sub


Ei! Envie seus comentários e sugestões de artigos. Compartilhe este artigo com seus chefes, colegas de trabalho e amigos.

eBook - Série VBA Tips - DONUT PROJECT - Projetos e Códigos de VBA

eBook - Série VBA Tips - DONUT PROJECT - Projetos e Códigos de VBA




CLIQUE AQUI PARA BAIXAR O LIVRO

O objetivo da série DONUT PROJECT é disponibilizar respostas rápidas às suas necessidades mais prementes por soluções em códigos simples. 

HIGIENIZAÇÃO
DP_AcaoHigienica Outra função utilíssima para extrair informações num processo de higienização, extraindo qualquer elemento de uma String a partir de um limitador. 
DP_ReturnOccurs Retorna o número de ocorrências de um caracter numa string.  
DP_ExtraiDelimitedFor Esta função é muito útil, pois permite retornar qualquer conteúdo que estiver delimitado por quaisquer caracteres informados. 
DP_ExtraiOValorEntreParenteses Esta função é totalmente específica, por permitir retornar um conteúdo que estiver entre parênteses.

SEGURANÇA
DP_AnonymizeText Manter o conteúdo das suas planilhas, suas Informações, parcialmente anônimas

PIVOT TABLES (TABELAS DINÂMICAS)
DP_PivotReportLayout Este código permite que melhoremos a aparência das nossas Tabelas Dinâmicas, acertando os seus layouts. 
DP_PivotGrandTotals Este código automaticamente insere totais para todas as Colunas e Linhas na Tabela Dinâmica
DP_RefreshingPivotTables Este recurso, simplificado, serve para atualizar suas Tabelas Dinâmicas assim que abrir a planilha. 
DP_ClearReportFiltering Limpe o filtro da tabela dinâmica.

eMAILS
DP_ExtraindoEmails Será muito utilizada no envio automatizado de e-mails, pois extrai e-mails, a partir de uma planilha sem higienização apropriada.

CLIQUE AQUI PARA BAIXAR O LIVRO



Ei! Envie seus comentários e sugestões de artigos. Compartilhe este artigo com seus chefes, colegas de trabalho e amigos.

eBook - Série VBA Tips - Rastrei os seus Dashboards, Scorecards, Reports, Relatórios, Planilhas e Aplicações - Livro 3

eBook - Série VBA Tips - Rastrei os seus Dashboards, Scorecards, Reports, Relatórios, Planilhas e Aplicações - Livro 3



CLIQUE AQUI PARA BAIXAR O LIVRO


Deseja acompanhar quantas pessoas estão acessando suas Planilhas, Dashboards, Scorecards, ou seus Relatórios disponibilizados na rede da sua empresa? 

Sim, é natural que após termos gasto tanto tempo para prepararmos um belo produto de análise, desejemos acompanhar quem o está consultando. 

Bem, você pode acompanhar através de um arquivo de .LOG. 

Isso pode ser facilmente implementado por adicionarmos uma pequena função dentro da sua aplicação. 

Sim, insira estes códigos em suas aplicações para que possa gravar os LOGs em qualquer diretório (ou servidor de arquivos) escondido. E acompanhe, mesmo que remotamente os acessos feitos às sua aplicações. 



CLIQUE AQUI PARA BAIXAR O LIVRO


Ei! Envie seus comentários e sugestões de artigos. Compartilhe este artigo com seus chefes, colegas de trabalho e amigos.

brazilsalesforceeffectiveness@gmail.com

✔ Brazil SFE®Author´s Profile  Google+   Author´s Professional Profile   Pinterest   Author´s Tweets

eBook - Série VBA Tips - 13 Funções Poderosas no MS Excel - Livro 4

eBook - Série VBA Tips - 13 Funções Poderosas no MS Excel - Livro 4



É sempre bom podermos sacar algumas soluções prontas, para que apenas as copiemos e colemos em nossas necessidades. 

Ahhh, você nunca fez isso? 

Bem,  o propósito deste livro é que você copie e use!


Ei! Envie seus comentários e sugestões de artigos. Compartilhe este artigo com seus chefes, colegas de trabalho e amigos.

eBook - Série VBA Tips - Criando Logs de acesso - Livro 1

eBook - Série VBA Tips - Criando Logs de acesso - Livro 1



CLIQUE AQUI PARA BAIXAR O LIVRO

O intuito desta série é o de disponibilizar, por assunto, respostas rápidas às necessidades mais prementes de soluções, através de códigos simples. 




Ei! Envie seus comentários e sugestões de artigos. Compartilhe este artigo com seus chefes, colegas de trabalho e amigos.

SANDWICH PROJECT 2016 - VBA Excel: Navegando entre as abas

SANDWICH PROJECT 2016 - VBA Excel - VBA Excel: Navegando entre as abas



Um recurso interessante quando queremos propiciar a navegação entre diversas abas (Sheets) de uma mesma planilha é criarmos um formulário, colocando nele 2 botões para navegação. Um para a direita, que avançará e outro botão para a esquerda que retornará.

No caso abaixo, além de avançarmos as pastas o botão ainda posicionará na mesma célula em que estávamos na planilha corrente.

Essa facilidade de navegação é interessante. Experimente!

Sub DOSSC()
    ' André Bernardes             16/09/2008 14:33    bernardess@gmail.com
    ' Move-se para a esquerda, quando não houver mais pastas avisa automaticamente.
    ' DOSSC=down one sheet same cell

    On Error Resume Next
    
    Application.Goto Reference:=ActiveWorkbook.Sheets(ActiveSheet.Index - 1).Range(ActiveCell.Address)
     
    ' Caso ocorra um erro, aborta a Sub e envia mensagem.
    If Err.Number = 0 Then Exit Sub
    
    MsgBox ("Não é possível retornar mais, você está posicionado na primeira pasta, (" & Application.ActiveSheet.Name & ")")  'Caso o usuário esteja na primeira past (sheet).
End Sub

Sub UOSSC()
    ' Author:                             Date:                       Contact:
    ' André Bernardes             16/09/2008 14:39    bernardess@gmail.com
    ' Move-se para a direita, quando não houver mais pastas avisa automaticamente.
    ' UOSSC=up one sheet same cell

    On Error Resume Next
    
    Application.Goto Reference:=ActiveWorkbook.Sheets(ActiveSheet.Index + 1).Range(ActiveCell.Address)
     
    ' Caso ocorra um erro, aborta a Sub e envia mensagem.
    If Err.Number = 0 Then Exit Sub

    MsgBox ("Não é possível avançar mais, você está posicionado na última pasta, (" & Application.ActiveSheet.Name & ")")  'Caso o usuário esteja na primeira past (sheet).
End Sub


Ei! Envie seus comentários e sugestões de artigos. Compartilhe este artigo com seus chefes, colegas de trabalho e amigos.
 


SANDWICH PROJECT 2016 - VBA Excel - Gráfico - Redefine tamanho de bolha

SANDWICH PROJECT 2016 - VBA Excel - Gráfico - Redefine tamanho de bolha



Este exemplo define o tamanho da bolha num gráfico com 96% do tamanho padrão se o gráfico for um gráfico de bolhas 2D.

With Worksheets(1).ChartObjects(1).Chart

    If .ChartType = xlBubble Then

        Let .ChartGroups(1).BubbleScale = 96

    End If

End With


Ei! Envie seus comentários e sugestões de artigos. Compartilhe este artigo com seus chefes, colegas de trabalho e amigos.
 


SANDWICH PROJECT 2016 - VBA Excel: Efetuando loop no intervalo nomeado

SANDWICH PROJECT 2016 - VBA Excel: Efetuando loops no intervalo nomeado



Não raro nomeamos um intervalo, range, de dados para a manipulação mais precisa. Também podemos fazê-lo para cuidar de certos aspectos da formatação.

Abaixo temos um código que faz um loop através de cada célula de um intervalo nomeado usando um loop For Each...Next. Se o valor de qualquer célula no intervalo exceder o valor de limit, a cor da célula será alterada para amarelo.

Este código é muito funcional e prático para montar semáforos em uma planilha de dados que aponta resultados.

Sub ApplyColor()

    Const Limit As Integer = 25

    For Each c In Range("MyRange")

        If c.Value > Limit Then
            Let c.Interior.ColorIndex = 27
        End If

    Next c

End Sub


Ei! Envie seus comentários e sugestões de artigos. Compartilhe este artigo com seus chefes, colegas de trabalho e amigos.
 

SANDWICH PROJECT 2016 - VBA Excel: Definindo o tipo de Gráfico

SANDWICH PROJECT 2016 - VBA Excel: Definindo o tipo de Gráfico



Quando o gráfico estiver ativo, use a propriedade ActiveChart para fazer referência a ele. O gráfico fica ativo se o usuário o selecionou ou se foi ativado com o método Activate

O exemplo abaixo ativa o 1º gráfico e, em seguida, define o título e o tipo dele.

Charts(1).Activate 
With ActiveChart 
    Let .Type = xlLine 
    Let .HasTitle = True 
    Let .ChartTitle.Text = "Vendas de Janeiro" 
End With


Ei! Envie seus comentários e sugestões de artigos. Compartilhe este artigo com seus chefes, colegas de trabalho e amigos.
 


Related Posts Plugin for WordPress, Blogger...
diHITT - Notícias