Curso Completo de Visual Basic 6

Curso de Visual Basic 6
Curso de Visual Basic 6

Acho que já escrevi isto aqui em algum momento da vida, mas, em todo caso, é sempre bom lembrar.

O site www.codelines.com disponibiliza um curso bem completo de Visual Basic 6. O curso é bem montado, tem bons exemplos e foca muito nos fundamentos. Para desenvolvedores VBA, a base e praticamente a mesma. O link direto para o curso é:

Curso Grátis de Programação em Visual Basic

http://www.codelines.com/ManualVB/ManualVB.htm

Mais uma da série “só não estuda quem não quer”. 🙂

Bom proveito!

Tomás Vásquez

Trabalhando com strings no VBA

Desenvolvedores VBA, uni-vos!

É sempre bom saber que muita coisa do VBA é equivalente ao VB tradicional, pelo menos até a versão 6. Dele podemos tirar muita coisa interessante para colocarmos em nosso código. Um exemplo é a manipulação de Strings, que neste caso a herança é total, podendo usar tudo o que a linguagem e o compilador VB oferecem, por exemplo, o operador Like, pouco conhecido nas comunidades que frequento. Uma explicação bem completa sobre Strings no VB, totalmente aplicável ao VBA pode ser vista neste link:

Trabalhando com strings no VBA – http://www.macoratti.net/strings.htm

É só uma pequena amostra do que o VBA ainda nos tem a oferecer.
Bom proveito!

Tomás Vásquez

Manipulando e organizando gráficos em VBA

Segue um link muito bom sobre manipulação de gráficos no Excel com VBA.

http://processtrends.com/pg_chart_vba.htm

Atendeu a uma necessidade de um amigo num fórum de discussão sobre Excel que era de reorganizar os gráficos em um planilha. O link possui uma planilha de exemplo que faz exatamente isso.

Além disso, o site também possui uma área bem recheada de exemplos para download, tudo focado em manipulação e criação de gráficos

Bom proveito!

Tomás Vásquez

Importe arquivos muito grandes para o Excel

Dica postada originalmente pelo site PC World e de extrema serventia para algumas situações que envolvam importação de grandes quantidades de dados no Microsoft Excel 2003 e versões anteriores. A versão 2007 já conta com uma quantidade mais generosa de linhas e colunas, tornando este problema menos frequente.


Importe arquivos muito grandes para o Excel
Rodolfo de Benito – PC WORLD/Espanha
09-01-2006

Tem uma lista muito grande que não cabe em uma planilha do Excel? Saiba como criar uma macro para quebrá-la em várias planilhas

As planilhas do Excel têm um limite de 65.536 linhas. Caso você tente importar dados de uma lista com mais itens que esse valor para um arquivo do Excel, receberá um aviso de que a planilha é incapaz de realizar a operação. Uma solução para esse problema é importar a parte dos dados que couber na primeira planilha e depois retomar o processo a partir do ponto onde parou em uma outra planilha do mesmo arquivo. Para isso, basta usar o campo “Iniciar importação na linha” presente na primeira tela do assistente de importação de texto. Se o arquivo ainda não couber em duas planilhas, repita o processo em quantas for necessário.

Para automatizar essa tarefa, é possível criar uma pequena macro em Visual Basic capaz de ler o arquivo dos dados e quebrá-lo em quantas planilhas for preciso. Clique em Ferramentas / Macro / Macros. Dê um nome para sua macro, por exemplo Importar TextosGrandes, e clique em Criar. No editor do Visual Basic que se abrirá, digite o seguinte código:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
Sub ImportarTextosGrandes()
    Dim ultimaFila, fila, contador As Long
    Dim linea, NomeArquivo As String
    'Calcula a última linha da planilha
    Selection.End(xlDown).Select
    ultimaFila = Selection.Row
    Selection.End(xlUp).Select
    Set oSistemaArquivo = CreateObject("Scripting.FileSystemObject")
    'Nome do arquivo a importar
    NomeArquivo = "C:\Windows\setuplog2.txt"
    Set arquivo = oSistemaArquivo.OpenTextFile(NomeArquivo, 1, False, -2)
    fila = 1
    contador = 1
    Do While arquivo.AtEndOfStream <> True
        linea = arquivo.ReadLine
        Cells(fila, "a").Value = linea
        'Atualiza barra de status
        Application.StatusBar = "Lendo linha número = " & contador
        fila = fila + 1
        contador = contador + 1
        'Cria nova planilha quando planilha atual está cheia
        If fila > ultimaFila Then
            Worksheets.Add after:=ActiveSheet
            fila = 1
        End If
    Loop
End Sub

Note que a variável NomeArquivo contém o caminho e o nome do arquivo onde estão os dados que serão importados. Criada a macro, para disparar a importação clique em Ferramentas / Macro / Macros. Clique no nome da macro criada e escolha Executar. Durante o processo, a barra de status indicará o número da linha em transferência.

Excel arquivos grandes - 400x

Link original: http://pcworld.uol.com.br/dicas/2006/01/09/idgnoticia.2006-01-09.9646172645/

Tomás Vásquez

Technology, Education and whatever else

css.php