Adicionando controles dinamicamente no VBA

Quando as aplicações se tornam avançadas, algumas tarefas tornam-se necessárias no VBA, entre elas a manipulação de controles por meio de código. Alterar as propriedades é uma tarefas relativamente fácil, porém é mais interessante a adição e remoção destes controles.

O exemplo de código abaixo adiciona um controle TextBox dentro de um UserForm:

Private Sub Adiciona_TextBox()    
    'declara no novo controle
    Dim novoTextBox As Control
    'instancia o novo controle do tipo textbox e o adiciona ao UserForm
    Set novoTextBox = Me.Controls.Add("Forms.TextBox.1", "NovoTextBox", True)
    'seta algumas propriedades
    With novoTextBox
        .Width = 72
        .Height = 18
        .Top = 20
        .Left = 20
        .ZOrder (0)
    End With
End Sub

Após a adiçao, é fácil pegar o controle com um Me.Controls(“NovoTextBox”) para trabalhar com suas propriedades. Obviamente outros controles podem ser adicionados. Uma lista dos possíveis pode ser vista abaixo:

CheckBox: Forms.CheckBox.1
ComboBox: Forms.ComboBox.1
CommandButton: Forms.CommandButton.1
Frame: Forms.Frame.1
Image: Forms.Image.1
Label: Forms.Label.1
ListBox: Forms.ListBox.1
MultiPage: Forms.MultiPage.1
OptionButton: Forms.OptionButton.1
ScrollBar: Forms.ScrollBar.1
SpinButton: Forms.SpinButton.1
TabStrip: Forms.TabStrip.1
TextBox: Forms.TextBox.1
ToggleButton: Forms.ToggleButton.1

Abraços

Tomás Vásquez

Desabilitando e habilitando sons do Windows

Uma das configurações permitidas pelo Windows que vejo ser pouco explorada pelos usuários é a configurações de sons, apesar de muito desejada e extensivamente utilizada por gerenciadores de temas, muitos utilizados ultimamente.

O fato é que podemos facilmente editar alguns dos sons emitidos pelo Windows em diversas situações. Uma delas é a navegação entre pastas no Windows Explorer ou mesmo entre páginas no Internet Explorer (aquele famoso cliquezinho).

Para fazer isso, vá até o Painel de Controle do Windows acionando o menu Iniciar. Dentro do Painel de Controle. Procure pela opção “Sons dispositivos de áudio” e clique duas vezes sobre. Na tela que surgir, acione a guia “Sons” para ter acesso a todos os sons configuráveis do Windows, inclusive de aplicativos instalados no seu computador. Para alterar o som citado anteriormente, na listagem “Eventos do programa”, procure pelo aplicativo Windows Explorer e abaixo dele pela ação “Iniciar Navegação”. Veja que o som configurado por padrão é o Windows Navigation Star.wav, que inclusive pode ser testado clicando no botão de “Executar som” logo a direita.

Propriedades de som

A partir daqui, é possível escolher qualquer outro som listado ou mesmo um de sua preferência, desde que possua o arquivo. Como pode ser notado, a organização dos sons é feito por Aplicativo/Ação, sendo possível uma personalização quase que total do seu sistema.

É bom lembrar que o Windows obrigatoriamente exige que o arquivo de som esteja no formato wav.

Para desenvolvedores

Caso seja de interesse para algum aplicativo, é possível fazê-lo programaticamente, mas isto exige uma mudança no registro do Windows. A chave a ser alterada é:

Meu Computador\KKEY_CURRENT_USER\AppEvents\Schemes\Apps\Explorer\Navigating\.Current

Um grande abraço

Tomás Vásquez

Construindo sua arvore genealógica com o meusparentes.com.br

meusparentes.com.br é uma página da web onde famílias podem criar e aumentar juntos a sua própria árvore genealógica. Você pode utilizar esta árvore genealógica para descobrir mais sobre os seus familiares, para comunicar-se uns com os outros e para permanecerem em contato.

Uma árvore genealógica em meusparentes.com.br oferece muito mais do que uma lista de nomes:

  • Convide outros parentes à sua árvore genealógica.
  • Colecione junto com os seus parentes informações de todo o tipo, desde os dados de nascimento e falecimento até biografias e também fotos.
  • Contate os seus parentes, utilize as informações deles sobre outros parentes e crie rápido junto com os seus parentes a sua árvore genealógica.

Se você convidar outros parentes à sua árvore genealógica, esses podem então convidar também novos parentes deles que você talvez não conheça. Assim a sua árvore genealógica em meusparentes.com.br irá crescer! E quanto mais parentes ela tiver mais ela irá construindo uma vida própia e mostrará assim uma ampla visão dos seus parentes, feito que você nunca conseguíria alcançar sozinho.

Sabe quando você está meio sem ter o que fazer e busca por algo que tenho o mínimo de utilidade? O meusparentes.com.br vai ajudar você nessas horas, além de dar uma vasculhada naquelas lembranças que estavam perdidas em algum lugar do cérebro…

Bom divertimento!

Link: http://www.meusparentes.com.br/

Tomás Vásquez

Arrependeu-se de enviar um e-mail? Apague-o antes que seja lido!

Já escreveu um e-mail e, logo depois de enviá-lo bateu o arrependimento? Ou, assim que apertou o botão Send, percebeu que errou o destinatário?

O Outlook oferece uma opção, ainda pouco conhecida pelos usuários, que pode te ajudar a reparar esse erro e excluir a mensagem da caixa do destinatário antes mesmo de ele a abrir.

Mas, atenção, a dica só vale se quem estiver recebendo a mensagem também utilizar o Outlook e o servidor for o Microsoft Exchange Server 2000 ou uma versão superior. Veja o passo a passo:

  • No Painel de Navegação do e-mail, clique em Sent Items (Arquivos Enviados)
  • Abra a mensagem que você deseja recuperar da caixa do destinatário e clique no menu Actions > Recall This Message. Esse comando não aparecerá se você estiver usando um e-mail POP3, IMAP ou um webmail, como o Hotmail ou Gmail.
  • Clique em Recall This Message > Delete unread copies and replace with a new message.
  • Se a mensagem foi enviada para um número muito grande de pessoas, será preciso escolher a opção “Tell me if recall succeeds or fails for each recipient” para que você possa checar se alguém já abriu o e-mail antes de você fazer o recall.
  • Clique em OK e, depois, em Send (Enviar).


Automaticamente, a mensagem que foi enviada anteriormente será substituída por um aviso de que ela foi “recolhida” e o texto original será excluído.

Abraços

Tomás Vásquez

Fonte: http://tecnologia.uol.com.br/dicas

Tecnologia e Programação