Arquivo mensais:July 2008

Desenvolvimento, Microsoft Office, VBA

VBA – Interagindo com o objeto Internet Explorer

É, fazemos tanta coisa pela internet que fica difícil imagina um dia sem poder acessá-la. Teve até gente passando mal no dia do “Apagão da Internet” ocorrido a poucas semanas.

Bom, baboseiras a parte, surgindo de mais uma das necessidades bizarras que os sistemas nos propõem, precisei uma vez preencher um formulário web automaticamente com alguns dados que constavam em planilhas ou até mesmo em um BD no Access.

Pois bem, já tinha feito algumas brincareiras com o objeto InternetExplorer referenciado através do VBA, mas até atenção se resumia a abertura e navegação para uma determinada página. Felizmente foi fácil manipular o código HTML dentro do objeto de tal forma que fosse possível o preenchimento dos campos e por fim submeter a página.

Para facilitar a apresentação de um exemplo, colocarei um código que faz autenticação na página do meu fórum, o Fórum Tomás Vásquez.

O código abre uma instância do Internet Explorer, navega até a página de Login, preenche os campos conforme valores informados em objetos InputBox e submete a página.

Sub x()
    Dim ie As InternetExplorer
    Dim C
    Dim ULogin As Boolean, ieForm
    Dim MyPass As String, MyLogin As String
redo:
    MyLogin = Application.InputBox("Por Favor entre com o Login", "Forum Tomás Vásquez", Default:="login", Type:=2)
    MyPass = Application.InputBox("Por favor entre com a senha", "Forum Tomás Vásquez", Default:="Password", Type:=2)
    If MyLogin = "" Or MyPass = "" Then GoTo redo
    Set ie = New InternetExplorer
    ie.Visible = True
    ie.Navigate "http://www.tomasvasquez.com.br/forum/ucp.php?mode=login"
 
    Do Until ie.ReadyState = READYSTATE_COMPLETE
    Loop
 
    ie.Document.all("username").innerText = MyLogin
    ie.Document.all("password").innerText = MyPass
    'obtém o forma a qual o controle de login pertence para submetê-lo
    ie.Document.all("username").form.all("login").Click
 
    If ULogin = False Then MsgBox "Usuário logado"
    Set ie = Nothing
End Sub

Importante: É bom lembrar que para que o código funcione como está, é preciso adicionar um referência ao Microsoft Internet Controls.

Para auxiliar, a seguinte função adiciona automaticamente a referência necessária:

Sub Referencia()
    Dim ObRef
    On Error Resume Next
    ' Adiciona Controles da Net
    ThisWorkbook.VBProject.References.AddFromGuid "{EAB22AC0-30C1-11CF-A7EB-0000C05BAE0B}", 1, 1
End Sub

Download da planilha

VBA.IE.Login.xlsm.zip
Bom proveito!

Excel, Microsoft Office

Excel – Valor por Extenso

Se você trabalha com cheques, recibos ou outros documentos que exigem a representação dos valores monetários por extenso, sabe que essa tarefa é capaz de causar confusões quanto à grafia correta dos números à maioria das pessoas, sem contar com o gasto de tempo enfadonho que isso requer.

A planilha Valor por Extenso vem exatamente para tentar reverter tal situação, automatizando o processo de conversão de valores numéricos para seus correspondentes por extenso através de uma função para o Microsoft Excel, desenvolvida para você aplicar em suas próprias planilhas com o fim que mais lhe for útil.

Juntamente com o arquivo ValorporExtenso.xls, você baixa o Recibo.xls, que serve para exemplificar o uso da função de maneira simples e bastante prática.

Autor: Otávio Alves Ribeiro
Tamanho: 105 KB
Sistema: Windows 98/Me/2000/XP
Requerimentos: Microsoft Excel.
Tempo de Download estimado: 00:00:15 a 56 Kbps
<< Download >>

Abraços

Tomás Vásquez
www.tomasvasquez.com.br

Dicas, Tecnologia

Nokia N95 8GB ganha memória aos gigabytes e LCD maior

2 Comentários

Ok, ok, a notícia já e velha, mas o fato é que já possível encontrar o aparelho a venda oficialmente nas melhores lojas do ramo.

Logo abaixo coloco alguns vídeos de avaliação e comparação com seu irmão mais velho.


Com nada menos que 8 GB de memória interna, o smartphone N95 8GB, da Nokia, oferece um gás extra para aproveitar ainda melhor todos os recursos que já matavam a pau no N95 original.

O equipamento é uma das atrações da edição de julho da INFO. A revista chega às bancas na semana que vem trazendo também o teste do INFOLAB com o Centro, da Palm, e uma análise sobre os novos recursos do iPhone 3G e os outros que ele continua devendo.

Além da memória para armazenamento, o N95 8GB também recebeu um upgrade na memória RAM, que saltou de 64 MB para 128 MB, e na tela. O display agora tem 2,8 polegadas, com resolução de 240 por 320 pixels e exibição de 16 milhões de cores. Fora essas, a outra grande novidade é a eliminação do slot para cartão de memória, uma conseqüência direta da adoção dos 8 GB de memória embutida.

É verdade que, com essa fartura de memória, espaço deixou de ser um problema a ser resolvido com cartões microSD. Porém, os cartões também são uma alternativa cômoda para trocar arquivos rapidamente entre celulares, câmeras, MP3 player e cia. sem preocupações com cabos, pareamento de Bluetooth e Wi-Fi disponível.

Fora os aumentos de memória e tela e a morte do slot para cartão, não há outras novidades significativas no front. O N95 8GB mantém os poderosos recursos do N95 original.

Ele é uma ótima pedida para quem busca um aparelho que substitua de uma vez só câmera, player de música e vídeo, navegador GPS e, na hora do aperto, pelo menos quebre o galho para lidar com arquivos do Office com relativo conforto, mesmo sem ter um teclado QWERTY.

Para executar tantas tarefas, o smartphone até muda de forma. Deslizando a tela para cima, o N95 8GB exibe o teclado de celular e fica pronto para navegar na web e trocar e-mails pelas redes 3G ou por Wi-Fi. O modelo é um dos que melhor se viram para exibir páginas com conteúdo multimídia.

Movendo a tela na direção contrária, surgem botões de controle de reprodução de mídia e o N95 8GB vira um player de música e vídeo.

O design espertíssimo do N95 8GB também permite usá-lo com uma respeitável câmera fotográfica compacta com lentes Carl Zeiss Vario-Tessar. É só deitar o aparelho e começar a clicar para fazer fotos em 5 MP.

O modelo ainda se defende bem com vídeo, gravando clipes em resolução VGA (640 por 480 pixels) e taxa de 30 FPS com boa qualidade. O resultado pode ser visto inclusive na TV. Basta usar o cabo que acompanha o produto para fazer a ponte entre o N95 8 GB e a TV. Uma surpresa negativa na câmera foi a inexplicável eliminação da tampa de cobertura da lente.

O N95 8GB conta com GPS e faz o papel de navegador, por meio do aplicativo Nokia Maps. Só que, para receber as instruções por voz sobre as manobras a realizar durante a rota, é preciso baixar o mapa da região desejada, adquirindo a licença para o uso durante um período que pode ir de um mês (25 reais) a um ano (180 reais). O bacana é que a Nokia oferece seis meses grátis de navegação para quem comprar o N95 8GB, além de um carregador para ser usado no acendedor de cigarros do carro.

A segunda encarnação do N95 começa a ser vendida no país nesse mês, por 2320 reais. Esse valor salgado é o do modelo desbloqueado. Evidentemente, nas lojas das operadoras será possível comprar o aparelho por preços menores, que variam de acordo com o plano do cliente.

Nos planos Claro 3G 120 e no Vivo Escolha 90, o N95 8GB sairá por 1499 reais. Detalhe: na Vivo, o modelo será comercializado inicialmente apenas em Belo Horizonte, onde a operadora tem a rede 3G com HSDPA da Telemig Celular.

Nokia N95 8GB Review

Comparação N95 e N95 8GB

Abraços

Tomás Vásquez
www.tomasvasquez.com.br