Conheça o aplicativo Random, com ele você pode gerar:
- Combinações aleatórias entre letras, números e caracteres especiais;
- Listas aleatórias;
- Nomes aleatórios; e
- Números aleatórios;
Clique aqui para ir para o aplicativo no Google Play ou se preferir, utilize o QR CODE abaixo direto no seu Smartphone.
O Código Fonte
11 de julho de 2015
3 de janeiro de 2015
Como executar uma macro do VBA ao ativar um planilha no Excel
O VBA nos dá a possibilidade de executarmos alguma ação/macro quando ocorrem alguns eventos em uma planilha do Excel, dentre esses eventos temos o:
Activate - ocorre quando uma planilha é ativada;
Deactivate - ocorre quando uma planilha é desativada;
Change - ocorre quando é feita alguma alteração na planilha;
Nessa postagem irei demostrar como utilizar o evento Activate. Para começarmos devemos abrir o VBA (pressionando ALT + F11) e exibir o código da planilha que queremos trabalhar, como mostra a imagem abaixo.
Activate - ocorre quando uma planilha é ativada;
Deactivate - ocorre quando uma planilha é desativada;
Change - ocorre quando é feita alguma alteração na planilha;
Nessa postagem irei demostrar como utilizar o evento Activate. Para começarmos devemos abrir o VBA (pressionando ALT + F11) e exibir o código da planilha que queremos trabalhar, como mostra a imagem abaixo.
7 de dezembro de 2014
Ler arquivos XLS e XLSX utilizando NPOI em C#
Uma maneira de ler arquivos XLS e XLSX utilizando C# é através da biblioteca NPOI, ela nos permite ler esses tipos de arquivos sem a necessidade de termos o Microsoft Excel instalado, o que em alguns casos pode ocorrer. Para começar, devemos baixar os arquivos binários nesse link e depois adicioná-los as referências do nosso projeto, feito isso podemos começar.
A primeira coisa que devemos fazer é importar os namespaces que iremos utilizar, que são:
A primeira coisa que devemos fazer é importar os namespaces que iremos utilizar, que são:
using NPOI.SS.UserModel; using NPOI.HSSF.UserModel; // para arquivos XLS using NPOI.XSSF.UserModel; // para arquivos XLSXExiste uma diferença nas classes que são utilizadas em arquivos XLS e em arquivos XLSX, quando usamos arquivos XLS as classes que devemos utilizar começam com a letra H, por exemplo: HSSFWorkbook, HSSFSheet, HSSFRow, HSSFCell, etc. Para arquivos arquivos XLSX as classes começam com a letra X: XSSFWorkbook, XSSFSheet, XSSFRow, XSSFCell, etc. No exemplo que vou mostrar, irei ler um arquivo XLS e escrever seu conteúdo em um RichTextBox:
15 de fevereiro de 2013
Remover senha de proteção de uma Planilha do Excel
Para remover a senha da planilha, basta executar o seguinte procedimento no VBA:
Após alguns segundos a senha é removida.
Para aqueles que não estão muito familiarizados com o VBA, criei um suplemento que contém a macro para remover a senha, basta abrir o arquivo que contém a planilha protegida e depois abrir o arquivo DesprotegerPlanilhaAtiva.xla, se aparecer alguma mensagem de segurança, clique em "Habilitar Macros", depois pressione ALT + F8, digite DesprotegerPlanilhaAtiva e clique em Executar.
Google Docs
YouTube
http://ontraining.com.br/2012/03/05/microsoft-excel-vba-como-retirar-senha-de-protecao-de-planilha/
Sub DesprotegerPlanilhaAtiva() Dim i, i1, i2, i3, i4, i5, i6 As Integer, j As Integer, k As Integer, l As Integer, m As Integer, n As Integer On Error Resume Next For i = 65 To 66 For j = 65 To 66 For k = 65 To 66 For l = 65 To 66 For m = 65 To 66 For i1 = 65 To 66 For i2 = 65 To 66 For i3 = 65 To 66 For i4 = 65 To 66 For i5 = 65 To 66 For i6 = 65 To 66 For n = 32 To 126 ActiveSheet.Unprotect (Chr(i) & Chr(j) & Chr(k) & Chr(l) & Chr(m) & Chr(i1) & Chr(i2) & Chr(i3) & Chr(i4) & Chr(i5) & Chr(i6) & Chr(n)) If ActiveSheet.ProtectContents = False Then MsgBox "Planilha desprotegida com sucesso!", vbInformation + vbOKOnly, "Informação" Exit Sub End If Next Next Next Next Next Next Next Next Next Next Next Next End Sub
Após alguns segundos a senha é removida.
Para aqueles que não estão muito familiarizados com o VBA, criei um suplemento que contém a macro para remover a senha, basta abrir o arquivo que contém a planilha protegida e depois abrir o arquivo DesprotegerPlanilhaAtiva.xla, se aparecer alguma mensagem de segurança, clique em "Habilitar Macros", depois pressione ALT + F8, digite DesprotegerPlanilhaAtiva e clique em Executar.
Download
Google Docs
Vídeo
YouTube
Origem
http://ontraining.com.br/2012/03/05/microsoft-excel-vba-como-retirar-senha-de-protecao-de-planilha/
29 de abril de 2012
Obter o Handle sobre o cursor do Mouse
Para obter o Handle sobre o cursor do Mouse utilizando Delphi, iremos utilizar um Timer, três Edits e as seguintes funções:
GetCursorPos - Obtém a posição do Mouse;
WindowFromPoint - Retorna o Handle de acordo com a posição informada;
GetWindowText - Obtém o Texto referente ao Handle;
GetClassName - Obtém a Classe referente ao Handle;
O evento OnTimer do Timer ficará assim:
Google Docs
GetCursorPos - Obtém a posição do Mouse;
WindowFromPoint - Retorna o Handle de acordo com a posição informada;
GetWindowText - Obtém o Texto referente ao Handle;
GetClassName - Obtém a Classe referente ao Handle;
O evento OnTimer do Timer ficará assim:
procedure TfrmMain.tHandleTimer(Sender: TObject); var Handle : Longint; Posicao : TPoint; Texto, Classe: array [0..255] of char; begin GetCursorPos(Posicao); Handle := WindowFromPoint(Posicao); GetWindowText(Handle, Texto, SizeOf(Texto)); GetClassName(Handle, Classe, SizeOf(Classe)); edtHandle.Text := IntToStr(Handle); //TEdit edtTexto.Text := Texto; //TEdit edtClasse.Text := Classe; //TEdit end;Simples não?
Google Docs
17 de março de 2012
Como criar um Teclado Virtual utilizando Delphi
Basicamente, o que você observa em um teclado virtual quando o utiliza?
- sempre fica sobre as janelas e programas abertos.
- não recebe o foco ao clicar nas teclas.
- envia teclas para o objeto ativo.
Sabendo disso, para criar um teclado virtual em Delphi, vamos precisar fazer o seguinte:
- sempre fica sobre as janelas e programas abertos.
- não recebe o foco ao clicar nas teclas.
- envia teclas para o objeto ativo.
Sabendo disso, para criar um teclado virtual em Delphi, vamos precisar fazer o seguinte:
26 de fevereiro de 2012
Iniciando
Muitas vezes precisamos de alguma ajuda com os nossos códigos e passamos horas tentando encontrar uma solução, o meu objetivo é disponibilizar o máximo de informações possíveis para agilizar esse processo, que muitas vezes chega a ser muito cansativo.
Tenho conhecimentos em Delphi, Java, Java/Android, Visual Basic/VB, VB.Net e Visual Basic for Applications/VBA, não sou nenhum expert, mas "quebro o galho".
Pretendo disponibilizar o código fonte através das postagens e em arquivos para download.
Todo código fonte que for postado, irá conter a fonte de onde foi retirado/adaptado/pesquisado, com exceção dos códigos que eu mesmo desenvolver.
Os ícones utilizados nas postagens são encontrados no site http://www.fatcow.com/free-icons.
Espero poder ajudar muitas pessoas.
Abraços.
Tenho conhecimentos em Delphi, Java, Java/Android, Visual Basic/VB, VB.Net e Visual Basic for Applications/VBA, não sou nenhum expert, mas "quebro o galho".
Pretendo disponibilizar o código fonte através das postagens e em arquivos para download.
Todo código fonte que for postado, irá conter a fonte de onde foi retirado/adaptado/pesquisado, com exceção dos códigos que eu mesmo desenvolver.
Os ícones utilizados nas postagens são encontrados no site http://www.fatcow.com/free-icons.
Espero poder ajudar muitas pessoas.
Abraços.
Postado por
Mateus
às
14:41