DONUT PROJECT 2021 - VBA Function: Como tornar o Formulário Transparente no MS Excel?

Existe uma maneira de tornar o formulário do usuário que criei para o Excel no Microsoft Visual Basic e torná-lo transparente no aplicativo do Excel?

 Série de eBooks Donut Project: 

  

Atualmente, o formulário deve ser movido ou minimizado para retirá-lo do caminho.

Esse recurso requer o Windows 2000 ou superior.

A opacidade (bytOpacity) pode ser definida no intervalo do tipo Byte, de 0 a 255.

CÓDIGO

Função de declaração privada FindWindow _

Lib "user32" Alias ​​"FindWindowA" _

(ByVal lpClassName As String, ByVal lpWindowName As String) As Long

Função de declaração privada GetWindowLong _
Lib "user32" Alias ​​"GetWindowLongA" _

(ByVal hWnd As Long, ByVal nIndex As Long) As Long

Função de declaração privada SetWindowLong _
Lib "user32" Alias ​​"SetWindowLongA" _

(ByVal hWnd As Long, ByVal nIndex As Long, ByVal dwNewLong As Long) As Long

Função de declaração privada SetLayeredWindowAttributes _

Lib "user32" _

(ByVal hWnd As Long, ByVal crey As Byte, ByVal bAlpha As Byte, ByVal dwFlags As Long) As Long

Const GWL_EXSTYLE = privado (-20)

Const WS_EX_LAYERED = & H80000

Const LWA_ALPHA = & H2 &

Public hWnd As Long

Sub UserForm_Initialize privado ()

  Dim bOpa As Byte

  Let bOpa = 192 'variável mantendo a configuração de opacidade  

  Let hWnd = FindWindow ("ThunderDFrame", Me.Caption)

  Call SetWindowLong (Me.hWnd, GWL_EXSTYLE, GetWindowLong (Me.hWnd, GWL_EXSTYLE) ou WS_EX_LAYERED)

  Call SetLayeredWindowAttributes (Me.hWnd, 0, bOpa, LWA_ALPHA)

End Sub

Veja outros códigos:

  

 

 

 

Leia também:

  

  

  

Comente e compartilhe este artigo!

brazilsalesforceeffectiveness@gmail.com

Série Piece of Cake

• PIECE OF CAKE - MS Excel - Zipando - Compacte no formato Zip
• PIECE OF CAKE - MS Excel - Zipando - Escolha os Arquivos a Compactar
• PIECE OF CAKE - MS Excel - Zipando - Escolha uma Pasta e Compacte
• PIECE OF CAKE - MS Excel - Zipando - Compacte Todos os Arquivos da Pasta
• PIECE OF CAKE - MS Excel - Zipando - Compacte a Planilha Atual
• PIECE OF CAKE - MS Excel - Zipando - Compacte e Envie por e-Mail
• PIECE OF CAKE - Connecting to Oracle 12g with Excel VBA
• PIECE OF CAKE - Extract Path From String
• PIECE OF CAKE - Detecta se Arquivo Existe
• PIECE OF CAKE - MS Excel - Finding Last Row
• PIECE OF CAKE - Obtendo Endereço IP
• PIECE OF CAKE - Criando Arquivo Texto Externo
• PIECE OF CAKE - Criando Tabelas no SQL Server a partir do MS Excel
• PIECE OF CAKE - Notação Húngara
• PIECE OF CAKE - Usando Stored Procedures
• PIECE OF CAKE - Microsoft Access - Removendo Prefixo das Tabelas
• PIECE OF CAKE - MS Access e MS Word - Técnica de Automação
• PIECE OF CAKE - MS Access - 5 Formas Manuais de Reparo
• PIECE OF CAKE - Correção de Métricas
• PIECE OF CAKE - Convertendo Texto em Imagem
• PIECE OF CAKE - Excel - Manipule o Google Maps em sua Planilha
• PIECE OF CAKE - VBA Excel - Traduzindo Planilhas - Google Translate API
• PIECE OF CAKE - Defina a Latitude e a Longitude

Séries Donut

• DONUT PROJECT 2018 - VBA - 12 - Aumente sua Produtividade
• DONUT PROJECT 2018 - VBA - 11 - Os Benefícios do Controle de Versão
• DONUT PROJECT 2018 - VBA - 10 - Loop For-Each
• DONUT PROJECT 2018 - VBA - 09 - Método Count
• DONUT PROJECT 2018 - VBA - 08 - Referenciando Ranges
• DONUT PROJECT 2018 - VBA - 07 - Amostra de Macro
• DONUT PROJECT 2018 - VBA - 06 - Recursos Adicionais
• DONUT PROJECT 2018 - VBA - 05 - Gravando a Primeira Macro
• DONUT PROJECT 2018 - VBA - 04 - Opções de Solução
• DONUT PROJECT 2018 - VBA - 03 - Requisitos e Preparação
• DONUT PROJECT 2018 - VBA - 02 - Continua Cético
• DONUT PROJECT 2018 - VBA - 01 - Maximizando Sua Eficiência
• DONUT PROJECT 2018 - Excel - Gravando Macro Altere SELECT por RANGE
• DONUT PROJECT 2018 - O que Desenvolvedores Aprendem com Michael Jordan
• DONUT PROJECT 2018 - Excel - Macros - Mudando o Mindset
• DONUT PROJECT 2018 - Excel - Acelerando Macros
• DONUT PROJECT 2015 - Extraindo e-Mails
• DONUT PROJECT 2015 - Função - Extraindo Elementos da String
• DONUT PROJECT 2015 - Função - Retornando Nº de ocorrências de um Caractere
• DONUT PROJECT 2015 - Função - Retorna Conteúdo Delimitado por 2 Caracteres
• DONUT PROJECT 2015 - Função - Retorna Apenas o Conteúdo Entre Parênteses
• DONUT PROJECT 2015 - Função - Extrai Conteúdo entre Parênteses
• DONUT PROJECT 2015 - Excel - Report Layout
• DONUT PROJECT 2015 - Excel - Grand Totals - Inserindo Totais na Tabela Dinâmica
• DONUT PROJECT 2015 - Excel - Mudando a Fonte de Dados da Tabela Dinâmica
• DONUT PROJECT 2015 - Excel - Aplicando Refresh em Tabelas Dinâmicas
• DONUT PROJECT 2015 - Como Manter Informações parcialmente Anônimas
• DONUT PROJECT 2015 - Excel - Limpando o Filtro da Tabela Dinâmica
• DONUT PROJECT 2015 - Excel - Criando Filtros Múltiplos na Tabela Dinâmica
• DONUT PROJECT 2015 - Excel - Criando Filtro de Relatório na Tabela Dinâmica
• DONUT PROJECT 2015 - Excel - Remover Campos Calculados da Tabela Dinâmica
• DONUT PROJECT 2015 - Excel - Remover Campos da Tabela Dinâmica
• DONUT PROJECT 2015 - Excel - Adicionar Campos Calculados na Tabela Dinâmica
• DONUT PROJECT 2015 - Excel - Apagar todas as Tabelas Dinâmicas
• DONUT PROJECT 2015 - Excel - Apagar Tabela Dinâmica Específica
• DONUT PROJECT 2015 - Adicionar Rodapé de Confidencialidade no Office
• DONUT PROJECT 2015 - Excel - Criando uma Tabela Dinâmica
• DONUT PROJECT - Use os add-ins do MS Excel e dê um salto em sua performance
• DONUT PROJECT - VBA - Automatize o Outlook para enviar um e-mail com anexo
• DONUT PROJECT - VBA - Outlook - Salvando arquivos anexados nos e-mails
• DONUT PROJECT - VBA - Criando uma Matriz de Datas MAT - Moving Annual Total
• DONUT PROJECT - VBA - Excel - Atualize Tabelas Dinâmicas
• DONUT PROJECT - VBA - Excel - Removendo os Caracteres Alfabéticos e Especiais
• DONUT PROJECT 2014 - VBA - Access - Criando uma Query com Parâmetros
• DONUT PROJECT 2014 - VBA - Access - Atualizando o conteúdo de uma Query
• DONUT PROJECT - VBA - Access - Saiba o Número de Registro de cada tabela
• DONUT PROJECT - VBA - Access - Extraia Dados sem Problemas de TIMEOUT
• DONUT PROJECT - VBA - Access - Lista o Tamanho de Todas as Tabelas
• DONUT PROJECT - VBA - Excel - Populando um ListBox no seu Formulário
• DONUT PROJECT - VBA - Excel - Importando arquivos CSV
• DONUT PROJECT - VBA - Excel - Deletando Conexões de Dados
• DONUT PROJECT - VBA - Excel - Obtendo o Nome da Planilha sem a Extensão
• DONUT PROJECT - VBA - WORD - Exportação Automatizada - DOC para PDF