Mudamos!

Duas notícias boas:

1 - Fui campeão mundial no worldskill em tecnologia da Informação!

2 - Hora de levar o blog à sério.

Por isso estamos mudando de endereço e de nome!

Agora somos a Academia Office! acessem www.academiaoffice.com

Novidades em breve, abraços!

Fórmula Procv especial: Índice com Corresp.

Eae galera. Hoje vamos aprender uma funçãozinha especial: Índice com Corresp.

Essa função é muito utilizada para extrair dados quando não temos um índice para a tabela. Quando queremos ir no excel e fazer uma fórmula que, dando um determinado valor, ele retorne o registro na coluna equivalente, usamos o procv. O problema é que o procv só funciona quando temos um índice (Primeira coluna numa tabela). Quando queremos procurar um valor numa tabela e retorna outro valor que esteja à esquerda do consultado, tudo bem, o PROCV funciona direitinho. Mas quando nós pesquisamos um valor e a resposta se encontra numa coluna À ESQUERDA aí que temos um problema. Simplesmente o PROCV NÃO FUNCIONA.

Calma, não se desespere! Temos soluções para contornar esse problema. Na verdade, existem milhares de soluções alternativas ao PROCV. Vamos ver hoje como funciona o Índice com Corresp: Vamos usar a seguinte tabela como exemplo:


Queremos retornar o nome de quem tem a ID 2. Tranquilo, usaremos procv: =procv(“2”;B2:D4;2;0). O valor que queremos buscar a referência é 2, o dados estão no intervalo B2:D4 a coluna que queremos retornar é a 2ª do intervalo e o resultado que queremos é preciso (0). Moleza, funcionou. Mas se eu possuir como valor função do empregado, como eu vou conseguir seu nome? Se usarmos =procv(“Professor”;B2:D4;2;0) teremos como resposta um erro do Excel, e não é isso que queremos. Como vocês podem perceber, o procv só busca valores da PRIMEIRA coluna concedida no intervalo que nós fornecemos. Ah, então vamos mudar o intervalo de modo que a primeira coluna seja a função: =procv(“Professor”;D2:D4;2;0). Teremos erro novamente, pois o Excel interpreta a tabela como o intervalo que nós forncemos. Logo será impossível retirarmos o nome do empregado com a função de professor. Ou não? Vamos tentar agora com índice com corresp. Primeiro, vamos entender como funiona a fórmula índice:

=INDICE([INTERVALO],[LINHA ESCOLHIDA],[COLUNA ESCOLHIDA])

Certo, o intervalo, nesse caso, será o mesmo do Procv: B2:D4, a linha escolhida é a 3 e a coluna escolhida é 2: =INDICE(b2:d4;3;2). Tudo certo, mas assim nós teremos um valor estático e não é isso que queremos. Vamos mesclar a fórmula índice com a corresp, mas antes, vamos entender a corresp:

=CORRESP([VALOR PROCURADO];[INTERVALOR];[PRECISAO])

Essa fórmula nos permitirá saber em qual linha se encontra o empregado com a função de professor. Escrevamos assim: =CORRESP("Professor";D2:D4;0). Mais uma vez usamos o 0 como precisão para indicar valores exatos. Teremos como resultado o nº 3, que é a linha onde se encontra o professor. Bingo! Agora é só mesclar as fórmulas: =INDICE(b2:d4; CORRESP("Professor";D2:D4;0);2).

Pronto! Temos um PROCV que funciona com colunas à esquerda! Adapte para as suas necessidades campeão ;D

Função Primeiro e Último nomes no Excel

Muitas pessoas procura por uma função ou uma fórmula no Excel que seja capaz de extrair os primeiro e segundo nomes de uma celula:
Tiago Alves Nogueira de Souza = Tiago Souza
Pedro Américo Santos = Pedro Santos
Marcelo Ricardo Mendes = Marcelo Mendes
Júlia Arantes da Silva Miguel - Júlia Miguel

Ok, criamos uma funçãozinha para resolvermos esse problema (:
Não cheguei a testar, mas acredito que dê para conseguir esse resultado sem VBA. Entretanto, na busca da simplicidade a facilidade [vulgo, preguiça], preferi fazer direto no VBA mesmo. Só usei algumas funções simples, concatenar, esquerda, direita, ext.texto, essas coisinhas. Voce pode se perguntar: onde estão essas funções? Ah, o VBA só aceita em inglês. Left, right, mid, e assim vai. É uma excelente função para iniciantes quem estão aprendendo VBA agora.

Copie e cole o código abaixo num módulo novo no editor de VBA da planilha que vc deseja usar essa função. Não sabe como fazer? Click aqui! e leia os primeiros parágrafos que veem explicando como.
Dps é só botar =nomes(Célula desejada) e pronto, funcionando! =D

abraços!!!


------------ Codigo ---------------

Public Function NOMES(NomeCompleto As Variant) 'cria uma funcao nova chamada NOMES
Dim x As Variant
Dim PrimeiroNome As Variant
Dim UltimoNome As Variant

'##### --- Funcao de Excel Criada por Tiago Nogueira ------------------------ #####
'##### --- Ao utilizar o codigo, por favor, deixar os créditos do autor ----- #####
'##### --- Contatos: tiago.nt@hotmail.com, tiago.nogueiraa@hotmail.com ------ #####
'##### --- Visite: http://officeti.blogspot.com/ para mais dicas de excel --- #####

x = InStr(NomeCompleto, " ") 'procura o fim do primeiro nome
x = x - 1
PrimeiroNome = Left(NomeCompleto, x) ' cria o primeiro nome
x = InStrRev(NomeCompleto, " ") 'procura o inicio do último nome
x = x
UltimoNome = Right(NomeCompleto, Len(NomeCompleto) - x) ' cria o ultimo nome

NOMES = PrimeiroNome & " " & UltimoNome 'Junta os nomes

End Function

Função para extrair números no excel.

Essa função serve para voce extrair números de uma string (frase) que contenha números.
Por exemplo, você tem várias colunas de texto de números de telefone nas mais diversas formas. Ex.: 8830-1240, 8813.4050, 88764343.
Como extrair somente os números? Faça assim. Abra seu excel e pressione ALT+F11. Isso irá abrir seu editor de VBA. não se assuste, siga os passos: Agora vá no menu insert (inserir) e depois em module (módulo). Copie o código abaixo e cole na página em branco que apareceu.
Pronto, pode feixar o editor.
Agora, insira a seguinte fórmula no excel: =ExtrairNumeros.
Isso mesmo! uma nova função acabou de aparecer no excel! Esse código aqui embaixo é o responsável por isso. Pronto, agora basta colocar =ExtrairNumeros(CelulaDesejada) e pronto, está funcionando!


-------------------Código---------------------


Public Function ExtrairNumeros(ValorRecebido As Variant)
Dim Tamanho As Integer 'Determina o tamanho da frase
Dim Comeco As Integer 'Trigger da operacao
Dim ValorAteOMomento As Variant 'Variante para guardar os numeros achados

'##### --- Funcao de Excel Criada por Tiago Nogueira ------------------------ #####
'##### --- Ao utilizar o codigo, por favor, deixar os créditos do autor ----- #####
'##### --- Contatos: tiago.nt@hotmail.com, tiago.nogueiraa@hotmail.com ------ #####
'##### --- Visite: http://officeti.blogspot.com/ para mais dicas de excel --- #####

Tamanho = Len(ValorRecebido) + 1
Comeco = 1

'Comeca o loop para achar os numeros do primeiro caractere ate o ultimo da frase
Do Until Comeco = Tamanho
If IsNumeric(Mid(ValorRecebido, Comeco, 1)) Then ' Verifica se o caractere e um numero
ValorAteOMomento = ValorAteOMomento & Mid(ValorRecebido, Comeco, 1) 'Se positivo ele e adicionado a funcao
End If
Comeco = Comeco + 1 'parte para o proximo caractere
Loop

ExtrairNumeros = ValorAteOMomento
End Function

Como fazer uma consulta TOP por categorias no Access?

Nesse exemplo vamos fazer uma consulta top classificada por categorias. Primeiro, pegue os dados que você quer usar e coloque todos numa só consulta.


Coloque como Count os resultados da tabela pedidos. Agora você já tem o número de vezes que cada produto foi pedido. Salve a consulta como _Top1:
Crie uma nova consulta baseada na consulta _Top1
Nela, faça assim: classifique ascendente por categoria e por descendente por CountoofIDCompra
Pronto, você já tem o TOP dos produtos por categoria. Mas nosso objetivo não é um TOP qualquer, é um TOP 3. Queremos apenas que os melhores produtos apareçam, não todos.

Para isso, façamos assim. Coloque novamente a mesma consulta _TOP1 na nossa nova consulta. ISSO MESMO. Pode a consulta _TOP1 duas vezes em nossa nova consulta.

Pronto, agora adicione os campos Categorias e CountOFIDCompra da consulta _TOP1_1
Nos critérios, bote o seguinte: Para [_TOP1_1].[CountOfIDCompra] coloque >=[_Top1].[CountOFIDCompra] e para [_TOP1_1].[Categorias] coloque =[_Top1].[Categorias]
Salve como _TOP2.

Criei uma nova consulta, nomei como desejar (no exemplo usamos TOP3). Adicione todos os campos (menos o da categoria de _Top1_1) à _TOP2. Agrupe a consulta. E coloque um count no _top1_1.CountOfIDcompra e como critério “<=3”. Oculte-o. Classifique ascendente por categoria e descendente por _top1.CountOfIDcompra. Rode a consulta. Aí está! TOP3 por categoria! Caso deseje um TOP5, TOP10, etc, basta mudar o argumento de “<=5” para “<=10” e assim por diante! Baixem aqui o Banco de Exemplo. Espero que tenham gostado! Até a próxima.

Eu vou para o WorldSkills!

Sim, acreditem! Este pobre coitado irá para o Canadá disputar o maior torneio de educação profissionalizante do mundo! Trata-se do WORLDSKILLS!

Os participantes que competem neste torneio são selecionados por seus respectivos países. Além de só poderem participar uma vez desse torneio, os competidores escolhidos devem ter, no máximo, 22 anos de idade.

Em 1982, o SENAI (Serviço Nacional de Aprendizagem Industrial) filiou-se a IVTO e, no ano seguinte, na Áustria, marcou a primeira presença brasileira na World Skills.

De lá para cá, o Brasil só cresceu na competição, trazendo cada vez mais medalhas. Na edição de 2007, realizada no Japão, o Brasil, conquistou nove medalhas - duas de ouro, três de prata e quatro de bronze - além de seis diplomas excelência. Na classificação geral, ficou em segundo lugar atrás apenas da Coréia do Sul.

A área que eu vou é (duh!) Tecnologia da Informação. Torçam por mim!

Abraços!!

Retirando Espaços em branco de uma coluna Numa só tacada

Sabe aquela planilha.. CHEIA DE DADOS quebrados. Um monte de espaços em branco que você TEM que deletar, mas sem peerder nenhum dado importante? Aí começa você... deletar um por um. Depois de uma hora você percebe que ainda faltam 30mil linhas para fazer o mesmo processo.. não poderia ser mais rápido?

Poderia sim!! Eu até posso ensinar... ehehe :)

Faça assim: selecione o intervalo que contém os dados [selecione Tudo!]
Agora vá na guia Início, e depois em "Procurar e Selecionar" [Ou coisa do tipo, meu Office é em inglês, então não sei exatamente coméqué] e, finalmente, escolha "ir para especial". Olhem a figura abaixo caso tenham dúvidas.



Agora, escolha opção "brancos". Dê ok.



Pronto, todas as células em branco estarão selecionadas! Aí voce escolhe o que fazer com elas... Vá na guia início e depois em células, e deletar.



Prontinho, viu como é fácil?

Voltando de Volta

Nossa, que loucura. Mais de 2 meses sem postar nada aqui. =P
A verdade é que sempre tenho mais e mais coisas para fazer e meio que não estava podendo liberar conteúdo novo para vocês. Mas agora acabou. Depois também de algumas experiência sobre comunicação e internet, decidi que criarei outro blog para abordar especialmente sobre esse assunto. Deixarei de lado aqui, então, toda a subjetividade que possa imaginar e tentarei ser sucinto e direto. Novamente, obrigado por me compreenderem [eu acho...]


Abraços!

Aaaah, só por saudades futuras mesmo, abaixo o vídeo do texto de Zeitgeist que tinha publicado anteriormente.

[]'s

Para pensar um pouco: Tevê Vs. Web

Achei interessantíssima uma passagem que eu encontrei no filme Zeitgeist, e que combina com minhas últimas postagens. Leiam e comentem, por favor:

“Nós estamos com um grande problema!
Porque vocês e 62 milhões de americanos estão me vendo neste momento.
Porque menos de 3% de vocês lê livros.
Porque menos de 15% de vocês lê jornais.
A única verdade que conhecem é aquela que vem desta caixa.
Agora existe toda uma geração que nunca soube nada que nunca saiu da caixa.
Esta caixa é a verdade absoluta, a última revelação.
Esta caixa pode construir ou destruir presidentes, papas, primeiros-ministros.
Esta caixa é a força mais maravilhosa e poderosamente maldita deste mundo e, ai de nós, se algum dia cair nas mão erradas.
E quando a maior empresa do mundo controlar a maior e mais perfeita máquina de Propaganda jamais criada, sabe lá o que será tomado como verdade?
Prestem atenção… Vocês prestem bem atenção:
A televisão não é a verdade.
Televisão é uma porra de um parque de diversões.
Televisão é um circo, carnaval, uma parada de acrobacias, contadores de histórias, cômicos, Cantores, malabaristas, domadores de leões e jogadores de futebol.
É o negócio da matança do aborrecimento.
Mas vocês todos estão aí sentados, noite após noite, todas as idades, cores e credos.
Nós somos tudo aquilo que vocês sabem.
Vocês começam a acreditar nas ilusões que pomos aqui, começam a acreditar que este caixote é a realidade e as vossas vidas não são reais.
Vocês fazem tudo o que a caixa vos diz para fazer!
Vocês vestem-se como a caixa, e comem como a caixa, criam as crianças como vêem na caixa e Até pensam como os seres da caixa.
Isto é alienação em massa seus dementes.
Vocês é que são reais, pensem… Nós somos a ilusão!”

Será que o que antes era a Televisão hoje não seria o computador com internet?

Um amigo meu responderia: “Sim... mas na internet você pode escolher o que quer ver”.

...

Seria assim mesmo?

Wikipédia: Conhecimento ou Senso Comum?

Nos últimos anos (desde 15 de Janeiro de 2001) os internautas vêm presenciando o crescimento de uma nova rede de interação social. Sob a vontade de se tornar a maior enciclopédia do mundo, surge o projeto Wiki. Hoje, com milhões de artigos, originais ou plagiados, a Wikipédia atingiu seu objetivo.

Neste meio, é impossível não nos perguntarmos: O que torna a Wikipédia tão popular? A Wikipédia é rápida, seletiva e, pelo menos para os internautas, correta. Seu conteúdo não apresenta disfunção com a realidade. Seu conteúdo, inquestionável para os leigos. É fácil navegar na internet, os tópicos são apenas a constatação, a reafirmação do sistema e das coisas como a grande mídia apresenta. A Wikipédia, então, por ser “livre”, pode ser editada por qualquer um? A resposta: não.

Imagine um site com milhões de visitas diárias e milhões de artigos publicados onde QUALQUER UM possa editá-lo. Seria um caos, as páginas seriam modificadas por cada visão diferente da pessoa que assim o quisesse. Sob a alegação da necessidade de “proteger” o “conteúdo” da enciclopédia, a Wikipédia criou um sistema de monitoramento de páginas através de administradores. O que são os administradores? Que poderes eles têm e qual a vantagem de ser um?

“Segundo a própria Wikipédia, administradores são editores que têm direitos de operador (sysop) no sistema MediaWiki - o software por trás da Wikipédia - e são escolhidos pela comunidade na forma de votações. Nestas votações, são levados em conta basicamente o tempo de contribuição no projeto (número de edições) e a popularidade e confiança depositada pela comunidade no candidato. Este é um processo aparentemente meritocrático, mas a realidade é outra.”(HUBNER, Alex. http://webinsider.uol.com.br/index.php/2007/07/11/o-papel-do-administrador-e-o-conteudo-na-wikipedia/. Acessado em 23/12/2008).

O fator determinante para a votação dos administradores é a quantidade produzida pelo contribuinte da Wikipédia. Qualidade? Esqueça, o importante é quantidade. E se em eleições de vereadores e deputados no Brasil o favorecimento e a participação dependem quase de uma “autorização prévia” cedida por empresas, corporações e partidos, na Wikipédia não seria diferente. Vários administradores recebem privilégios por fora para manter determinados artigos, excluir alguns outros e editar outras dezenas. Assim, eles acumulam poder dentro de um site que, originalmente, deveria servir para compartilhar conhecimento, não massificá-lo tornando uma arma torpe de engessamento intelectual.

E todos nós sabemos a mágica fórmula matemática por trás do poder: Poder = Dinheiro e Dinheiro é igual a Poder. Nesse ponto divergimos em duas perguntas: Quais os interesses além da Wikipédia? E até que ponto o teor de seus artigos pode ser considerados benéficos para a mente humana?