Criando UserForm no VBA - Excel (Parte 3)
Olá pessoal, chegamos a nossa terceira aula do Tutorial de VBA para montar sua planilha financeira. Nessa aula vamos aprender a trabalhar com ListView, uma ferramenta fantástica, porém, um pouco complexa.
Abaixo disponibilizo a linguagem para criar o cabeçalho do seu listview:
'---------------------------------------------------------------
Dim item As ListItem Dim i As Integer
ListView1.ColumnHeaders.Clear ListView1.ListItems.Clear
ListView1.Gridlines = True ListView1.View = lvwReport ListView1.FullRowSelect = True
ListView1.ColumnHeaders.Add Text:="TIPO", Width:=60, Alignment:=0 ListView1.ColumnHeaders.Add Text:="NF", Width:=60, Alignment:=0 ListView1.ColumnHeaders.Add Text:="CLIENTE / FORNECEDOR", Width:=170, Alignment:=0 ListView1.ColumnHeaders.Add Text:="FORMA DE PGTO", Width:=80, Alignment:=0 ListView1.ColumnHeaders.Add Text:="VALOR", Width:=80, Alignment:=0 ListView1.ColumnHeaders.Add Text:="VENCIMENTO", Width:=70, Alignment:=0 ListView1.ColumnHeaders.Add Text:="COMPETENCI", Width:=70, Alignment:=0 ListView1.ColumnHeaders.Add Text:="DATA PGTO", Width:=70, Alignment:=0
'----------------------------------------------------------------
Grande abraço!
Darlan Machado