Encerramento do ano Comercial de 2012










Bem, este ano termina com bons números de visitação para este Blog.

As visualizações e visitações aumentaram consideravelmente nestes últimos 3 meses de 2012.

Diversos artigos foram escritos para propositalmente abranger âmbitos complementares do desenvolvimento VBA, e ganhamos a criação de um novo Blog voltado para o grafismo: Blog Infochart.


Assim, encerramos oficialmente as ações no ano comercial de 2012.

Deixo-lhes alguns números para análise que foram especialmente focados nestes últimos 3 meses de 2012.

Obtivemos algumas visitas Mobile







Visitas por País






Tags: Blog, 2012, encerramento, Google Analytics, Visitas, Visualizações, acessos, público, freqüência, recência



VBA Excel - Criando Índice de todas as Abas - Create An Index Page





Nós desenvolvedores gostaríamos todos de viver num mundo ideal onde tivéssemos bastante tempo para analisar os dados que transformaremos em informações. Seria muito importante que pudéssemos gastar algum tempo prospectando o modo como as informações serão analisadas pelos usuários finais. 

Raras são as vezes onde conseguimos tempo para isso. O código a seguir implementa uma facilidade que não requererá nada do nosso tempo para desenvolver. Apenas podemos copiar e colar.

Tornar os Dashboards mais funcionais, rápidos e práticos é uma das nossas obrigações.

Estamos constantemente sob o paradoxo de não termos tempo para implementar as facilidades que farão com que os usuários utilizem massivamente as nossas soluções. 

A criação de um índice para as diversas planilhas dentro do nosso workbook certamente será bem vinda.

- Acrescente a chamada a este procedimento assim que o workbook for aberto:


Private Sub Workbook_Open()

    Call CreateIndex

End Sub

Crie um novo módulo e cole o conteúdo abaixo:


Sub CreateIndex()

    Let Application.DisplayAlerts = False

    

    On Error Resume Next

    

    Sheets("Index").Delete

    

    On Error GoTo 0

    

    Set myIndex = Sheets.Add(Sheets(1))

    

    Let myIndex.Name = "Index"

    Let iRow = 1

    

    For Each theSheet In ThisWorkbook.Sheets

        If iRow = 1 Then

            Let Cells(iRow, 1).Value = "INDEX"

        Else

            ActiveSheet.Hyperlinks.Add Anchor:=Cells(iRow, 1) _

             , Address:="", SubAddress:= _

             "'" & theSheet.Name & "'" & "!A1", TextToDisplay:=theSheet.Name

        End If

        

        Let iRow = iRow + 1

    Next



    Sheets("Index").Move After:=Sheets(1)

End Sub


Tags: VBA, index, sheet, page, create, índice, planilha, worksheet



VBA Excel Basic - Copiando um Range de Planilha para Planilha - Copy a range in an Excel sheet using vba




Sub Copy_Data()
Let Application.ScreenUpdating = False

Let Worksheets("Plan01").Range("B2:Y34").Value = ActiveSheet("Plan02").Range("B2:Y34").Value

Let Application.ScreenUpdating = True
End Sub

Outro modo de fazer a mesma coisa:

Sub Macro1()
  Range("B2:Y34").Select

  Selection.Copy

  Sheets("Sheet5").Select

  Range("B2").Select

  Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone,    SkipBlanks:=False, Transpose:=False
End Sub

Copiando uma coluna:

Sheets("Temp").Columns(1).Copy

Sheets("Overview").Range("C40").PasteSpecial



Tags: VBA, Excel, Range, Planilha, Copiar, Copy, 


Infográficos - Diversos exemplos de Gráficos - Charting Examples



Especialmente para aqueles que estão há anos numa empresa onde estão responsáveis por "criar" gráficos e apresentações, ter algumas opções de como criá-los e mesmo poder compreender como estes são construídos será certamente um achado. Quero brindá-los com essas técnicas desenvolvidas e muito bem documentadas pelo excelentíssimo Sr. Andy Pope.
Ratio Plotarea
Dashboards
Polar Plot2 add-in
Set Square Axis
Código VBA para criar gráficos com quadrados
Banding plot area on bubble chart
Código VBA para alinhar o tiop Área Plot com outros 2 gráficos
Formula Conditional Line
A conditional line chart based on formula
Chart Pattern Fills Add-In
Um add-in para aplicar um fundo (Pattern) como shapes o Excel 2007.
Line Circle Intersections
Função VBA que calcula a intersecção entre as linhas e os círculos.
Pie sizer
Acertando o tamanho dos gráficos de Pizza
Conditional highlighting axis labels
Destacando os Labels do Eixo dos gráficos.
Polar plot charts
Gráfico Polar
Pie chart with individual slice radius
Fatiando o gráfico de Pizza
Label high-low line with values
Adicionando dados com Linhas High-Low
XY Scatter colouration plot
Colorindo os pontos xy scatter
Custom leader lines
Atualizando Automaticamente com informações personalizadas
Positive/negative axis labels on a bar chart
Alinhando os Labels quando as barras estiverem negativas e positivas
Bounding areas
Criação do gráfico de área de dispersão
Pie chart data markers
Usando o gráfico de pizza como data marker
Axis Pointer
Display Total on stacked column
Invert if Negative
Um passo-a-passo de como controlar valores invertidos no gráfico
Delete single legend entry
Explanação sobre como deletar legendas
Labelling last point
Scrolling data chart
Rolagem dinâmica através dos dados
Spotlight Chart
Alternando condicionalmente
Tile Chart
Polar Plot add-in
Staggered Axis labels
Vários métodos para criar rótulos de eixos escalonados
Step Line charts
Várias formas e tipos de gráficos que podem ser utilizados para criar uma linha escalonada
Another column chart with varying width bars  
Gráfico de colunas que tem barras de largura variável, incluindo um estilo empilhados
Dividing a graphic into sections
Dividir um gráfico em seções
Broken Lines for formula linked data
Automatic removal of zero values in pie chart
Um gráfico de pizza que não exibe valores zero
Pie chart tricks
Pizza na pizza
Column chart with varying width bars
Gráfico de colunas que tem barras de largura variável
Pie chart displaying single cropped image
dividindo uma mesma imagem num gráfico de pizza
Cluster column chart with floating gap
Um exemplo de gráfico de colunas agrupadas com uma coluna lacuna flutuante
Broken Axis on Column Chart
Um exemplo de como trabalhar com gráfico de coluna com uma quebra de valor nos Eixos. 
Mostra os dados com uma larga variância entre  o valor min e o valor máx 
Traffic light chart
Um exemplo de gráfico condicional
Side by Side stacked columns
Different width stacked bars
Trabalhando com duas séries de dados diferentes
Average Lines
Linha média no gráfico. Uma coleção de métodos e estilos de gráficos
Floating bar cluster
Gráfico de Barra flutuante
Thermometer chart
Gráfico tipo Termômetro
Mini XY Scatter plots
Stacked Pos/Neg bar
Conditional Line
Muda a cor da Linha se o valor passar do limite determinado
3d XY-Scatter
Simulação de um gráfico XY Scatter 3D
Complex Intersections
Marcando os pontos de intersecção das Linhas.
Gauge chart
Gráfico tipo Gauge

Tags: Infochart, Infographic, Infográfico, gráfico, VBA, charts, sample, example, graph, charting,  Andy Pope


diHITT - Notícias