Aplicativo Random no Google Play

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.

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.

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:

using NPOI.SS.UserModel;
using NPOI.HSSF.UserModel; // para arquivos XLS
using NPOI.XSSF.UserModel; // para arquivos XLSX

Existe 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:

Remover senha de proteção de uma Planilha do Excel

Para remover a senha da planilha, basta executar o seguinte procedimento no VBA:

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/

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:

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

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:

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.