quarta-feira, 23 de setembro de 2015

Vídeo 89 - Parte 02 - Listview Factory VBA - Criação automática de códig...

Nesse vídeo mostro um formulário que auxilia a criação de Listview.

Em 2 passos é possível criar todo o código que gera os cabeçalhos e o carregamento dos dados.



1º Passo - Criar os nomes das colunas ou importar dados de uma guia que contenha uma tabela de dados



2º Passo - Selecionar a guia onde os dados estão, da mesma planilha ou de uma planilha externa.



- Implementado a configuração para campo numérico e somatório de colunas.



Bom proveito...



Link para Download:

https://www.dropbox.com/s/2zyrvtmp3q6arly/listview-factory2.xlsm?dl=0



Atenção: Não apagar a guia Temp ela é usada para impotação dos cabeçalhos externos...



segunda-feira, 21 de setembro de 2015

Video 89 - Listview Factory - Criação automática de código para Listview

Nesse vídeo mostro um formulário que auxilia a criação de Listview.

Em 2 passos é possível criar todo o código que gera os cabeçalhos e o carregamento dos dados.



1º Passo - Criar os nomes das colunas ou importar dados de uma guia que contenha uma tabela de dados



2º Passo - Selecionar a guia onde os dados estão, da mesma planilha ou de uma planilha externa.



Bom proveito...



Link para Download:

https://www.dropbox.com/s/puqq27zm1cwsq5v/listview-factory.xlsm?dl=0






quinta-feira, 13 de agosto de 2015

Vídeo 88 - Parte 02 - Google Maps no Excel - Importação de imagens



Correções:

- Carregamento das Rotas;

- Edição/Atualização de registros;

- Adição de imagens a rotas já cadastradas;

- Outros Bugs;



Link:

https://www.dropbox.com/s/h7veh1jbqbxp4hw/GoogleMaps-no-Excel-final-correcao-bugs.xlsm?dl=0





terça-feira, 4 de agosto de 2015

Vídeo 88 - Parte 01 - Google Maps no Excel - Importação de imagens

Nesse vídeo mostro a interação entre o Excel e o Google Maps.

O formulário foi construído para facilitar busca de rotas e o  armazenamento de informações sobre elas. Foi incluído no código a função de poder salvar imagens da rota e armazená-las numa pasta para posterior consulta.









*** Arquivo Compactado da planilha com as imagens de 3 rotas salvas.



Link:

https://www.dropbox.com/s/p5tsndyhvd8lt01/88-GoogleMap

terça-feira, 28 de julho de 2015

Vídeo 87 - Parte 05 - DashBoard de Vendas com Treeview - Somatório

Nessa série de vídeos vou abordar o objeto TreeView para montagem de um DashBoard de vendas.

O Objeto é utilizado também para fazer o somatório e o subtotal dos agrupamentos de Ano - Mes - Cliente - Produto.



Nesta 5ª continuação da série mostrando o processo de eliminação de repetidos da listview para somatório do valor total por ano, o mesmo processo se aplica ao somatório dos meses e clientes, sedo adicionados apenas os critérios respectivos.



***

Pode ser necessário instalar a Biblioteca MSCOMCTL.OCX para funcionamento da TreeView, segue link com instruções...

http://logicavba.blogspot.com.br/2013/10/como-ativar-o-controle-listview-no.html











****

Link da planilha utilizado no Vídeo:

https://www.dropbox.com/s/hba9ukz3d9o3740/87-dashboard-somatorio-e-subtotais-em-treeview.xlsm?dl=0


terça-feira, 21 de julho de 2015

Vídeo 87 - Parte 04 - DashBoard de Vendas com Treeview - Somatório

Nessa série de vídeos vou abordar o objeto TreeView para montagem de um DashBoard de vendas.

O Objeto é utilizado também para fazer o somatório e o subtotal dos agrupamentos de Ano - Mes - Cliente - Produto.



Nesta 4ª parte mostro as macros relacionadas ao procedimento NodeClick da TreeView, ou seja TreeView1_NodeClick, que fazem o carregamento da Listview dependendo do nó selecionado, os dados carregados na listview se referem ao período total (acumulado de todos os anos) , das vendas anuais, vendas mensais e vendas por cliente.



***

Pode ser necessário instalar a Biblioteca MSCOMCTL.OCX para funcionamento da TreeView, segue link com instruções...

http://logicavba.blogspot.com.br/2013/10/como-ativar-o-controle-listview-no.html









****

Link da planilha utilizado no Vídeo:

https://www.dropbox.com/s/hba9ukz3d9o3740/87-dashboard-somatorio-e-subtotais-em-treeview.xlsm?dl=0

sexta-feira, 17 de julho de 2015

Vídeo 87 - Parte 03 - DashBoard de Vendas com Treeview - Somatório e Sub...

Nessa série de vídeos vou abordar o objeto TreeView para montagem de um DashBoard de vendas.

O Objeto é utilizado também para fazer o somatório e o subtotal dos agrupamentos de Ano - Mes - Cliente - Produto.



Nesta 3ª parte mostro como fazer o acumulador que é o responsável pelas somas nos respectivos nós da TreeView



***

Pode ser necessário instalar a Biblioteca MSCOMCTL.OCX para funcionamento da TreeView, segue link com instruções...

http://logicavba.blogspot.com.br/2013/10/como-ativar-o-controle-listview-no.html













****

Link da planilha utilizado no Vídeo:

https://www.dropbox.com/s/hba9ukz3d9o3740/87-dashboard-somatorio-e-subtotais-em-treeview.xlsm?dl=0


quinta-feira, 16 de julho de 2015

Vídeo 87 - Parte 02 - DashBoard de Vendas com Treeview - Somatório e Sub...

Nessa série de vídeos vou abordar o objeto TreeView para montagem de um DashBoard de vendas.

O Objeto é utilizado também para fazer o somatório e o subtotal dos agrupamentos de Ano - Mes - Cliente - Produto.



Nesse vídeo mostro como fazer a criação dos nós de maneira simples... sem a parte que gera os totais e subtotais dentro da treeview.



***

Pode ser necessário instalar a Biblioteca MSCOMCTL.OCX para funcionamento da TreeView, segue link com instruções...

http://logicavba.blogspot.com.br/2013/10/como-ativar-o-controle-listview-no.html











****

Link da planilha utilizado no Vídeo:

https://www.dropbox.com/s/hba9ukz3d9o3740/87-dashboard-somatorio-e-subtotais-em-treeview.xlsm?dl=0

quarta-feira, 15 de julho de 2015

Vídeo 87 - Parte 01 - DashBoard de Vendas com Treeview - Somatório e Sub...

Nessa série de vídeos vou abordar o objeto TreeView para montagem de um DashBoard de vendas.

O Objeto é utilizado também para fazer o somatório e o subtotal dos agrupamentos de Ano - Mes - Cliente - Produto.



***

Pode ser necessário instalar a Biblioteca MSCOMCTL.OCX para funcionamento da TreeView, segue link com instruções...

http://logicavba.blogspot.com.br/2013/10/como-ativar-o-controle-listview-no.html















****

Link da planilha utilizado no Vídeo:

https://www.dropbox.com/s/hba9ukz3d9o3740/87-dashboard-somatorio-e-subtotais-em-treeview.xlsm?dl=0

sábado, 4 de julho de 2015

Vídeo 86 - Parte 03 - Excel VBA - Importar índices e cotações - CDI - Po...

Nessa série de vídeos vou mostrar como fazer a importação de índices e cotações de sites da WEB para a planilha no excel. Os dados importados são apresentados em formulários com listview. Os dados podem ser atualizados rapidamente com a macro de importação que traz sempre as informações direto do site para a planilha.

Nesse terceiro vídeo são importados os valores das cotações do CDI,  Poupança, e SELIC.











Download da Planilha:

https://www.dropbox.com/s/wwqauayrrbfqan5/86-3-buscar-indices-e-cotacoes.xlsm?dl=0



Dúvidas sobre instalação do Listview: acesse o link...

http://logicavba.blogspot.com.br/2013/10/como-ativar-o-controle-listview-no.html


quinta-feira, 25 de junho de 2015

Vídeo 86 - Parte 02 - Excel VBA - Importar índices e cotações da WEB - D...

Nessa série de vídeos vou mostrar como fazer a importação de índices e cotações de sites da WEB para a planilha no excel. Os dados importados são apresentados em formulários com listview. Os dados podem ser atualizados rapidamente com a macro de importação que traz sempre as informações direto do site para a planilha.

Nesse segundo vídeo são importados os valores das cotações do dólar... Dólar comercial, Dólar Ptax, Dólar Paralelo e Dólar Turismo.



Download da Planilha:

https://www.dropbox.com/s/3abiauh79srh1h9/86-2-buscar-indices-e-cotacoes.xlsm?dl=0













Dúvidas sobre instalação do Listview: acesse o link...

http://logicavba.blogspot.com.br/2013/10/como-ativar-o-controle-listview-no.html

terça-feira, 16 de junho de 2015

Vídeo 86 - Parte 01 - Excel VBA - Importar índices e cotações da WEB

Nessa série de vídeos vou mostrar como fazer a importação de índices e cotações de sites da WEB para a planilha no excel. Os dados importados são apresentados em formulários com listview. Os dados podem ser atualizados rapidamente com a macro de importação que traz sempre as informações direto do site para a planilha.



Download da Planilha:

https://www.dropbox.com/s/d2ggeot8g3mgrzb/86-buscar-indices-e-cotacoes.xlsm?dl=0





Dúvidas sobre instalação do Listview: acesse o link...

http://logicavba.blogspot.com.br/2013/10/como-ativar-o-controle-listview-no.html



quinta-feira, 11 de junho de 2015

Video 85 - Parte 02 - Excel VBA - Filtro Multicritério com BD Access e c...

Nesse vídeo mostro como configurar a consulta SQL para que seja possível a construção de um filtro com múltiplos critérios para filtragem dos dados de um banco de dados em ACCESS .mdb



Na parte 2 adiciono ao filtro multi-critério a possibilidade de filtrar por operadores (ex. filtrar valores maiores que determinado numero, ou menores que...) e também a possibilidade de filtrar entre dados compondo filtros mais elaborados.









**************************************

LINK para baixar a planilha do vídeo:

https://www.dropbox.com/s/a5pnqldxji8y0y5/85-Filtro-multi-criterios-ACCESS-Entre-datas.xlsm?dl=0



LINK para baixar o BD Access:

https://www.dropbox.com/s/uil3la3xux39t1y/cad_bd.mdb?dl=0



Para funcionar salve os dois arquivos na mesma pasta.

Certifique-se que tenha habilitado Microsoft DAO 3.6 Object Library ou superior.



O funcionamento da Listview também requer instalação do complemento MSCOMCTL.OCX. Instruções disponíveis em



http://logicavba.blogspot.com.br/2013/10/como-ativar-o-controle-listview-no.html

terça-feira, 9 de junho de 2015

Video 85 - Parte 01 - Excel VBA - Filtro Multicriterio com BD Access e c...

Nesse vídeo mostro como configurar a consulta SQL para que seja possível a construção de um filtro com múltiplos critérios para filtragem dos dados de um banco de dados em ACCESS .mdb





**************************************

LINK para baixar a planilha do vídeo:

https://www.dropbox.com/s/vybssfqx8o0umz1/85-Filtro-multi-criterios-ACCESS.xlsm?dl=0



LINK para baixar o BD Access:

https://www.dropbox.com/s/uil3la3xux39t1y/cad_bd.mdb?dl=0



Para funcionar salve os dois arquivos na mesma pasta.

Certifique-se que tenha habilitado Microsoft DAO 3.6 Object Library ou superior.



O funcionamento da Listview também requer instalação do complemento MSCOMCTL.OCX. Instruções disponíveis em



http://logicavba.blogspot.com.br/2013/10/como-ativar-o-controle-listview-no.html

sexta-feira, 5 de junho de 2015

Vídeo 84 - Filtro entre datas com soma em BD Access

Nesse vídeo abordo a pesquisa entre duas datas utilizando uma base de dados em access.

São mostrados 2 modelos de pesquisa um com a pesquisa fixa a uma coluna com datas e outro código onde é possível selecionar a coluna que se deseja pesquisar, quando há mais de uma coluna com data na tabela.

O retorno das pesquisas podem ser tanto para listview como para listbox, coloquei os dois modelos no arquivo utilizado no vídeo e que está no link abaixo para download...









**************************************

LINK para baixar a planilha do vídeo:

https://www.dropbox.com/s/ve94fgo236l3j84/84-Filtro-entre-datas-com-soma-ACCESS.xlsm?dl=0


quarta-feira, 3 de junho de 2015

Vídeo 83 - Filtro entre datas com soma - listbox e listivew

Nesse vídeo mostro como criar um formulário, usando listbox e listview, para a construção de um filtro entre datas com soma dos valores compreendidos no intervalo pesquisado.



Filtro entre datas com VBA







*** Link para Download da planilha usada no vídeo:

https://www.dropbox.com/s/jmli5mvbontygjr/Filtro-entre-datas-com-soma.xlsm?dl=0


terça-feira, 26 de maio de 2015

Vídeo 82 - Listivew e Imagelist - Alterar Status de Registro - Mudar Cor...

Nesse vídeo explico como configurar a listview para mudança de imagem (ícone) ao se mudar o status de um registro. Utlizando listview,  imagelist e combobox.



***** LINK PARA PLANILHA USADA  NO VÍDEO

https://www.dropbox.com/s/4kho5yobgjip920/82-alterar%20-status-listview.xlsm?dl=0













***

Instalar a biblioteca listview

http://logicavba.blogspot.com.br/2013/10/como-ativar-o-controle-listview-no.html


sexta-feira, 22 de maio de 2015

Video 81 - Mega Pack de Small Icons para Listview

Pacote com 200 Small Icons para Listview. As imagens dos arquivos servirão para utilização em projetos onde seja necessário utilizar icones na listview.



Download dos arquivos do Vídeo



*** Arquivo Excel com formulário de amostra dos Small Icons

https://www.dropbox.com/s/c23hjpm1p3mthll/81-mega-pack-small-icons.xlsm?dl=0



*** Arquivo Compactado com as imagens

https://www.dropbox.com/s/m7x9nl8f8c70zqp/Small-icons.rar?dl=0



quinta-feira, 14 de maio de 2015

Vídeo 80 - Especial 200 Vídeos - Assistir vídeos do Youtube em Formulári...

Nesse Especial de 200 Vídeos...  mostro um formulário em excel VBA que permite a visualização de vídeos do Youtube. No formulário utilizo o objeto ShockwaveFlash para permitir que os vídeos sejam mostrados.

Na Listagem de vídeos é possível marcar os vídeos como "Assistidos" mudando a com do ícone "SmallIcon" da Listview.







*** LINK para Download da planilha



https://www.dropbox.com/s/c6tfv6hkyoflq8w/especial-200-videos.xlsm?dl=0



segunda-feira, 11 de maio de 2015

Vídeo 79 - Parte 01 - Trabalhando com Imagens em Listview

Imagens em Listview



Nesse vídeo explico como configurar uma listview para que possa exibir imagens e ícones.



******* Link para a Planilha do vídeo *******



https://www.dropbox.com/s/6zpj8pvsszt8xx2/79-imagem-em-listiview.xlsm?dl=0













*******  OBS: Obrigado por assistir o Vídeo!



          Se gostou do conteúdo, clique em GOSTEI e compartilhe o conteúdo, parece pouco mas ajuda muito na divulgação do

CANAL...



 Att. Renam





***

Instalar a biblioteca listview



http://logicavba.blogspot.com.br/2013/10/como-ativar-o-controle-listview-no.html

domingo, 10 de maio de 2015

Vídeo 78 - Habilitar Barra de Rolagem em Formulários e Frames - ScrollBars

Nesse vídeo é mostrado como configurar um formulário para que tenha barras de rolagem ( ScroolBars). O scroll pode ser configurado para o objeto Frame (quadro) possibilitando uma área maior para objetos dentro do mesmo formulário.



******* Link para Download *****

https://www.dropbox.com/s/25wr4kvv65vv10f/78-Scroll-em-formul%C3%A1rios.xlsm?dl=0



sábado, 9 de maio de 2015

Excel Minuto - Vídeo 30 - Textbox - Permitir somente números ou letras e...

Nesse vídeo mostro a configuração de duas caixas de texto (TextBox). A configuração vai permitir somente a entrega de valores numéricos ou então somente de letras



**** Link para Download do Arquivo ****



https://www.dropbox.com/s/er0mx3rkdt7qbly/30-somente-numeros-ou-letras-textbox.xlsm?dl=0





sexta-feira, 8 de maio de 2015

Excel Minuto - Vídeo 29 - Listview - Remover itens de Listview

Nesse vídeo mostro como remover itens de uma listview.

******* Link Para Download **********

https://www.dropbox.com/s/9p7egn3j80nuev1/29-retirar_itens_de_listview.xlsm?dl=0


quinta-feira, 7 de maio de 2015

Excel Minuto Vídeo 28 Listview Operações em Listview

Nesse vídeo mostro como realizar operações dentro de listview, fazendo com que o resultado seja mostrado dentro de outra coluna  do próprio objeto e também a soma do total de uma coluna.



**** LINK PARA DONWLOAD DA PLANILHA ****

https://www.dropbox.com/s/87371m6axw5orpa/28-operacoes_em_listview.xlsm?dl=0





quarta-feira, 6 de maio de 2015

Excel Minuto - Vídeo 27 - Listview - Editar ou adicionar dados em Listview



Nesse minuto mostro o código que edita ou adiciona dados em uma coluna específica da Listview com a utilização de uma textbox e usando o procedimento Afterupdate do objeto.



***** LINK PARA DOWNLOAD DO ARQUIVO ****



https://www.dropbox.com/s/p10qguaagy7lnzn/27-Editar_dados_em_listview.xlsm?dl=0





domingo, 3 de maio de 2015

Excel minuto - Vídeo 25 - Listview - Bloquear entrada de itens já transf...

Nesse vídeo mostro como bloquear a entrada de itens já transferidos para outra listview, caso haja necessidade de restrição na duplicação de registros.





***** LINK PARA DOWNLOAD *****

https://www.dropbox.com/s/gt9wcc1kcea5ffs/25-bloquear-itens-ja-inseridos.xlsm?dl=0






sábado, 2 de maio de 2015

Excel minuto - Vídeo 24 - Listview - Transferir dados entre listview

Nesse vídeo mostro como transferir dados de uma listview  para para outra...



***** LINK PARA DOWNLOAD DA PLANILHA *****

https://www.dropbox.com/s/f71nrsbr5128gjq/24-Transferir_dados_entre_listview.xlsm?dl=0



sexta-feira, 1 de maio de 2015

Excel minuto - Vídeo 23 - Listview - Buscar / Filtrar dados em Listview

Nesse vídeo mostro como fazer um filtro de dados numa listview para seleção de resultado...



***** LINK PARA DOWNLOAD *****

https://www.dropbox.com/s/eerw4enp3ctkl02/23-Filtro_em_listview.xlsm?dl=0





quinta-feira, 30 de abril de 2015

Excel Minuto - Vídeo 22 - Listview - Permitir selecão de apenas um item

Nesse vídeo mostro como configurar uma Listview para que permita  apenas uma caixa de seleção (CheckBox) ser marcada por vez.

O código é colocado dentro do Procedimento _ItemCheck da Listview.



***** LINK PARA DOWNLOAD *****

https://www.dropbox.com/s/dweamvbzbf44092/22-Filtro_em_listview.xlsm?dl=0





Excel Minuto - Video 21 - Testando uma data em relação a outra.

Nesse vídeo mostro como utilizar o procedimento_Change da TextBox para testar a entrada de uma data em relação a outra data já inserida no formulário.



***** LINK PARA DOWNLOAD *****
https://www.dropbox.com/s/oeo9saqgp2hkt1m/21-testar_data_em_relacao_a_outra_data.xlsm?dl=0


terça-feira, 28 de abril de 2015

Excel Minuto - Vídeo 20 - Testando datas inseridas em textbox

Série Excel Minuto - Fazendo o teste da data inserida em uma  textbox, nesse primeiro caso testamos se a data é inferior a data de hoje e bloqueamos a entrada dessa data no objeto.





**** LINK PARA DOWNLOAD ****

https://www.dropbox.com/s/i1p0ieodevabqqu/20-testar_data_menor_que_hoje.xlsm?dl=0



Excel Minuto - Vídeo 19 - Calendário POP-UP em Formulário no Excel

Nova série de vídeos de Excel Minuto...



domingo, 26 de abril de 2015

Video 77 - Parte 12.3 - Formulário para Pedido de Compras - Formulário d...

Formulário para Impressão de Pedidos de Compras



O vídeo detalha o processo utilizado para o carregamento dos pedidos gerados no Form para a planilha de impressão.







LINK DOWNLOAD -
 **** Não esqueça de criar uma pasta chamada Pedidos para que o sistema salve os PDFs
(deve ser criada no mesmo diretório onde a planilha for salva) ***

https://www.dropbox.com/s/6ggvc9cny13zxj7/77-p12-CEI-Pedidos_de_Compras.xlsm?dl=0

 Att. Renam

***
Instalar a biblioteca listview
http://logicavba.blogspot.com.br/2013/10/como-ativar-o-controle-listview-no.html
Complemento do windows para gerar PDF
link para baixar o suplemento para gerar PDF a partir do VBA
http://www.microsoft.com/pt-br/download/details.aspx?id=7

Vídeo de como gerar PDF no excel com VBA
https://www.youtube.com/watch?v=ZRQkEAtLv4g

sábado, 25 de abril de 2015

Video 77 - Parte 12.2 - Formulário para Pedido de Compras - Cancelar e E...

Segunda parte do vídeo sobre o Formulário de Pedidos, no vídeo mostro como fazer o cancelamento e edição de um pedido já emitido.

sexta-feira, 24 de abril de 2015

Video 77 - Parte 12.1 - Formulário para Pedido de Compras

Décimo segundo vídeo da série que aborda a construção de um sistema de controle industrial para gerenciamento de entrada e saída de produtos com utilização da importação de arquivos XML.

Nesse vídeo é mostrado o formulário para pedido de compra de Matérias Primas

LINK DOWNLOAD - 
 Não esqueça de criar uma pasta chamada Pedidos para que o sistema salve os PDFs
(deve ser criada no mesmo diretório onde a planilha for salva)

https://www.dropbox.com/s/6ggvc9cny13zxj7/77-p12-CEI-Pedidos_de_Compras.xlsm?dl=0

***

Instalar a biblioteca listview
http://logicavba.blogspot.com.br/2013/10/como-ativar-o-controle-listview-no.html

Complemento do windows para gerar PDF
link para baixar o suplemento para gerar PDF a partir do VBA
http://www.microsoft.com/pt-br/download/details.aspx?id=7

Vídeo de como gerar PDF no excel com VBA
https://www.youtube.com/watch?v=ZRQkEAtLv4g





domingo, 29 de março de 2015

Importar dados de outra planilha com escolha da guia - Excel Avançado

Nesse Post mostro como importar dados de outra planilha com a possibilidade de escolhermos a guia a ser importada... os dados são importados da planilha para a listview, onde podemos selecionar os registros para montar um relatório por exemplo...

Para importar somente a guia que queremos de outra planilha foram criados os seguintes formulários:

01. Formulário para escolha da Planilha.
02. Formulário par escolha da guia da planilha selecionada.




Ao selecionar a guia os dados serão importados primeiramente para a Listview e podem ser todos descarregados na planilha de relatórios ou somente os itens selecionados serem importados.



Link para download: compartilhado via Dropbox
https://www.dropbox.com/s/6cjvch9qm55iser/74%20-%20Importar%20dados%20de%20outro%20arquivo%20xls.xlsm?dl=0


Mais detalhes no vídeo:
Parte 01:



Parte 02:


Att.
Renam



Criar pasta com o nome de célula ou variável e salvar em PDF

Nesse post mostro como criar pasta e salvar arquivo em PDF dentro dela, o nome da pasta pode ser o conteúdo de uma célula, de uma variável, ou ainda de um textbox/combobox...

No código abaixo uso a célula E3 da planilha selecionada para ser o nome da pasta e também para criar o PDF que será salvo nessa mesma pasta...

    Dim caminho As String
    Dim pasta As Object, NomePasta
   
    Set pasta = CreateObject("Scripting.FileSystemObject")
    NomePasta = ActiveWorkbook.Path & "\" & Range("E3").Text
    
   If Not pasta.FolderExists(NomePasta) Then
        pasta.CreateFolder (NomePasta)
   End If
        
    ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, _
    Filename:=ActiveWorkbook.Path & "\" & Range("E3") & "\" & "Relatório Nº " & Range("E3") & ".pdf", _
    Quality:=xlQualityStandard, IncludeDocProperties:=True, IgnorePrintAreas:=True, OpenAfterPublish:=False
    
    caminho = NomePasta & "\" & "Relatório Nº " & Range("E3") & ".pdf"
    Me.txt_arquivo = caminho


A variável caminho irá armazenar o caminho, diretório, onde o arquivo gerado foi salvo e será mostrado dentro da caixa de texto txt_arquivo....


Mais detalhes sobre o procedimento, pode ser encontrado no vídeo abaixo


 


Att.
Renam



link Dropbox para Download:
https://www.dropbox.com/s/rjiuhppvnoxu5p0/73%20-%20Criar%20pasta%20com%20o%20nome%20de%20c%C3%A9lula%20ou%20vari%C3%A1vel.xlsm?dl=0


terça-feira, 24 de fevereiro de 2015

Editando documentos no Word através do Excel + Cadastro de Contratos



Nesse Tutorial mostro como interagir o Excel com o Word para edição de documentos... 
Através de um formulário para cadastramento de contratos de aluguel demostro como fazer essa interação, criando novos documentos a partir de um modelo editado no Word.

A planilha mostrada no vídeo abaixo vai permitir a substituição de elementos pré-determinados no documento, no caso, utilizei o # antes do nome dos elementos para que o código localize esse elemento e faça a substituição diretamente no WORD.

Abaixo trecho do código que permite fazer essa substituição: Macro btn_montar_contrato

Private Sub btn_montar_contrato_Click()

    Dim WORD As WORD.Application
    Dim DOC As WORD.Document
    
    Set WORD = CreateObject("Word.Application")
    WORD.Visible = True
    
    Set DOC = WORD.Documents.Open("C:\Teste\contrato_modelo.docx")
    
    With DOC
        '*Dados locador
        .Application.Selection.Find.Text = "#LOCADOR"
        .Application.Selection.Find.Execute
        .Application.Selection.Range = UCase(Me.txt_razao)
        
        .Application.Selection.Find.Text = "#RG_LOCADOR"
        .Application.Selection.Find.Execute
        .Application.Selection.Range = txt_ie
               
        .Application.Selection.Find.Text = "#CPF_LOCADOR"
        .Application.Selection.Find.Execute
        .Application.Selection.Range = txt_cnpj
         
        '*Dados locatário
        .Application.Selection.Find.Text = "#LOCATARIO"
        .Application.Selection.Find.Execute
        .Application.Selection.Range = UCase(txt_nome_locatario)

.
.
.

End Sub

Os campos respectivos no dcumento #LOCADOR, #RG_LOCADOR serão substituídos pelos valores que estiverem nas caixas de texto txt.razao e txt_ie




link para download dos arquivos:

https://www.dropbox.com/s/q68zihhv01yqhyt/71%20-%20Preencher%20Contrato.rar?dl=0
*** Atenção: Editar no código o caminho onde salvará o modelo do contrato a ser editado para que funcione...

*** Em caso erro na Biblioteca da listview por falta da referência
      Segue link explicando como resolver o problema
     http://logicavba.blogspot.com.br/2013/10/como-ativar-o-controle-listview-no.html