Emocionado com os comentários e elogios à nossa Tabela do Campeonato Brasileiro de Futebol 2009, não resisti aos pedidos: Rogério, agora a tabela conta com número de partidas; Maurício, aí está o percentual de aproveitamento; Lucas, veja o número de empates e derrotas. Agora acho que está redonda, não?

De quebra, acrescentei os resultados até a última rodada. É só baixar novamente a planilha (abaixo ou aqui) e torcer!

Uma informação: se quiserem editar, modificar, personalizar a planilha, ela está protegida, mas não com senha (já que não tem macros). As colunas AE até AJ da planilha Resultados foram ocultadas, assim como a planilha Calculos, onde está toda a “inteligência” da planilha.

Abraço

Só quem passou uma noite fria de junho pulando fogueira, movido a quentão, pipoca e canjica, sabe que nesta época do ano há um compromisso festivo imperdível: as festas juninas. A ordem é tirar aquela camisa de flanela xadrez do armário para fazer bonito no correio elegante e partir para a azaração quadrilha.

Se você não tem nenhuma festança como esta por perto, há uma solução: faça você mesmo sua festa junina! Isso mesmo: chame os amigos, parentes, a criançada e monte o seu “arraiá” com tudo o que tem direito. O que comprar? Quem contratar para garantir a alegria do começo ao fim da festa? Como quantificar e organizar toda essa bagunça? Para isso você tem a ajuda do Planejador de Festa Junina da Duxus. Lá tem tudo: desde o cálculo de cerveja até o custo do fornecedor da “Boca do palhaço”; totalizações e quanto cobrar de ingresso para o mega-evento.

Cidade grande e falta de tempo não são mais desculpa. Desta vez, sua camisa xadrez não escapa!

Dessa vez, os escritórios ajardinados do Ócio se superaram! Encontramos uma forma de você presentear sua mãe com uma planilha de Excel e mesmo assim arrancar um sorriso da progenitora! Duvida? Então dê uma olhada no aplicativo disponibilizado na mancha verde logo abaixo.

Atenção, spoilers a seguir.
Você que baixou o arquivo e se maravilhou com nossa criação pode saber agora como ela foi feita. Para chegar até aqui o caminho foi longo. Primeiro, foi preciso transformar a imagem de uma rosa em uma planilha. Os recursos para essa façanha foram obtidos no site Art Of Office, sobre o qual já comentamos aqui. Busque dicas mais exatas do trabalho de Jalaj. Trata-se de uma macro que abre um arquivo de imagem (um bitmap de 24 bits) e “desmonta” sua estrutura interna para obter os Bytes de cada pixel. Aí ele sai colorindo célula por célula, como se estas fossem os pixels. Lindo! Lindo!

Como a brincadeira era a flor ser construída em tempo real, utilizando outra macro, transformei a imagem gerada em uma tabela de números que representam as cores e a coloquei em uma planilha (Dados - oculta). Cada um destes números representa um pixel da imagem da rosa. Com uma terceira macro, que é acionada a partir do botão Abrir Presente, o Excel lê os valores da planilha Dados e preenche as células da planilha DiaDasMães. E tem mais garotada! Exiba as colunas ocultas HR, HS e HT. Você verá as letras R, G, e B na primeira coluna, com valores zero logo abaixo delas. Se você digitar valores de 0 a 255 em cada uma delas e clicar no botão Abrir Presente, você fará alterações nas cores da flor. Sua mãe merece!

Abraço

Como prometido no último post, mostro aqui os recursos que usei para que a tabela do Brasileirão 2009 funcione com todos os critérios de desempate previstos pela CBF e sem macros.

Você deve ter reparado que nenhum comando de classificação foi acionado para colocar as equipes em ordem. Pois é, isso foi feito utilizando apenas fórmulas. São muitas, uma para cada critério de desempate. No fim, totalizei tudo em um número gigante de forma que o maior número será o primeiro lugar, depois o segundo, terceiro e assim por diante até o menor número, que será o último.

Depois, para que as equipes ocupassem seu lugar na lista, utilizei a função ORDEM. Ela funciona assim: você informa a ela um número que faz parte de uma lista, informa a lista inteira e a ordem (ascendente ou descendente). Aí a função ORDEM diz que lugar aquele número ocupa na lista. A sintaxe é assim: ORDEM(número;lista;ordem). Veja um exemplo:

Quero saber qual a posição de cada equipe:

Veja as fórmulas mirabolantes que fizemos na planilha Cálculo para cada critério de desempate (está oculta, veja como reexibí-la aqui) e veja o quanto me diverti por aqui!

Abs,

Humberto Galletto

Não que nós aqui do Ócio sejamos noveleiros, vejam bem. Nós temos mais o que fazer (ou não?). Mas, enfim, outro dia estávamos batendo um papo despretensioso sobre Caminho das Índias e aquelas valiosas pitadas da cultura hindu que a trama nos traz quando uma idéia pipocou na cabeça.

“Vamos criar um aplicativo que facilite o acesso dos nossos queridos leitores à sabedoria milenar deste povo tão distinto”, disse Humberto, o Programador Parrudo.

Depois de uma extensa pesquisa, ele nos mostrou o Maha Lilah, um jogo de tabuleiro criado há cerca de 3 mil anos na Índia, conhecido como o jogo do auto-conhecimento. A brincadeira funciona como um oráculo e tem o objetivo de ajudar o jogador a entender sua trajetória pela vida, a refletir sobre suas escolhas, a se tornar uma pessoa melhor.

Fundamental dizer que a criação dessa maravilha disponibilizada abaixo para download não teria sido possível sem a inestimável ajuda do Beto Mancini, o evangelizador do Maha Lilah no Brasil.

É ele quem nos apresenta os variados planos pelo qual o jogador passará, explica o significado das casas e a forma como serpentes e espadas influenciam na jornada.

Serpentes e espadas?? TIK!!! Não perca mais tempo e baixe logo a planilha de Excel que vai mudar a sua vida!

Os recursos do Excel utilizados neste jogo foram macros, macros e mais macros. Veja como habilitá-las aqui. Como, neste caso, o código todo é mais complexo, vamos focar em um recurso que o Humberto teve de lançar mão. Ele precisava colocar um texto um pouco maior na planilha do jogo (as instruções que aparecem ao lado do tabuleiro) e não tinha espaço.

A solução foi colocar o texto com barra de rolagem. Para isso, é preciso utilizar uma Caixa de Texto: clique na guia Desenvolvedor (se ela não tiver aparente, clique no botão do Office, Opções do Excel e em Mostrar Guia Desenvolvedor na Faixa de Opções) e clique no botão Inserir. No pequeno menu, clique em Caixa de Texto (Controle ActiveX). Posicione e redimensione a Caixa de Texto como preferir.

Você pode lincar a Caixa de Texto com uma célula na planilha. Basta clicar sobre a Caixa de Texto e, na seção Controles, no botão Propriedades. Na janela que aparece há um campo LinkedCell. Digite lá a célula que contém o texto a ser inserido na Caixa de Texto. Repare que, na mesma janela Propriedades, você terá vários controles de formatação, como cor de fundo, formatação de fonte etc.


 

Enfim conseguimos esconder um Easter Egg aqui no Ócio. Mas, em função do feriado que se aproxima, trata-se de um ovo de Páscoa de verdade – ou quase de verdade.

Lembra do simpático aplicativo Peixe Finder? Então, achamos que aquela brincadeira de esconde-esconde com as coordenadas do Excel tinha tudo a ver com essa época do ano e fizemos uma nova versão: o sensacional Easter Egg Finder.

Chame as crianças e convide-as a passear por um dos nossos jardins atrás dos ovos que o Coelhinho Clip (ele foi feito a partir de um Clip-Art então achamos que tinha tudo a ver dar esse nome para o bichinho...) escondeu. São três níveis: iniciante, regular e expert.

Boa Páscoa!

Feliz ano novo! Muita saúde, felicidades e sucesso para você e toda a sua família, para este ano que começa!

Não, meu amigo, isso não é uma pegadinha de 1º de abril. Isso é o que você ouviria no dia de hoje, lá pelos idos de 1564, em meio ao término das festas de ano novo que estariam rolando desde o dia 25 de março.

Foi nesta época que Carlos IX, rei da França, determinou a adoção do calendário Gregoriano e o ano passou a iniciar em 1º de janeiro.

Imaginem a confusão que foi a mudança. Não existia rádio, televisão e mesmo a imprensa ainda era muito rudimentar. Para agravar a situação, o calendário Gregoriano foi promulgado pelo papa Gregório XIII, portanto, para quem não fosse católico, como os anglicanos e os luteranos, a adoção da nova marcação de tempo ocorreu com muita relutância e algum tempo depois.

Enquanto a adoção do novo calendário não foi efetiva, qualquer menção que os conservadores ou mal informados fizessem ao ano novo na “data errada” era recebida com gozações e chacotas pelos “descolados” da época. A partir daí, foram inventadas várias brincadeiras para esta data. E essa – ufa! – é provavelmente a origem das brincadeiras que até hoje povoam o 1º de abril.

Como para nós do Ócio 2007 todo dia é dia de pegadinha, resolvemos reunir algumas que caem como uma luva no dia de hoje.

PEGADINHA NO WORD
Neste post, ensinamos como adulterar a lista de auto-correção do Word do seu colega para que seus textos resultem em algo absolutamente inesperado. É só esperar, espiar e morrer de rir da cara dele.

TEM UM GURU DENTRO DO MEU COMPUTADOR
Este aplicativo é para deixar qualquer um boquiaberto. Chame seu colega para perto do seu computador e anuncie: “O guru do meu computador vai adivinhar qualquer coisa que você pensar!”. Baixe o aplicativo e aprenda esta brincadeira no post.

COMPUTADOR COM PODERES PARANORMAIS
Esta planilha do Excel adivinha o símbolo que você escolhe mentalmente. Duvida? Baixe a planilha e siga as instruções. Depois, chame os amigos e deixe que o Excel faz o resto!
 

Suas twittadas têm potencial para conquistar seguidores? Quais as chances desse SMS provocar a reação que você espera? E aquele email que você demorou dias para escrever, vai mesmo convencer seu chefe de que você merece um aumento?

Preparem-se para o mais novo rebento dos escritórios chuvosos do Ócio: o aplicativo Numerologia Total! Sim, nele você pode testar seu nome, a alcunha do seu pet, da empresa e até de uma banda. Mas isso não era suficiente para preencher nosso tempo ocioso. Defensores ferrenhos do conceito (e da prática) de social notworking, estendemos a abrangência da brincadeira para considerar também twittadas, SMS, scraps e emails diversos. Nunca mais você será mal-entendido! – a não ser que sua intenção seja essa, é claro.

A essência desse aplicativo é somar valores correspondentes a cada letra e, com o total resultante, somamos cada algarismo até que resulte em um número de 1 a 9. Para fazer isto, utilizei a função EXT.TEXTO. Ela extrai o texto que você quiser de uma outra sequência de texto. Por exemplo, digamos que eu tenha o texto “Fui à casa da vovó”. Se eu quisesse extrair quatro caracteres a partir do sétimo caractere do texto, faria a seguinte fórmula:

=EXT.TEXTO(“Fui à casa da vovó”;7;4)

O resultado seria “casa”.

Se precisar lidar com números, como em nosso caso, só tome o cuidado de colocar esta função dentro de outra função chamada VALOR. Ela converte texto em número. Aí você já pode incluir este resultado em qualquer cálculo. Para pegar somente um número de cada vez, basta colocar o número 1 ao invés do número 4 do exemplo.

Quem quiser ver como desenvolvi as fórmulas, reexiba a planilha Calc, está tudo lá.

Abs!


Leia mais:

Oráculo da Longevidade
Oráculo do Torcedor
Pergunte às Runas
 

Há quem diga que o número 13 dá sorte. O Velho Lobo sempre foi fã declarado e ninguém pode dizer que não deu certo. Mas, para a maioria, a história é outra e não faltam motivos.

Na mitologia nórdica, conta-se que, em um banquete, foram convidadas 12 pessoas. Aí, eis que surge Loki, o deus do mal, que arruma uma briga e acaba por terminar com a vida de Bauer, o preferido da deusa Friga. A partir daí, convidar 13 para uma reunião não é uma idéia das mais atraentes.

Por falar em Friga,  a deusa nórdica da beleza e do amor está envolvida em outra versão para a superstição envolvendo  o número 13 e, de quebra,  a sexta-feira também. Quando os povos nórdicos e germânicos foram convertidos ao cristianismo, trataram de transformar a deusa em bruxa. Diz a lenda que, para vingar-se de seu destino, toda sexta-feira, ela passou a se reunir com 11 bruxas mais a presença do demônio, totalizando  13 entidades do mal, que ficavam ali se ocupando em rogar praga aos humanos. Eu, hein!

Portanto, se 13 é o número do infortúnio, quando ocorre numa sexta-feira chega a dar arrepios nos mais supersticiosos. Nós aqui nos escritórios tetracampeões do ócio não somos lá muito supersticiosos, mas, na falta do que fazer, não resistimos em espalhar historinhas assustadoras por aí. Historinhas e aplicativos, claro.

Há um tempinho publicamos duas brincadeiras perfeitas para esse momento: uma determina se você está sofrendo as influências de algum encosto; e outra revela que tipo de encosto você, caro amigo, representa para seus colegas e familiares. São duas planilhas no Excel que medem e classificam a influência dessas entidades que, com certeza, devem ficar mais “nervosas” nesta sexta-feira-13. Então, apanhe seu pé de coelho, sua ferradura, e todos os amuletos que tiver à mão, mas não deixe de conferir o Encostômetro e o E.N.C.O.S.T.O. Consulting INC.

Boa sorte!


>Imagem de abertura inspirada no grande responsável pela popularização da data de amanhã

E a paixão do Humberto por joguinhos “tipo Tetris” continua firme, minha gente. Depois do imenso sucesso do Letris, aqui está mais uma releitura do clássico: Metris, “o Tetris de números”.

O novo desafio é fazer com que os números que caem se ajeitem de tal forma que a soma deles seja igual à Soma Alvo. Abrindo a planilha você vai ver exatamente o que queremos dizer. É uma doideira, mas é um barato!

O aplicativo foi desenvolvido com uma macro que utiliza as mesmas técnicas do Letris no que diz respeito ao acionamento das teclas (as setas de direção) enquanto a macro é executada. É claro que a dinâmica e o objetivo do jogo são totalmente diferentes e, consequentemente, o código VBA também. Quem tiver interessado em saber como o jogo foi feito e quiser dar uma olhada no código, pode mandar uma mensagem pela aba de contato que enviamos por e-mail.

Além disso, vamos falar de um recurso bem básico, mas fundamental no Excel: alinhamento. Na versão 2007, os recursos mais utilizados estão bem à mão, na guia Início, seção Alinhamento. Ali, você tem os botões de alinhamento propriamente ditos: esquerda, centralizado, direita, inferior, no meio e superior. Tem também os botões Aumentar Recuo e Diminuir Recuo; o botão Quebrar Texto Automaticamente, para fazer com que o texto mude de linha dentro da própria célula; o Mesclar e Centralizar, para que várias células se juntem e o texto dentro da célula resultante fique centralizado; e o botão Orientação. Se você quiser mais detalhes, pode clicar na pequena seta no canto inferior direito da seção.

 

Para formatar o título do nosso jogo, o Humberto digitou a palavra “Metris” na célula B2 e selecionou até a H15. Clicou em Mesclar e Centralizar. Se você fizer isto, verá que as células se unirão, a palavra Metris ficará centralizada, mas irá para parte inferior da célula mesclada. Para que ela fique bem no meio, o que fará muita diferença se a sua célula mesclada for alta, clique no botão Alinhar no Meio. Para que a palavra fique na inclinação de noventa graus, clique na pequena seta do botão Orientação e escolha Girar Texto para Cima. Depois foi só formatar a fonte e a cor da célula.

Pierrô ama Colombina, que ama Arlequim, que, por sua vez, também deseja Colombina, que é perseguida pelo Bate-Bola. Os caminhos do amor às vezes podem ficar complicados e a animação característica do Carnaval costuma botar ainda mais lenha na fogueira!

Foi inspirada por todas as promessas desse período que a equipe dos escritórios momescos do Ócio resolveu fazer mais esse teste, onde o objetivo é responder: que fantasia você usa com mais freqüência em seus relacionamentos amorosos? Será o Pierrô eternamente apaixonado por quem não te quer ou o malandro Arlequim? A irresistível Colombina, talvez?

O destaque neste teste são as figuras. A questão que precisávamos responder era a seguinte: Como fazer aparecer figuras dinamicamente e sem macros? A solução foi apelar para os recursos de gráfico no Excel. Na verdade, as figuras estão em um gráfico de colunas. Os dados do gráfico estão na planilha Resultados. Para entender com mais facilidade a explicação a seguir, vale a pena ir ao aplicativo e escolher para exibir esta planilha.

Na coluna B são quatro categorias: Pierrô, Colombina, Arlequim e Bate-bola. Na coluna D há uma fórmula muito simples cujo resultado pode ser 0 ou 50. Se o resultado do teste for, por exemplo, Arlequim, teremos o valor de 50 na linha que corresponde ao Arlequim. Isso para que o gráfico “puxe” o valor de 50 para a coluna do Arlequim, fazendo com que esta fique maior e as demais fiquem como valor 0, para que não apareçam no gráfico.

Para que a coluna exiba uma figura, basta clicar com o botão direito do mouse sobre a coluna e escolher a opção Formatar Série de Dados. Na janela que aparece, clique em Preenchimento, Preenchimento com Imagem ou Textura e no botão Arquivo. Basta escolher a imagem e pronto, sua coluna exibirá a figura.

Fotos do Aplicativo: corte em foto do banco de imagens stock.xchng

Nós adoramos geradores. De chamadas para a Sessão da Tarde, de personagens para novelas da Glória Perez , de posts . 

Geradores têm a deliciosa característica de resolver as tarefas por nós e isso é uma coisa que valorizamos muito por aqui. Por isso, os escritórios da sucursal baiana do Ócio acabam de dar à luz o sensacional Gerador de Nomes de Bandas de Axé e Pagode na versão 2007 e na versão 2003.

Depois de uma extensa pesquisa semântica, semiótica e metafísica, partimos para a execução do gerador numa planilha da Excel.

Como de costume, comecei a trabalhar na versão 2007 do Excel e imediatamente localizei a solução para os meus problemas na função  CONT.SES . Ela funciona como a CONT.SE , que conta valores de uma coluna baseando-se em algum critério. A diferença é que com a CONT.SES você pode contar valores em uma coluna segundo mais de 120 critérios simultaneamente! Uma maravilha, não?

Já estava com o aplicativo todo pronto quando lembrei que, construída com a CONT.SES, a planilha talvez não rodasse muito bem nas versões anteriores do Office. E lá fui eu fazer uma ginástica a mais para “bombar” a boa e velha CONT.SE de forma que a planilha pudesse ser usada por todos. Galera, baixa o Trial do Office 2007, aí, vai! Tem aqui . 

O mesmo aconteceu com a randomização . Fiquei tentado a usar a função ALEATÓRIOENTRE ao invés de ALEATÓRIO. Em ALEATÓRIOENTRE, basta colocar o número mínimo e o máximo que você quer sortear, além da vantagem de não precisar usar a função INT para transformar a randomização em número inteiro. Só que as versões anteriores do Excel também não têm a ALEATÓRIOENTRE, então adaptei a fórmula para a função ALEATÓRIO.

Veja a diferença exibindo a planilha oculta “Dados” de ambas as versões. Para reexibir no 2007, basta clicar com o botão direito do mouse sobre a aba da planilha (Axé ou Pagode) e clicar em Reexibir. Nas versões anteriores, Menu Formatar, Planilha, Reexibir.


Abraço, Humberto


>Abertura: recorte de uma fotografia retirada do banco de imagens Stock.XCHNG
 

A coisa mais comum que pode acontecer no fim do ano, além do congestionamento para o litoral, é você não ser exatamente um grande amigo do seu amigo oculto.

Seja na firma, na escola ou mesmo no seio familiar, a escolha do presente para um amigo oculto costuma ser recheada de dúvidas, temores, muita insegurança e alguns erros. Bem, na verdade, costumava.

A partir de amanhã, com o lançamento do Sorteador de Presentes para Amigo Oculto do Ócio 2007, seus fins de ano serão ainda mais leves, felizes e alegres.

Estamos aqui empenhados em obter uma quantidade expressiva para o que promete ser um dos maiores bancos de dados para presentes de amigo oculto do hemisfério sul – devidamente organizados por categorias e mais categorias. Desde já, o aplicativo mais esperado da temporada.

É o Ócio 2007 batalhando pela qualidade de vida da nação. Aguarde!

Com o Encostômetro, você descobriu de que maneiras nefastas você influenciava as pessoas ao seu redor. Esperamos que isso tenha facilitado algumas coisas no seu cotidiano, de repente um aumento de salário, talvez uma namorada mais bonita.

Agora, em nosso novíssimo aplicativo, nós fazemos uma minuciosa análise daquilo que acontece na sua vida para diagnosticar que encosto atrapalha sua vida.  

Foram horas e mais horas de discussões acaloradas acerca da melhor maneira de preparar esta bela pepita sobrenatural.

A aplicação é baseada em macros e algumas funções muito simples do Excel. Então, para a turma de programação, o destaque vai para uma técnica, que já comentei aqui e aqui, baseada na propriedade Caption. Repare que, toda a vez que você clica no botão do E.N.C.O.S.T.O. Consulting Inc, ele muda seu texto e sua função. Isso é especialmente interessante quando você quer uma interface mais enxuta e simples.

Para se referir à propriedade Caption no Excel, basta dizer em qual planilha o botão está, o seu nome e finalizar com “.Caption”. Chamei o botão do nosso aplicativo de “Roda” – não me pergunte por quê, na planilha Encostômetro. Então a expressão fica assim:

Sheets(“Encostômetro”).Roda.Caption = “Nome do botão”

Você pode utilizar a mesma expressão em uma condição IF. Por exemplo:

If Sheets(“Encostômetro”).Roda.Caption = “Próximo” Then

                Vai para a próxima pergunta

ElseIf Sheets(“Encostômetro”).Roda.Caption = “Prognóstico” Then

                Exibe o prognóstico

ElseIf Sheets(“Encostômetro”).Roda.Caption = “Ver resultado”

                Exibe o resultado

End If

É o mais completo estudo sobre a influência do encosto na vida dos seres humanos. Uma análise sem precedentes, que dificilmente encontrará concorrentes.

Então deguste, caro amigo, nosso maravilhoso e certeiro consultório sobre encostos.

Oswaldo Montenegro tem uma canção que expressa muito bem nosso tema de hoje, o encosto: “eu sou um chato / meu Deus, não me agüento / só me tacando no mar”, diz o refrão (autobiográfico?) do grande bardo. 

É uma pena que nem todos os seres humanos desagradáveis neste plano terrestre tenham o mesmo grau de autoconsciência do senhor Oswaldo. Ao mesmo tempo, é uma benção que nem todos esses caras resolvam gravar discos.

O fato é que todo mundo conhece algum encosto. Você mesmo, ainda que sem saber, também carrega ao menos um. 

O que pouca gente se liga é que, muitas vezes, também somos um peso para aqueles que nos circundam. Por isso, o Ócio 2007 tem a satisfação em apresentar-lhes o Encostômetro. Você responde a uma série de reflexões sobre a vida, e nosso mais novo aplicativo devolve que tipo de encosto você é para seus amigos, colegas e familiares. 

Certamente mais uma iniciativa de grande valor social! 

Toda essa conversa surgiu a partir de um bate-papo psicodélico que tivemos no ÓcioCast #3. Nossos convidados na ocasião foram Mouzar Benedito, um dos maiores especialistas em Saci do mundo e Rafael R, corinthiano e blogueiro (que inclusive trouxe o Marcos, seu encosto pessoal). Também participaram do encontro boa parte da staff do Ócio: Humberto, Cíntia, Pati e B. Tozzini, além deste que vos fala. 

Confiram a emoção do bate-papo e ainda aproveitem para baixar o Encostômetro!


ENCOSTOS
Formatos: WMA | MP3
Tamanho: 16,8 MB
Coisas estranhas acontecem quando colocamos Mouzar Benedito, especialista em Saci Pererê, e o corinthiano Rafael R para discutir as más influências nem sempre tão sobrenaturais na vida das pessoas

Para assinar o ÓcioCast, use a URL http://www.ocio2007.com.br/ociov01/podcast/feed/feed.xml

Depois do sucesso arrebatador do nosso belo jogo Casório Procrastinator, resolvemos disponibilizar uma versão para que você imprima e se divirta em qualquer lugar.

Na verdade, mais do que se divertir, nós refletimos muito e acreditamos que, se você tiver o Casório Procrastinator em mãos, ele pode acabar servindo como peça fundamental de seu estratagema para evitar a fatídica subida ao altar.

Explico: leve o jogo para seus divertidos finais de semana na casa de praia do sogrão. Aproveite os sábados chuvosos para sugerir, inocentemente, uma partidinha de Casório Procrastinator.

Garantimos muitos sorrisos amarelos, longos silêncios desagradáveis e uma pitada de desconforto generalizado.

Tanto o tabuleiro quanto as cartas foram feitas no PowerPoint. Existe uma forma rápida e fácil de exportar slides do PowerPoint para o formato de imagem (JPG, PNG, GIF, BMP). Basta clicar no botão do Office e escolher Salvar Como. Abaixo do nome do arquivo, clique na caixa Arquivo Do Tipo e procure o formato de figura que você precisa.

O interessante é que o PowerPoint pergunta se todos os slides deverão ser exportados ou somente o slide selecionado. Se você optar por todos os slides, como fizemos para as cartas, cada um deles vai virar um arquivo separado e todos ficarão reunidos numa mesma pasta.

Depois, organizei tudo no Excel. Escolhi o Excel por ser mais simples dividir uma imagem grande – o tabuleiro do Casório Procrastinator – em quatro páginas. Basta imprimir todas as planilhas em papel A4, recortar e dobrar para montar as cartas e o tabuleiro.

Abraço!

Um dos meus momentos preferidos do ano é aquele gap misterioso que existe entre às 23:59 de amanhã e à 1:00 do domingo. A noite deste sábado é o sonho de todas as Cinderelas, já que as abóboras devem ficar um pouco confusas com o fuso-horário.

Mas não é apenas no setor hortifrutigranjeiro que a mudança é sentida. O Horário de Verão costuma ter um enorme impacto psicológico em todas as pessoas do lado de cá do Equador.

Pensando nisso, a Equipe Anti-Fadiga dos escritórios sossegados do Ócio 2007 preparou o Cotidiano Rehab. Um aplicativo que ajuda você a organizar o dia-a-dia a partir de agora, sem sopetões, sem violência, com muito respeito ao ritmo no nosso nobre e relexado organismo.  Serve também para ninguém corra o risco de chegar ao escritório cedo demais (cruzes), tampouco perigue aterrissar na praia mais próxima antes que o sol dê as caras.

A idéia é otimizar a experiência do usuário do Horário de Verão nessa semana de implementação. Suavizando o trauma, esperamos que o país possa economizar ainda mais energia elétrica durante o período.

O recurso em destaque no aplicativo de hoje é a “validação”. Já falamos deste assunto na planilha de calorias. Naquele caso, a utilização deste recurso era uma tanto mais sofisticada e usava listas de opções oferecendo um “Drop down” para o usuário. Desta vez, o uso é bem mais simples - mas igualmente útil.

Assim que as células a serem preenchidas são selecionadas, aparece um rótulo com uma explicação do que o usuário deve fazer. É permitido qualquer valor que o usuário coloque na coluna Atividades, enquanto que na coluna Horário Atual o Excel aceitará apenas horas. Para aplicar este recurso é muito simples: selecione as células em que deseja aplicar a validação, clique na guia Dados, em Validação de Dados.

Na primeira guia da janela de validação, “Configurações”, você escolhe qual tipo de dado será permitido nas células.

Na segunda guia, “Mensagem de entrada”, você pode digitar uma mensagem que aparecerá logo abaixo da célula assim que esta for selecionada. Mesmo que seja permitido qualquer valor – como, por exemplo, na coluna Atividades – este recurso pode ser utilizado.

Na última guia, “Alerta de erro”, você pode inserir uma mensagem que aparecerá quando o usuário digitar um dado não permitido na célula.

O horário de verão vale para as regiões sul, sudeste e centro-oeste. Começa junto com o dia 19 de outubro e vai até 15 de fevereiro do ano que vem.

Um bom verão a todos que ainda estão curtindo a primavera.

São muitas emoções. E uma quantidade ainda maior de detalhes. Não admira que esse aplicativo tenha demorado tanto a sair. Enfim, mais senhoras que senhores, aqui está nosso Casamento Calculator.

A partir do papo com a Victoria, a Cintia e a Tatiana, resolvemos contemplar o seguinte:

1) Tudo começa com a definição da data, uma previsão do número de convidados e a escolha de um tipo de casamento (em linhas gerais).

2) A partir daí fica estabelecido um cronograma (ó, o que pode ser mais assustador para um grupo de ociosos do que um cronograma!!). Colocamos essa contagem regressiva na... COLUNA DA ESQUERDA (como diria a falecida Zebrinha do Fantástico)!!!

3) Depois foram listadas as tarefas e, mais para a direita, o refinamento das tarefas. Sim! Porque não basta escolher um vestido - ele pode ser costurado pela sua tia, pode ser alugado, pode ser encomendado a uma grande estilista. E o pobre segurador de guardanapo? Você tem idéia de quantas variáveis podem estar relacionadas a um pobre segurador de guardanapo?

Do fundo do nosso coraçãozinho, esperamos que esse aplicativo ajude noivas e noivos a resolverem as coisas de forma mais rápida. É preciso agilizar esse processo, gente. Se não, durante um ano inteirinho, todo o seu tempo livre será sugado pelos preparativos para o grande dia. E aquele ócio saudável, de preferência a dois, onde fica? Sem ele não há amor que resista...

O Casamento Calculator foi feito basicamente com PROCV e ComboBox (Caixa de Combinação) - além de muita pesquisa, é claro. Mas o recurso que destacamos hoje é a formatação condicional. Já falamos deste assunto aqui e aqui. Mas como no Office 2007 este recurso ficou tão mais simples e bem elaborado é interessante ressaltar suas diversas utilidades.

No caso de nosso aplicativo, a formatação condicional foi utilizada para indicar quando a data está atrasada. Para isso, consta na planilha a data atual: função HOJE – que está na célulaD5. Depois, bastou selecionar as células das datas e, na guia Início, clicar em formatação condicional.

Escolha a opção Realçar Células, Menor que. Na janela que aparece, coloque a data atual (basta clicar na célula D5) e, no campo drop down “com”, estabeleça qual formatação deve ser aplicada. Se você quiser alguma formatação diferente das opções apresentadas, clique em Personalizar Formato, no final da lista. Em nosso caso, optamos em formatar a fonte com cor vermelha.

Bj, Pati

Digamos que você queira saber o que aconteceria se os depósitos fossem de 10.000,00. E se fossem de 12.000,00? E de 2.500,00? Para não ter que fazer várias planilhas, ou apagar os valores anteriores, você pode salvá-los em cenários.

Clique na guia Dados, Análise de hipóteses e em Gerenciador de cenários. Na janela que aparece, clique em Adicionar. A janela Editar cenário surge:

Se clicar em Adicionar, o processo se repetirá para você inserir outros valores e criar outros cenários.

Para ver e analisar os resultados, vá até a janela de Gerenciador de cenários – guia Dados, Análise de hipóteses e Gerenciador de cenários – escolha o cenário que deseja ver e clique em Mostrar.


 

Para realizar nossa brincadeira o processo foi o mesmo. Vários cenários foram criados, com caracteres diferentes em cada célula. O artifício que usei para dar o efeito de animação foi uma pequena macro que dispara a exibição dos cenários criados seqüencialmente, associada a uma tecla. Veja o código VBA de uma das animações abaixo:

Public frame

Sub animaPulo()

    frame = frame + 1

    ActiveSheet.Scenarios("pulando" & frame).Show

    If frame >= 4 Then

        frame = 0

    End If

End Sub

Só para explicar: os cenários da animação Pulando chamam-se “pulando1”, “pulando2”, “pulando3” e assim por diante. Por isso, a variável frame é concatenada com a palavra “pulando”, para se referir ao cenário correto.

Abraços!

Quem ouviu o ÓcioCast sobre Busologia, publicado na semana passada neste periódico, já pôde curtir alguns spoilers suculentos do que está por vir no post de hoje.

A idéia, como já falamos, é que cada episódio do ÓcioCast sirva também como um belo brainstorm. Estamos realmente ficando profissionais nesse negócio de ócio: agora chamamos pessoas de fora para terem idéias de aplicativos por nós. Para evitar a fadiga, como diria o saudoso Carteiro Jaiminho.

 E foi graças à preciosa colaboração dos busólogos Adrianno Sakamoto e Francisco Ângelo que conseguimos bolar o fabuloso BusTrunfo. Além disso, a imagem que ilustra este post foi cortesia do Francisco, enquanto todas as fotos que embelezam nosso aplicativo vieram do rico arcevo pessoal do grande Adrianno.

 Ao invés de utilizar os carrinhos do jogo clássico, fizemos essa versão utilizando nada menos que 30 ônibus que circulam por São Paulo fazendo a alegria dos busólogos – inclusive alguns filhos únicos (não entendeu? Faça o download do ÓcioCast #1 e descubra o significado desse e muitos outros termos magníficos do métier busólogo).

 Esse nosso projeto teria levado muito mais tempo se não tivéssemos lançado mão de um recurso simples no Excel 2007: a Formatação Condicional. O uso foi essencial para identificar as informações repetidas. Basta selecionar as células a serem analisadas e, na guia Início, clicar no botão Formatação Condicional. No menu que é aberto, escolha a opção  Realçar Regras das Células e Valores Duplicados. Você pode escolher as cores com as quais você quer que o Excel destaque os valores duplicados.

 Isso facilitou muito a vida do Humberto. Mas o que facilitou ainda mais foi a participação vital dos busólogos, sempre com a resposta exata na ponta-da-língua.

 Escolha uma carta, decida qual vai ser a característica usada para “atacar”, e torça para que ela seja melhor que a do adversário – e para que o chefe não veja essa volta à infância via transporte coletivo.

Papel, pedra e tesoura? Coisa de amador! Nenhum deles é páreo para um alien ou uma bomba nuclear e nem ganham assim tão fácil de um mísero macaco ou de uma nojenta barata. Como assim? Pois estamos falando, senhoras e senhores, de nada menos do que uma evolução do antigo e manjado Joquempô.

A idéia surgiu quando a gente viu várias novas opções de itens no blog Trabalho Sujo, que por sua vez reproduzia um quadro encontrado no Fukung (agora, o verdadeiro autor mesmo nem eles sabem - ainda estão inclusive procurando; se alguém souber avisa para darmos o crédito). Mas como decorar todos os gestos ia dar um trabalhão, além de ter que saber quem ganhava de quem para decidir cada partida, o jeito foi unir o (in)útil ao agradável, transformando esse novo joquempô em um aplicativo do Ócio.

Além de não precisar entortar os dedos, outra vantagem é que você também pode jogar sozinho, já que enfrenta o próprio computador. É só selecionar sua "arma" e torcer para que a máquina não apareça com algo ou alguém superior pra te derrotar.

Esta aplicação foi desenvolvida com o uso de macros, que lidam com dados inseridos nas planilhas ocultas Dados e Textos. A novidade aqui é o uso do controle ActiveX Imagem. Após inserí-lo na planilha, clique em Propriedades e escolha a figura no item Picture da janela que aparece. Para colocar qualquer comando neste controle, clique com o botão direito do mouse sobre ele e escolha Exibir Código. A janela de VBA se abrirá já com a instrução Private Sub com o nome do seu botão.

Bj

Fabiana

Lembram do nosso colaborador mais assíduo, o Osmar Brandão? Pois ele acaba de nos contar uma ótima novidade. Junto com amigos do trabalho, ele criou um blog, o Blogando Office que, como nos explicou, surgiu "para divulgar informações sobre informática, jogos, esportes etc". Logo de cara ele já assina vários posts com dicas sobre Office, uma excelente fonte para nossos leitores.

Além disso, temos aqui mais um jogo enviado por ele, o Jogo dos 10. Baseado em uma brincadeira de um programa de TV, consiste em lançar perguntas sobre vários temas, para que o jogador tente adivinhar qual a porcentagem correta da resposta. A cada acerto, nova fase. Mas, se a alternativa estiver errada, é hora de voltar ao início. Confira!

Obs.: O Osmar gosta de se inspirar em brincadeiras da TV e em revistas que ele lê. Como ele é cuidadoso e sempre dá o crédito, entendemos que isso é um tipo de homenagem, que ele está de alguma forma divulgando suas referências. Se alguém, no entanto, se sentir invadido ou desrespeitado, por favor entre em contato que acertamos as coisas rapidamente, ok?

Bj

Fabiana

Veja também:
Batalha Naval 
Jogo da Memória
Forca

Prezados leitores do Ócio

Vimos, por meio desta, apresentar-lhes nosso novo aplicativo...ops!

Por mais que a gente também tenha que lidar com a nossa cota diária de emails e comunicados oficiais (quem não tem?), até que conseguimos separar tudo isso da "vida real". Mas o que não falta por aí é gente que se perde no caminho e acaba misturando tudo. Pense bem: você nunca ouviu falar de alguém que tenha mandado um "agregar" em um email para o(a) namorado(a)? Ou que encerrou um bilhete para a mãe com um "sem mais"? Ou, pior: você nunca fez nada parecido?

Se sim, meu amigo, abra o olho. Você pode ser mais uma vítima do corporativês, também conhecido como síndrome do escrever bonito. Achando que está arrasando e parecendo muito fino, você pode, na verdade, soar pedante, deslocado...ou chato mesmo. Especialmente para quem teme estar padecendo desse mal, apresentamos o Caçador de Chavões. Como ele funciona? Muito simples: você pode testar qualquer texto e o aplicativo indica em que nível de "chavonice" o autor se encontra. Basta inserir as palavras dentro de um campo apropriado e clicar em "caçar chavões" para saber a resposta.

Os recursos utilizados foram uma macro - veja o código comentado aqui - que trata um texto inserido em uma Caixa de Texto e retorna o resultado em MsgBox. A macro ainda carrega uma lista de palavras, na planilha Palavras, cada uma com sua nota de 0 a 100. Claro que você pode acrescentar as palavras que quiser ou até alterar seus valores. Só para você saber: os resultados vão de 0 a 99, como as menores notas, 100 a 199, na média, e acima de 200, as notas máximas em chavões. Caso palavras com 100 pontos sejam encontradas no texto, aparece uma segunda MsgBox fazendo um comentário com elas.

 Bj

 Fabiana 

Veja também:
Gato Mestre Corporativo
Bingo Corporativo

Abertura: corte em foto do banco de imagens Stock.XCHNG.

Tá, a gente até procrastinou um pouquinho, mas já voltamos ao assunto! Lembrando nossa campanha a favor da procrastinação responsável, resolvemos criar uma ferramenta para quem quer escapar uns minutinhos do trabalho para recuperar as energias. Desta vez, apresentamos uma macro no Excel que ajuda a simular um download.

Como assim? Simples. Você escolhe um dos temas - de preferência o que mais se aproxima do seu ramo, claro - e, ao acionar a macro, ela abre uma tela de download falsa. Quem passar por perto ou bisbilhotar sua tela vai ver que você está baixando algo "muito importante para o trabalho" (como o próprio nome do arquivo há de confirmar) e te deixar em paz. E o melhor: dá até pra programar quando tempo vai durar a tal operação.

Os recursos que utilizamos foram macros e o Userform que falamos aqui e aqui. O interessante é que, quando queremos que uma macro esteja sempre à mão, podemos salvá-la como um suplemento. Assim, toda vez que você abrir o Excel, sua macro estará disponível e você poderá acioná-la da forma que quiser. Como a procrastinação não tem hora, achamos melhor colocá-la logo no menu do botão direito do mouse. Para a macro ir parar lá, usamos o seguinte código (o texto após --> é um comentário do código):

Private Sub Workbook_Open() -->A macro com este nome é executada automaticamente quando a palnilha é aberta
With Application.ShortcutMenus(xlWorksheetCell).MenuItems.AddMenu(Procrastina, 1)
                               .MenuItems.Add Inicio, StartGeral, , 1, ,
                               -->"Procrastina" e "Início" são os itens do menu. "StartGeral" é o nome da macro
End With
End Sub

Para salvar qualquer código como suplemento, basta salvar a planilha toda e escolher a extensão XLA (nas versões anteriores do Office) ou XLAM (no Excel 2007). Depois é só instalar o suplemento, conforme já falamos aqui. Como você baixou o suplemento aqui no post e, provavelmente, salvou em alguma pasta de sua preferência, na janela do suplemento você precisará clicar no botão Pesquisar e encontrar o arquivo de suplemento. O Excel perguntará se você quer criar uma cópia, responda que sim, assinale o suplemento que já aparecerá na lista e clique em OK

Abs

Fabiana e Humberto

Veja também:
Teste de procrastinação 
Dicas para procrastinadores

Abertura: corte em foto do banco de imagens Stock.XCHNG.

Você já ouviu falar dele antes por aqui, chegou a hora de conhecê-lo. O rapaz da foto acima é nosso colaborador - recente, mas já assíduo: Osmar Brandão de Araújo, de São Gonçalo (RJ), está se especializando em criar joguinhos bacanas para o Excel. E quem ganha somos nós, já que ele manda os resultados para publicarmos aqui no blog.

Seguindo a linha retrô de suas duas primeiras contribuições - os jogos de Forca e Memória - ele agora aparece com a Batalha Naval, mas em uma versão solitária, que não requer a presença de um oponente. O próprio aplicativo trata de "esconder" as embarcações que o jogador precisa encontrar e destruir.

E, assim como fizemos com o vencedor do Ócio Aplicado, Plínio Brunelli, conversamos com o Osmar para descobrir como surgem suas idéias, quando ele trabalha nos aplicativos e conhecer um pouco melhor esse nosso colaborador.

Prestes a completar 33 anos (em 2 de agosto), Osmar Brandão é analista de gestão em uma empresa distribuidora de energia e estudante de Administração. Apesar de não lidar diretamente com programação, ele trabalha com o Office há cerca de 12 anos. "Mas conheci as macros (essenciais para criação dos jogos) este ano, a partir de um curso de VBA que tive em minha empresa", explica.

Fã de jogos, decidiu treinar dessa maneira o que aprendeu. Por que? "Com certeza é muito mais divertido criar os jogos do que elaborar relatórios fictícios apenas para fixar o que aprendi. Inicialmente queria apenas praticar e não tinha o objetivo de divulgá-los para tanta gente". Mas é aí que entramos nós aqui do Ócio. Osmar conheceu o blog por causa do concurso, mas perdeu o prazo de inscrições. Ainda assim, gostamos tanto do seu primeiro jogo que pedimos e ele autorizou a publicação.

A partir daí, não parou mais. "Quando acabo um jogo já estou procurando outro. Neste momento, inclusive, estou trabalhando em dois novos projetos", adianta. E a gente espera ansiosamente, claro. Sinal de que em breve teremos mais jogos por aqui.

Bj

Fabiana

Totalmente entrosado com a filosofia do blog, o leitor - e a esta altura já nosso parceiro - Osmar Brandão continua nos enviando colaborações muito bacanas, desenvolvidas, segundo ele mesmo, em seus momentos de ócio. Depois de um divertido Jogo da Forca, publicado no início do mês, ele agora aparece com um Jogo da Memória, também em Excel.

Utilizando basicamente macros, Osmar criou uma versão da brincadeira com números e palavras (nas categorias alimentos e veículos). A cada acerto, o par correto fica em destaque, e o aplicativo tem ainda um sistema de estatísticas, que avalia o desempenho do jogador, calculando a quantidade de acertos por tentativa.

Além da Forca e da Memória, Osmar também já nos mandou outros dois jogos, que também serão publicados em breve. E, para quem já está curioso em conhecer esse nosso novo colaborador (nós ficamos!), estamos também providenciando uma apresentação dele por aqui.

Lembrando ainda que se você também aproveita suas horinhas de ócio para desenvolver aplicativos que têm tudo a ver com o blog, mande para a gente! Nossos colaboradores ganham camisetas exclusivas do Ócio e ainda têm seus trabalhos divulgados no site.

Bj

Fabiana

Abertura: corte em foto do banco de imagens Stock.XCHNG.

A procrastinação é, de certa forma, parente do ócio. E ambos vivem sendo injustamente confundidos com conceitos não muito elogiosos, como folga, preguiça, vagabundagem e quetais. A fim de ajudar a derrubar esses falsos mitos e provar que, assim como seu primo, também a procrastinação pode ser criativa, decidimos fazer uma série de posts em defesa desta tão fina arte. Os primeiros argumentos vieram já no texto da última sexta e, a partir de hoje, prosseguimos nossa cruzada em prol do direito de deixar para amanhã - ou pelo menos para daqui a pouco - aquilo que não estamos a fim de fazer agora.

Mas, antes de se juntar a nós, é preciso saber se você é realmente um adepto fervoroso, um procrastinador ocasional ou se é um super Caxias e vai aproveitar essa série só para descobrir alguns truques de seus colegas ou subalternos. Desta forma, o primeiro passo é passar pelo nosso Teste de Procrastinação.

E, para quem quer entender um pouco melhor como fizemos o aplicativo, seguem algumas dicas:

Conforme demonstrado no Gerador de cartas de amor no Excel, é muito fácil inserir objetos em um UserForm. Uma vez que um objeto é inserido, você pode alterar suas propriedades, ou seja, suas características, basta abrir a Janela de Propriedades localizda no menu Exibir. Ali, você pode alterar o nome do objeto, preenchimento, borda, fonte, largura, altura, e por aí vai. Na figura abaixo, o objeto selecionado é o rótulo que conterá as perguntas.

As propriedades de um objeto também podem ser determinadas dinamicamente. Dentro de Sub ou Function basta que você se refira ao objeto pelo nome, digite um ponto e a propriedade. Se você quisesse que um rótulo Label1 tivesse a fonte com tamanho 20, bastaria digitar: Label1.Font.Size = 20. Font é propriedade de Label1 e Size é propriedade de Font.

Vamos a um exemplo prático. No caso do teste, todos os objetos são colocados simultaneamente, uns sobre os outros mesmo, no UserForm. Veja no print abaixo, que todas as figuras estão sobrepostas e a figura Ocio_Top está selecionada (veja o seu nome aparecendo na janela propriedades). Repare também que, no código, assim que é digitado um ponto após o seu nome, um menu surge e perminte que você escolha a propriedade que quer trabalhar. No caso, será escolhida a propriedade Visible e será determinada como False, para que a figura não apareça durante o teste, mas só no final. Quando for para ela aparecer, basta que, em outro momento, a macro mude sua propriedade para True.

Assim também foi feito nos textos: todos os itens do teste, as perguntas e o resultado tiveram seus textos alterados por meio da propriedade Caption - que determina o texto do objeto. Só como exemplo, a pergunta poderia ser estabelecida assim:

pergunta.Caption = "1 - Que tal começar o teste agora?"

Se você quisesse mudar para segunda pergunta, bastaria alterar a propriedade do objeto "pergunta", que poderia ser colocado no botão Próximo, por exemplo.

Abs
Fabiana e Humberto

Veja também:

Você (re)conhece o lindo pendão da esperança?
Você está preparada para ser magra?
Teste de relacionamento
Teste: você nasceu para brilhar?
Oráculo da longevidade

Abertura: corte em foto do banco de imagens Stock.XCHNG.

Dá até vontade de perder, só para ver o enforcado virar anjinho. Já transformado por nós num aplicativo de OneNote, o tradicional jogo de Forca ganhou uma nova versão, bem caprichada, agora em Excel. Trata-se de uma criação de Osmar Brandão de Araújo, de São Gonçalo (RJ). Além do "efeito especial" descrito logo na abertura deste post, o aplicativo tem mais de 350 palavras, em sete diferentes temas (inclusive palavras em inglês) e opções para palpites e dicas extras.

Infelizmente, Osmar perdeu o prazo de inscrições para o concurso Ócio Aplicado. Mas seu aplicativo é tão simpático e divertido que, mesmo não concorrendo ao prêmio, decidimos publicá-lo e dividi-lo com os leitores do blog.

Osmar, aguarde que a camiseta do Ócio chega aí em breve, ok?

Para conferir e se divertir com o jogo, clique aqui.

Veja também:

Caçando Palavras na Tabela
Cruzadão
Letris 2.0

Abertura: corte em foto do banco de imagens Stock.XCHNG.

O Letris, um dos jogos mais baixados e mais interessantes do Ócio, merecia uma turbinada:  o Letris 2.0. Para começar a falar nas mudanças, o dicionário. Além de, a exemplo do Montando Palavras, acrescentarmos os verbos no infinitivo, também retiramos os acentos. Sei que a língua portuguesa sofre um pouco com isso, mas em termos de jogabilidade ganha-se muito.

Se você, ao jogar o primeiro Letris, notou as peripécias que a macro fazia a cada letra, deve ter notado uma significativa diferença. Para a macro checar se existia palavras formadas, as células eram selecionadas por linha e coluna e checadas contra o dicionário. Essa checagem obviamente continua ocorrendo, mas de forma diferente. O comando utilizado anteriormente era o Range e o Select, ou seja, selecionava-se uma célula na macro e depois extraía-se o texto de dentro dela. Por exemplo:

Range("A3").Select
Selection.Text

Com uma simples substituição, a macro ficou muito mais rápida e eficiente:

Cells(3,1).Text

Com o comando Cells, pula-se a etapa de selecionar, o que fica mais rápido e o usuário não tem que ficar assistindo várias células serem selecionadas sem entender nada do que está acontecendo. No exemplo, o número 3 corresponde à linha e o 1, à coluna (coluna A).

Além da correção de alguns "bugs", mudamos também a probabilidade de letras mais ou menos utilizadas caírem. A letra "a", obviamente, tem que cair bem mais do que a letra "w", não?

Abraço, Humberto

Veja também:

Tetris de letrinhas
Tetriscom palavras
Micro Macro ou Macro Micro?

Abertura: corte em foto do banco de imagens Stock.XCHNG.

Pensando nas nossas prendadas e - por que não? - prendados leitores, criamos um aplicativo que facilita a vida de quem gosta de bordar. Especialmente os mais criativos, que não gostam da obrigação de seguir aqueles já manjados modelos de revistas e livros. Esqueça os patinhos e gatinhos, frutinhas caretas e florzinhas antiquadas. Imagine poder escolher o desenho que quiser, qualquer um mesmo, e transformá-lo em um molde? Pois é exatamente isso que o Excel para Bordar proporciona! Explicamos como:

Os recursos utilizados para esse aplicativo não têm nenhum segredo. Coloca-se uma figura no background - guia Layout da Página, Fundo da Página - e formata-se as células com a mesma largura e altura (usamos 10 pixels). Para fazer isso rapidamente, selecione toda a planilha e arraste entre duas colunas no cabeçalho de colunas: a medida será exibida em centímetros e pixels (entre parêntesis). Depois é só sair colorindo as células de acordo com o desenho. Um truquezinho simples, mas muito eficiente, é o uso da tecla F4. Sua função é repetir a última ação. Então, se você precisa colorir várias células não adjacentes, pinte uma célula, depois selecione a seguinte e pressione F4. Isso vale para qualquer tarefa e funciona em todos os aplicativos do Office.

Antes de imprimir, veja qual tamanho você quer. No Excel, a impressão não está diretamente relacionada com o tamanho de suas escolhas na planilha, como tamanho das células, fontes, imagens, etc. Primeiro, clique na guia Exibição e em Layout da página para visualizar a planilha como será impressa. O desenho está distribuído por nove páginas. Para alterar, clique na guia Layout da Página (não confundir com o Layout da Página da guia Exibição) e altere o tamanho na seção Dimensionar para Ajustar. Você pode ajustar por folha ou por percentual.

Abraço, Humberto

Veja também:

Arte com setas no Excel
Clip-Arts para estampar camisetas
CDs personalizados

Abertura: corte em foto do banco de imagens Stock.XCHNG.

Só mesmo estando entregue ao ócio para olhar um recurso do Excel chamado Auditoria de Fórmulas e alimentar a idéia de criar desenhos com ele. Mas foi exatamente assim que começou nossa viagem de hoje. A partir das setinhas resultantes do uso desse recurso, fiz uma humilde recriação da Mona Lisa de Leonardo da Vinci.

Tá muito abstrato? Vejamos, então. Baixe aqui a planilha para refazer minha trajetória. Em seguida, clique na célula BT5 e tecle Enter (Se tiver dificuldade de encontrar essa célula, clique na caixa, no canto superior esquerdo da planilha, onde aparece uma referência de célula, e digite BT5). Clique na guia Fórmulas e clique repetidas vezes em Traçar Dependentes, até que o desenho com setas se complete.

Se quiser tentar algo parecido, basta que você crie fórmulas dependentes umas das outras, sem falhar nehuma, até o fim. As fórmulas podem ser simplesmente referências diretas à célula anterior. Veja como ficaram as fórmulas do meu desenho na planilha Monalisa. Para facilitar, você pode colocar a figura escolhida como backgroud - guia Layout de página, Fundo da página - para saber onde deverão passar as setas. Aliás, se você resolver fazer seu próprio desenho e gostar do resultado, mande para a gente, podemos publicá-lo aqui no blog também.

A auditoria de fórmulas existe para facilitar que o usuário acompanhe o raciocínio por trás de uma planilha. Na planilha abaixo, veja, por exemplo, o que acontece se você clicar em Traçar precedentes:

Se selecionar a mesma célula (D8) e clicar em Traçar dependentes:

Abraço, Humberto.

Faça o download:
- Monalisa
- Excel | 41KB

Veja também:
Colaboração e Arte

Abertura: corte em foto do site do Museu do Louvre.

Esse aplicativo é parecido com alguns já postados, como o Sorteador de Amigo Oculto, por exemplo. Mas foi feito para atender a encomenda de uma amiga, que tinha que sortear alguns prêmios entre o pessoal do trabalho. E sempre vale a pena quebrar o galho de um amigo, certo? Se a situação lhe é familiar, ou seja, se você também está precisando de um Sorteador Genérico de Prêmios, clique aqui para baixar o nosso.

O funcionamento não podia ser mais simples. Você cadastra o povo que vai concorrer, os prêmios que serão distribuídos e clica no botão "Sortear". Pronto! O nome do sortudo aparece ao lado do prêmio que lhe cabe.

Para criar a atmosfera dourada que certamente um contemplado percebe em seu momento de glória, decidimos sombrear as células mescladas do título para criar o aspecto de uma placa dourada. Para isso, utilizamos um recurso do Excel 2007 de sombreamento de células com um gradiente. Clique na células em que deseja aplicar o efeito, na Guia Início e na pequena seta da seção Fonte. Na janela que aparece, clique na guia Sombreamento e em Efeitos de preenchimento. Lá você terá disponíveis várias opções como cores, estilos e variações do gradiente.

Bj, Pati.

Veja também:

Sorteador de Amigo Oculto

Sorteador de Números da Mega-Sena

Abertura: corte em foto do banco de imagens Stock.XCHNG.

As dificuldades de entendimento entre homens e mulheres já renderam inúmeros livros, filmes e teses, e com certeza o assunto ainda está bem longe de se esgotar. Mas, mesmo parecendo impossível, todo mundo ainda tem, mesmo que seja lá no fundo, a esperança de um dia entender, enfim, o que raios eles ou elas querem.

E, brincando um pouco com os velhos clichês (muitas vezes reais) sobre a eterna busca das mulheres em compreender a mente do sexo oposto, criamos um Teste de Relacionamento. Já fizemos outros testes no Ócio - veja abaixo. Mas resolvemos desenvolver esse usando uma lógica diferente para mostrar recursos novos.

Em outras ocasiões, a resposta surgia em uma única célula. Mas, para dar veracidade ao efeito visual de "caderno caprichadinho", a resposta do teste, originalmente em uma só célula, deveria mudar de linha. Em outras palavras, um texto tinha que ser interrompido em uma célula e continuar na célula de baixo. Uma espécie de quebra de linha automática por meio de fórmula. Como fazer?

A primeira coisa a pensar é: em que momento o texto deve ser interrompido para continuar na próxima linha? Estabeleci o seguinte critério: no primeiro espaço depois do centésimo caractere.

Na primeira linha, usei a função EXT.TEXTO, que serve para pegar um determinado número de caracteres a partir de um trecho que o usuário determina. Portanto, possui três argumentos: Texto: a célula onde está o texto em questão.

Num_inicial: em qual caractere do texto começa o trecho que você quer - para essa primeira linha, obviamente, começa do número 1.

Num_caract: o número de caracteres desejado.

Mas você não sabe onde o espaço vai cair após o centésimo caractere, certo? Então, para esse último argumento precisamos de uma função que encontre o espaço e me diga em qual posição ele está. Esta é a função LOCALIZAR.

A função LOCALIZAR também tem três argumentos.

Texto_procurado: em nosso caso, o espaço.

No_texto: ou seja, a resposta inteira.

Num_inicial: em que posição do texto ele começa a procurar - de acordo com o nosso critério, é o número 100.

O resultado dessa função será a posição exata em que o primeiro espaço é encontrado depois do centésimo caractere. Veja como ficou:

=EXT.TEXTO(dados!$K$3;1;LOCALIZAR( ;dados!$K$3;AB84))

Para as próximas linhas, temos alguns agravantes: primeiro, temos que considerar onde o texto da linha de cima parou, certo? Então, na função MID, ao invés de começarmos pelo número 1 no Início_num, como fizemos na primeira linha, basta repetir a primeira fórmula e somar 1. Pronto, se na primeira o resultado foi 103, por exemplo, na linha de baixo começaremos a contar de 104. A fórmula ficaria assim:

= EXT.TEXTO(dados!$K$3; EXT.TEXTO(dados!$K$3;1; LOCALIZAR( ;dados!$K$3;AB84))+1; LOCALIZAR( ;dados!$K$3;AB85))

Ainda tive que utilizar algumas funções SE() para prevenir o caso de não chegar a ter 100 caracteres restantes, o que ocasionaria um erro na função FIND.

Enfim...dizem que os homens são mais racionais e as mulheres mais emotivas, que eles são diretos e elas mais sutis. Será? Bom, seja lá como for, a intenção deste teste é a mais nobre possível: ajudar nossas leitoras a classificar seus ficantes/namorados/noivos/maridos. Ou, no mínimo, ter uma noçãozinha que seja de onde podem estar se metendo. Afinal, o amor pode até ser cego, mas não precisa ser burro, não é?

Bj

Fabiana

Veja também:

Você está preparada para ser magra?
Oráculo da Longevidade
Qual software do Office que você é?
Qual personagem do Natal você é?
 

>Abertura: corte em foto do banco de imagens Stock.XCHNG.

Agora falta pouco. Se você é fã de chocolate, certamente está contando os dias para a Páscoa. Até quem se controla o ano todo admite que não consegue ficar indiferente nesta época. Também, basta entrar em qualquer supermercado para apreciar aquele espetáculo das "cabaninhas" de ovos, pilhas de caixas de bombons, prateleiras cheias de barras variadas. Qualquer chocólatra que se preze, então, chega quase às lágrimas.

Só que, como nem tudo é alegria, nosso querido amigo é cercado de polêmica. Uns dizem que faz bem, outros recomendam evitar (heresia!), mas, ao certo, sabemos mesmo é que ele é muito nutritivo e contém substâncias que estimulam a produção da serotonina, um neurotransmissor que ajuda a aumentar os níveis de prazer, e por isso realmente nos deixa mais felizes...mas também engorda.

Mas nada de pânico! Para garantir uma overdose sem culpa e sem tragédias na balança, desenvolvemos aqui no Ócio o Chocolate Burn, um aplicativo no Excel que aponta o que fazer para queimar todas as calorias extras. E mesmo quem não é muito chegado a esportes ou academia foi agraciado. Você pode escolher qual seu perfil e, a partir daí, montar uma série de atividades que produzam o resultado que você deseja.

Assim, você informa quanto consumiu de chocolate e fica sabendo exatamente quantos quilômetros precisa correr, quantas horas precisa varrer a casa, jogar peteca, subir escadas, beijar ou até dormir...lembrando apenas que usamos uma média, já que o gasto calórico varia de pessoa para pessoa, dependendo do peso e metabolismo de cada um, do tempo e da intensidade do exercício.

E, para quem ficou curioso em saber como foi feito o tratamento de tempo da planilha - diferente do que usamos no Conversor de Fuso Horário -  a explicação vem a seguir:

A relação entre gramas de chocolate, calorias e exercício, por meia hora, foi resolvida em células separadas - I9, na planilha Chocolate, e B17, na planilha Dados. Como o cálculo da meia hora é o resultado de uma multiplicação por 0,5, então o resultado não é em horas, mas em decimal.

Para fazer a conversão de decimal para hora é simples: o número 1 representa uma hora, certo? Então, 1,25 é uma hora e um quarto. Se colocarmos esse número em uma função INT (que serve para retornar o número inteiro) o resultado será 1. Se fizermos uma subtração simples entre o 1,25 e o obtido por meio da função INT, separaremos o decimal: 1,25 - INT (1,25) = 0,25. Aí é só multiplicar por 60 para obter o número em minutos (0,25 x 60 = 15).

Nessa altura você deve estar se perguntando: mas e quando forem 5 minutos? Vai ficar uma coisa esquisita, tipo 1:5, em vez de 1:05? Não. Se o número for menor que 10 teremos que colocar um zero na frente. Essa é uma missão para a função SE, que retornará o resultado "0" se o valor for menor que 10 e ""(seqüência vazia) se não for. Para finalizar, concatenemos com o operador "&". Serão concatenados o resultado do INT, ou seja, a hora; os dois pontos que separam a hora de minuto; a função SE, com o zero ou não; e os minutos. Veja como ficou a fórmula na célula K12 na planilha Chocolate. Por exemplo, para uma hora como 3,15 (que deve resultar em 3:09), a fórmula ficaria assim:

=INT(3,15) & ":" & SE(3,15-INT(3,15)<10;"0";"") & (3,15-INT(3,15))*60

Boa Páscoa!

Fabiana e Humberto
 

>Abertura: corte em foto do banco de imagens Stock.XCHNG.

Se você gosta de Fórmula 1, anda pretendendo viajar para lugares longínquos ou simplesmente é um apaixonado por curiosidades geográficas, já deve ter se pegado calculando fusos horários. Para essas pessoas, desenvolvemos um Conversor de Fuso Horário. Índia, Iraque, África do Sul, os Estados Unidos (com seus vááários fusos); está tudo lá. Clique aqui para baixar.

Não, nós não costumamos acompanhar corridas de carro, não temos planos de ir muito longe da cadeira que hoje nos acomoda e não somos especialmente curiosos. Mas, como você sabe, a gente não tem muito o que fazer, então resolvemos pesquisar essa questão.

Naturalmente, esse aplicativo se baseia no tratamento de data e hora. Dito isso, é preciso esclarecer que o Excel lida com os valores de tempo de uma forma peculiar: cada data é uma seqüência numérica. Começa com 1, que corresponde a data de 01/01/1900 e vai em seqüência indefinidamente. A data de hoje (14/03/2008), por exemplo, corresponde ao número 39521. A forma que a data se apresenta é só uma questão de formatação.

Aí você pergunta: mas e a hora, os minutos e os segundos? Bem, a hora é parte de um dia, certo? Para ser mais exato, é 1/24 de um dia. Então, para representar a data de hoje às 13:00 o número no Excel é essa beleza: 39521,5416667 - a parte decimal é o resultado de 13 dividido por 24. É muito para nossa cabeça, não? Mas como é a "cabeça" do Excel que vai trabalhar, então deixa ele... O importante é nos lembrarmos disso na hora de bolar nossa fórmula.

O Conversor de Fuso Horário funciona assim: em uma tabela, botei uma série de países com a diferença de horário em relação a Brasília. Em cada uma das linhas já fiz o cálculo: usei a função AGORA, que me dá a data e a hora atuais, e somei com o número de horas de cada país divido por 24. Só com isso, em cada uma das linhas de cada país, obtive a hora atualizada com relação ao nosso horário (veja os cálculos da planilha Dados). Não considerei o horário de verão de cada país, pois esse cálculo se baseia no horário do computador local - vale lembrar que a hora do seu micro precisa estar correta para a conversão.

O interessante é que as fórmulas que retornam a data, a hora e o dia da semana são idênticas. Como disse anteriormente, o que muda é só a formatação. Veja a seção Número na Guia Início: você tem várias opções de formatação. Para aparecer somente o dia da semana, escolha a formatação personalizada e digite "dddd". 

Tem ainda um charme que muda as cores do país de acordo com a escolha da Caixa de combinação através de uma macro. É bem simples, mas esse assunto fica para uma próxima, OK?

Abraços, Humberto.

Este jogo "de tabuleiro" nasceu sob encomenda para o Blogo, o zine que a Espalhe fez durante a Campus Party. Naturalmente, era uma versão estática, desenvolvida no Word. Mas a gente gostou tanto da idéia que, para fazer jus à tempestade tecnológica promovida pelo evento, decidi deixar o velho jogo de corrida com dados um pouco mais inteligente. Assim nasceu esta versão para ser jogada no Excel - a Corrida Tech.

Como no jogo Corrida dos Dinossauros, cada vez que você pressiona F9, os dados são lançados. Mas aqui, na Corrida Tech, o F9 determina também que os campos sejam atualizados. Ou seja, a cada jogada os "obstáculos" estão em um lugar. Passou direto pela casa que diz "Queimou o processador com overclock. Volte ao ponto de partida!"? Calma, não é hora ainda de se sentir aliviado: esta casa pode aparecer novamente mais adiante. Baixando o arquivo e convidando alguém para o desafio, tudo isso vai ficar mais claro rapidinho.

E o buraco negro? Quem gosta de física sabe o que acontece quando nos aproximamos dele: a singularidade. Como o espaço-tempo é infinito, você adquire a função de onda infinita e, para continuar no jogo, deve voltar a sua função de partícula. Viagem total? É por aí mesmo. Mas para o jogo funciona: quando chegar lá no fundão do buraco, você jogará os dados e voltará ao tabuleiro no quadrado preto. De novo eu recomendo: baixe e jogue que na prática é bem fácil.

O processo de criação desse jogo é baseado em determinar aleatoriamente em quais células os "obstáculos" deveriam cair a cada jogada. Foram escolhidas dez células para cada "obstáculo", anotadas na planilha "Formulas" - ela está lá visível para quem quiser conferir. De dez células pré-determinadas, uma é sorteada para receber a cor do "obstáculo" na planilha "Tech". Utilizei também randomização e PROCH.
Já falamos da função PROCH, mas acho que não explicamos exatametente como ela funciona. O conceito é parecido com o da função PROCV, só que na horizontal. Temos quatro parâmetros (abra a tabela para acompanhar melhor as informações que vêm a seguir):

-Valor procurado: o valor que foi sorteado.
-Matriz-tabela: a tabela de onde um valor correspondente ao que você tem deve ser extraído.
-Número-índice-linha: quantas linhas abaixo o Excel deve buscar este valor
-Procurar intervalo: se o valor deve ser exato ou aproximado

Funciona assim: digamos que a Matriz-tabela seja a tabela abaixo. Se o valor procurado for 4, o Excel procura pelo número quatro na primeira linha. Se você colocar no Número-índice-linha o valor 3, ou seja, você quer a terceira linha, o resultado da fórmula será "AP20".

Neste jogo, foram utilizados ainda outros recursos, sobre os quais já falamos, como Formatação condicional e outras funções de fórmulas do Excel que falaremos mais adiante, ok?

Abraço, Humberto

>Abertura: corte em foto do Banco de Imagens Stock.XCHNG.

Com todo este calor,  você está preso em um engarrafamento? Em uma reunião interminável? Parece que a Páscoa vai chegar, mas o carnaval não chega nunca? Bem que você podia estar saboreando uma cerveja gelada, não? E a multa que você recebeu por ter parado em estacionamento proibido? E os juros do cartão de crédito que você deixou de pagar este mês? Valem quantas cervejas?

Pois bem, com o Tudo Acaba em Cerveja, você pode saber quantas cervejas poderia ter tomado durante o tempo que perdeu com uma roubada ou com a grana que você gastou ou vai gastar. O resultado é apresentado em garrafas, latas... e até em goles!

Esta é um típica planilha do Excel, com fórmulas relativamente simples. Utilizei o PROCV, veja as fórmulas da planilha, com todos os seus critérios, lá a partir da coluna AN. Utilizei também o recurso de validação para ter vários drop-downs na planilha.

Outro recurso é uma função para tratamento de erro, na coluna AN. O que ocorre ali é que há uma multiplicação dos valores colocados na coluna J (número de pessoas) e da coluna AO. Acontece que, na coluna AO, o valor é resultado de uma função PROCV e, se o usuário não escolher nada, o PROCV não vai achar nada, ou seja, erro. Então na coluna AN, precisei de um tratamento: a função ÉERRO. É só colocar a célula a ser testada - no caso, as células da coluna AO - dentro da função ÉERRO. O resultado será VERDADEIRO se houver um erro e FALSO se não ocorrer erro. Assim, é possível o tratamento com função SE. Veja:

=SE(ÉERRO(AO7);"";AO7*J7)

Outro recurso interessante foi o utilizado na fórmula principal da planilha. Veja que beleza que ficou a fórmula da célula:

=SE(valorUnitario=;tempo*mlmin*hora*graus*dia*pessoas*sanidade;IF(tipoCerveja=Garrafa;dinheiro/valorUnitario*600;dinheiro/valorUnitario*350))

Reparou que não tem referência de células? Pois é, às vezes é bem mais fácil trabalhar com nomes que justificam a ação da fórmula do que com referências. É o recurso de nomear células. É muito fácil: clique na célula que você deseja nomear e em seguida na Caixa de Nome - localizada no canto superior esquerdo, acima do cabeçalho de colunas (onde aparece a referência da célula que você clicou). Digite o nome para a célula. A partir daí, suas fórmulas poderão utilizar o nome e não a referência. Um jeito simples de trabalhar com fórmulas é, no lugar de digitar as referências ou os nomes, clicar na célula envolvida pela fórmula após esta estar aberta. Você verá que o nome é inserido automaticamente dentro de sua fórmula.

Depois de tudo isso, só tomando uma!

Abraço, Humberto

Faça o download:
- Conversor de Cerveja
- Excel | 168 kb

Leia também:
- Para Queimar o Chocolate da Páscoa
- Churrasco e Cerveja II
- Churrasco e Cerveja
- Feijoada Calculator
- Ceia Calculator

>Abertura: corte em foto do banco de imagens Stock.XCHNG.

Feijoada na segunda-feira? É, amigos. Esta não veio inspirada pelo calendário semanal de bares com PF e self-services de São Paulo - de acordo com o qual o dia mundial da feijoada é a quarta-feira.

Resolvemos adaptar o mundialmente famoso formato "calculator" a este prato brasileiríssimo por causa da proximidade com a Festa de Momo, que sempre traz feijoadas pré-carnavalescas recheadas de vips.

Naturalmente, estão presentes aqui recursos que já usamos no Ceia Calculator. Mas tem também coisa nova: as funções de arredondamento do Excel.

No Feijoada Calculator, utilizei a TETO, que arrendonda o número para cima - é melhor sobrar do que faltar! - conforme um fator de significância:

= TETO("o valor, ou a célula onde está o valor, a ser arredondado"; "siginificância")

Significância funciona assim: se temos um valor de 430 e colocamos uma significância de 50, o valor será arredondado para 450. Se colocássemos 100, iria para 500, e assim por diante.

Existem outras funções: ARREDONDAR.PARA.CIMA, que arredonda um número para cima, só que conforme o número de casas decimais desejadas. ARREDONDAR.PARA.BAIXO funciona da mesma forma, só que arredondando para baixo de acordo com o número de casa decimais informado:

ARREDONDAR.PARA.CIMA(52,54625;3) - resultará em 52,547

ARREDONDAR.PARA.BAIXO(52,54625;2) - resultará em 52,55

A função ARRED faz a mesma coisa, só que arredonda para o número mais próximo. O MARRED também é muito interessante: arredonda para cima de acordo com o múltiplo mais próximo:

MARRED(432;50) - resultará em 450, pois este é o próximo múltimplo de 50.

As funções PAR e ÍMPAR funcionam também para arredondamento. Não têm outros argumentos a não ser o valor a ser arredondado: arredonda para cima até o próximo número par ou ímpar.

PAR(23,432) - resultará em 24
ÍMPAR(23,432) - resultará em 25

No caso do Feijoada Calculator, coloquei o fator de significância da função TETO em um célula separada, para poder decidir conforme cada caso. Confira as fórmulas na planilha Feijoada.

Abraços, Humberto.

Faça o download:
- Feijoada Calculator
- Excel | 144 kb

Leia também:
- Para Queimar o Chocolate da Páscoa
- Churrasco e Cerveja II
- Churrasco e Cerveja
- Ceia Calculator

>Abertura: corte em foto do banco de imagens Stock.XCHNG.

Você baixou a planilha, tentou rodar, descobriu que ainda não tinha o Solver instalado na máquina, instalou na seqüência e mesmo assim teve problemas? Você não foi o único. Para solucionar de vez essa questão resolvemos disponibilizar o Projeto 2008 de outra forma. Aí embaixo você vai encontrar o código da macro e uma versão do Projeto 2008 sem a macro, para que você mesmo coloque uma coisa dentro da outra.

Primeiro, vamos instalar o Solver: nas versões anteriores do Office, clique em Ferramentas, Suplementos e em Solver. No Office 2007, clique no Botão do Office, Opções do Excel, Suplementos, Clique em Solver e em OK. Salve a planilha.

Depois, abra o ambiente de VBA pressionando as teclas ALT+F11. Clique em Inserir, Módulo. Uma janela em branco aparecerá, denominada Modulo1. Copie o código abaixo e Cole no Modulo1.

Sub SolverMacro()

Dim linha, alvo, a, celulas, celulaAlvo As Variant

Range(E7:E200).ClearContents

linha = Cells(201, 2).Value
alvo = Cells(5, 5).Value
celulaAlvo = F & linha
linha = linha - 1
celulas = E7:E & linha

SolverReset
SolverOk celulaAlvo, 3, alvo, celulas
SolverSolve True
End Sub

Ainda na janela do VBA, clique em Ferramentas e Referências. Na janela que se abre, clique na caixa de verificação do Solver. Clique em OK e Salve o Documento.

Para bloquear a macro, como nós sempre fazemos, clique com o botão direito do mouse na linha Project - Projeto 2008. Em Propriedades de Project; Proteção, estabeleça uma senha.

Aí é só se comprometer com seu Projeto 2008.

Abraços,

Humberto.

>Abertura: corte em foto do banco de imagens Stock.XCHNG.

Outra resolução clássica de Ano Novo é: "Eu vou emagrecer!". Ou "Vou perder dez quilos neste verão!". Ou "Vou comemorar meu aniversário vestida com aquela saia que não cabe há dois anos!". Ou "Vou fazer o terno do meu casamento voltar a fechar!". Ainda empenhados em ajudar nossos leitores a se manterem fiéis a tudo aquilo que prometeram - por impulso ou não - na hora da virada, montamos uma planilha que organiza o esforço da dieta. Cliquem aqui para baixá-la.

O recurso central é o Solver, sobre o qual já falamos aqui. Só que, desta vez, colocamos "o efeito do solver" em uma macro, para que você não precise ir até a janela do Solver em si. Na macro, o comando Solver é muito simples. De qualquer forma, não se esqueça que você pode gravar macro  e rodar o Solver, o que deixa o processo ainda mais fácil.

Depois, iniciados podem dar uma olhada no código: você verá que o comando Solver é, basicamente, SolverOK e SolverSolve - com seus parâmetros, ou seja, as informações necessárias para o Solver funcionar. Para avançar um pouco no assunto, desta vez vamos falar sobre o código. Para entender melhor, verifique as fórmulas criadas na planilha. Não tem nada de mais, mas são fundamentais para o Solver funcionar. Sempre ao lado de ---- fiz alguns comentários:

Sub SolverMacro()    ----Aqui começa a macro com o comando Sub

----Abaixo, declarei as variáveis onde ficarão guardadas as informações do Solver

Dim linha, alvo, a, celulas, celulaAlvo As Variant   

----Aqui, toda a vez que a macro rodar, as células E7:E200 serão selecionadas e tudo o que estiver digitado, será apagado

Range(E7:E200).ClearContents  

----Abaixo, peguei o número da última linha que tem valores (na planilha, a célula B201 indica qual é a linha) e peguei o peso alvo que o usuário coloca na célula E5.

linha = Cells(201, 2).Value
alvo = Cells(5, 5).Value

----Aqui, na coluna F e na última linha - que está na variável "linha" - está a célula que será o alvo do Solver

celulaAlvo = F & linha

----Nas duas linhas abaixo, estabeleci onde serão as células que precisarão ser modificadas para chegarmos no resultado desejado por meio  do Solver. Repare que o intervalo de células precisa ir até a penúltima linha, pois a última deverá conter o resultado, por isso diminuí uma unidade na variável "linha"

linha = linha - 1
celulas = E7:E & linha

----Aqui são os comandos do Solver

SolverReset   ----Reseta qualquer Solver feito anteriormente

----Aplica o Solver com os parâmetros

SolverOk celulaAlvo, 3, alvo, celulas 
 
  ----Resolve o Solver. O parâmetro está TRUE porque não quero que apareça a janela do Solver

SolverSolve True 
 
---Termina a macro e fecha o Sub
End Sub

É importante frisar que uma macro com o Solver só funcionará se você instalar uma Referência para o Visual Basic. Na janela de edição de macros do VBA, clique em  Ferramentas, Referências, marque a caixa de verificação do Solver e dê OK.

Abs, Humberto.

>Abertura: corte em foto do banco de imagens Stock.XCHNG.

Elvis Presley, Luciano Pavarotti, Bing Crosby, Nat King Cole, Whitney Houston e Johnny Cash estão entre os que cantaram a versão original dela, em inglês. Jingle Bells é, sem sombra de dúvida, uma das canções de Natal mais executadas da história. Como Noite Feliz - o outro tema natalino inserido naquela nossa planilha de Excel musical - Jingle Bells, também conhecida como One Horse Open Sleigh (seria algo como trenó de um cavalo?), foi composta no século XIX por um tal de James Lord Pierpont. Impressionante como as duas se mantém "poderosas" até hoje, né? Aproveite um versão moderníssima delas aqui.

Lembre que, para criar uma nova música, o primeiro passo é copiar a pauta da planilha Music Staff (aquela em que a gente põe as notas). Na planilha Songs, acrescente uma linha ao final da tabela de músicas com o nome da sua música. Note que há duas colunas: uma com o nome escrito normalmente e, na outra, o mesmo nome, mas sem espaços.

O último passo, antes de começar a criar a música, é nomear as células que marcam o início da música. Na coluna F, selecione as células das linhas correspondentes à pauta que receberá sua nova música. Clique na caixa de nome - aquela caixa no canto superior esquerdo da planilha em que aparecem as células que estão selecionadas na planilha - e digite o nome da música exatamente como você digitou na planilha Songs (na versão sem espaços). Isso porque nomes de células não aceitam espaços e a macro saberá onde a música começa extraindo a informação da planilha Songs.

Bj, Pati.

>Abertura: corte em foto do banco de imagens Stock. XCHNG.
 

Sites especializados, receitas da sogra do Humberto e, principalmente, chutes e tradições familiares. Tudo isso entrou na saborosa mistura que deu origem ao nosso inédito Ceia Calculator. A inspiração, claro, foi o ChurrasCalculator. Mas aqui a lógica é um tanto diferente. Apesar de os americanos gostarem de fazer barbecue com hambúrguer e de alguns cidadãos insistirem em gastar carvão com asa de frango, quando se fala em churrasco todo mundo pensa mais ou menos na mesma coisa: picanha, lingüiça, farofa, molho vinagrete, cerveja e por aí vai. Quando a refeição em questão é a ceia de Natal, as opções aumentam. Chester, tender, peru, lombo, leitão ou bacalhau? Vinho, sim. Cerveja? Não sei. Champagne só para brindar ou para beber ao longo da noite? Suco, adianta fazer ou a criançada vai se acabar no refrigerante? Farofa doce, salgada ou as duas? Arroz de passas, à la grega, com amêndoas ou o bom e velho arroz branco?

Enfim, tivemos que organizar a planilha de forma um pouco diferente, mas continua tudo muito fácil e prático. Você seleciona o que quer botar na mesa, diz quem serão seus convidados e o aplicativo calcula o que comprar: quantos quilos deve ter o peru, quantas panelas de arroz você vai ter que fazer, quantas garrafas de vinho serão compradas etc. Se quiser, você ainda insere o preço unitário - e fica sabendo quanto custará a festança (vale a pena? É a ceia de Natal, ora bolas!!).

Para facilitar a escolha dos ingredientes, utilizamos o recurso Caixa de Verificação. É mais ou menos como o Botão de Opção, só que, diferentemente deste último, você pode escolher mais de um item. A lógica é a mesma: o controle está "linkado" com uma célula a sua escolha. Quando a Caixa de Verificação é selecionada, o valor TRUE aparece na célula correspondente. Se a Caixa de Verificação ficar em branco,  fica o valor FALSE.  Aí é só brincar com as funções SE da vida...

Para inserir uma Caixa de Verificação, clique na guia Desenvolvedor, na seção Controles e em Inserir. Para estabelecer o link com alguma célula, clique com o botão direito do mouse sobre a Caixa de Verificação já inserida, em Formatar Controle e na guia Controle.

Abs, Pati e Humberto.

OBS A gente não pode deixar de agradecer a grandes especialistas em cozinha: Bebel, Gabi, Vera, Rô e Zeza.
 

Uma macro e recursos simples de criptografia. Assim fizemos o Sorteador de Amigo Oculto à prova de curiosos que postamos no fim de semana. O funcionamento do aplicativo é baseado em uma macro que anota em um lugar afastado da planilha o nome de cada um dos participantes da brincadeira com uma forma simples de criptografia. Na medida em que os amigos vão sendo sorteados, as informações, tanto de quem sorteou como de quem foi sorteado, são inseridas nos nomes criptografados em forma de caracteres previamente estabelecidos. No caso de alguém sortear, por acidente ou molecagem, o nome de outro participante, isso logo será notado: quando o real participante for sortear seu amigo oculto, a macro exibirá uma Caixa de Mensagem informando que ele já foi sorteado. Ou seja, melou! Aí tem que começar de novo!

A criptografia utilizada neste aplicativo é muito simples: pega-se o número do caractere e, se esse número for par, soma-se 2. Se for ímpar, diminui-se 3.

Pausa para explicar o parágrafo acima para não-iniciados: Todos os caracteres são identificados por números em uma tabela chamada Tabela ASCII (tabela fixa e igual no mundo todo, tipo a tabela dos elementos periódicos que a gente estuda em Química). Por exemplo: "abc" ficaria "^d`". Isso porque o "a"= 97 na tabela ASCII. 97 é ímpar, então diminui-se 3, resultando em 94, que corresponde ao "^" na mesma tabela ASCII.

Para retornar o número da Tabela ASCII de um caractere, na macro, utilize a função Asc("caractere"). Na planilha, utilize a função CÓDIGO("caractere"). Para identificar pares e ímpares utilizei o operador Mod, que dá o resto de uma divisão. Por exemplo: 4 Mod 2 = 0; 5 Mod 2 = 1. Desta forma fica fácil verificar se o número é ímpar ou par, não?

Asc("Caractere") Mod 2) * -5  + 2. Eis a criptografia. Evidentemente, não é esse nível de criptografia que é utilizada em bancos, sites etc.. Mas para nós serviu. 

Bem, entreguei o segredo da lógica que usamos para desenvolver a brincadeira. Mas tudo bem, a intenção do Ocio 2007 é essa mesmo. Só não se empolgue: no aplicativo que disponibilizamos, os dados, além de criptografados, estão ocultos, e a planilha foi protegida por dentro da macro que, como sempre, também está protegida. Por isso, pode confiar: esse amigo oculto será oculto mesmo.

Abs, Humberto.

>Abertura: corte em foto do banco de imagens Stock.XCHNG.

Dispositivos que sorteiam amigo-oculto nós até já tínhamos visto, inclusive usado aqui na agência. Mas dependiam de um "administrador onisciente" - ou algo parecido. Alguém, normalmente o responsável por startar a brincadeira, sempre tinha, na melhor das hipóteses, uma certa facilidade em sacar quem tinha tirado quem. Bem, senhoras e senhores, isso não acontece no nosso novo Sorteador de Amigo Oculto. Perfect timing, certo? Mesmo que você não seja chegado ao mais tradicional esquema de troca de presentes, dificilmente vai conseguir atravessar o fim de ano sem participar de pelo menos um amigo-oculto.

Na minha casa, há anos sorteamos amigos-ocultos no Natal. Só para começar, no nível mais básico de relacionamento, são cinco filhas, três cunhados e dez sobrinhos = 18 pessoas. Assim, em vez de um monte de lembrancinhas bobas, a gente consegue comprar uma coisa melhor. É uma ótima solução também para não transformar a festa numa chuva descontrolada de embrulhos. As crianças não ficam tão focadas em abrir presente, abrir presente, abrir presente; e tem mais tempo para cantar, fazer teatrinho, conversar com o Papai Noel sobre o ano que está acabando, levar o Menino Jesus para a manjedoura. Bem legal. Apenas meus pais, e os afilhados, podem receber presente fora o amigo-oculto.

Nesse Sorteador de Amigo Oculto que desenvolvemos agora, resolvemos nosso problema de uma maneira aparentemente simples, mas bem eficiente. Trata-se de uma planilha de Excel que vai ser acessada por um participante de cada vez. Se o amigo-oculto for do escritório, você pode deixá-la na rede. Se for um esquema assim tipo o da minha família, pode ficar no computador da casa mais visitada - no meu caso, em função dos almoços de sábado, certamente a dos meus pais. Você também pode pensar em mandá-la por email - importante: um participante de cada vez abre, sorteia o seu, salva e manda para o participante seguinte.

Você vai ver lá no aplicativo que tem um campo chamado Administrador. É apenas a pessoa que cadastra a lista dos participantes - aquele coitado que depois terá que explicar porque esqueceu de digitar o nome da garota do sétimo andar, ou do novo cunhado etc. Ele não terá como saber quem tirou quem. Na própria planilha, o passo a passo está bem explicadinho. Só não esqueça de HABILITAR A MACRO, tá?

Para os que ficaram curiosos, vou ver se peço para o Humberto explicar um pouco mais a lógica por trás do funcionamento deste Sorteador de Amigo Oculto - tem macro, um lance criptografado...

Bj, Pati.

>Abertura: corte em foto do banco de imagens Stock.XCHNG.

Se a gente soubesse que ia ser tão divertido fazer esses aplicativos em homenagem ao Dia das Crianças, tínhamos começado a série na semana passada. Dá uma olhada no jogo Corrida dos Dinossauros. É aquela brincadeira tradicional - de um modo não tão tradicional assim. Você joga os dados (apertando F9 em uma planilha de Excel) e move seu peão (ou melhor, seu Clip-Art) de acordo com os números que saírem. Como o ambiente é pré-histórico, os competidores são simpáticos dinossauros herbívoros e, os perigos, famintos tiranossauros, vulcões, tempestades etc.

O mais bacana desse aplicativo é que normalmente as pessoas associam planilhas de Excel a coisas "ligeiramente" mais monótonas e monocromáticas; e que conseguimos esse efeito visualmente rico, caprichado e colorido com recursos extremamente simples - nada de macro e coisas do tipo. Para começar, fizemos a festa com os Clip-Arts. As opções são infinitas. Além disso, o 2007 oferece uma gama de cores muito grande - talvez nas versões anteriores você não consiga ver o jogo como na print acima.

No mais, os dados do jogo usam randomização. Coloquei uma na célula AX4 e outra na AZ4. Os pontinhos dos dados são, na verdade, a letra "L", formatada com fonte Wingdings. Com algumas fórmulas condicionais (função SE), é só decidir quando o pontinho deve aparecer ou não. Por exemplo, repare que o pontinho do meio do dado só aparece quando cai 1, 3 e 5. Completamos o funcionamento do dado com a função OU.

Veja na planilha como ficaram as fórmulas e não se esqueça de chamar a criançada para brincar.

Abs, Humberto.

>Abertura: corte em foto do banco de imagens Stock.XCHNG.

Para encerrar a série WPC com chave de ouro, voltamos ao nosso querido e simpático Excel: Magnets. Mais um puzzle extraído do Campeonato Mundial de Passatempos de Brno.

Trata-se de vários imãs que você deve posicionar de forma que somente se toquem em pólos opostos, positivo com negativo. Parece complicado? Bem, pelo menos tentamos facilitar as coisas no Excel. Além da planilha apontar o erro quando pólos iguais se tocam, com recursos de formtação condicional, ele também totaliza a quantidade de cargas positivas e negativas, para você ver se está indo no caminho certo. Basta digitar os sinais de + ou - e colocar a moringa para funcionar.

A totalização de sinais é o já comentado CONT.SE. Bom divertimento!

Abs, Humberto

>A imagem é um recorte de uma foto retirada do banco de imagens Stock.XCHNG

Brno, segunda maior cidade da República Checa e capital da Morávia sediou o WPC em 2001. E foi deste campeonato que tiramos o puzzle de hoje, refeito no Excel para mostrar como funciona a MessageBox. O funcionamento do Star Tour está explicado lá no aplicativo. A vantagem é que pude dar uma pequena ajuda: clicando no botão "Verificar" aparece quantas questões você acertou e quantas faltam. Bom, já é alguma coisa. Agora, se quer um pouco mais de ajuda você pode acessar o site da Federação Mundial de Quebra-Cabeças e conferir a resposta na página dos puzzles de Brno.

Para fazer essa verificação, usamos uma macro que é acionada a partir do botão Verificar. É uma macro muito simples e por isso dá para falar um pouco sobre ela. Consiste em vários IF s (lembra-se da função SE?) e, no fim uma MsgBox, ou seja, aquela caixinha de diálogo que aparece dando alguma informação para o usuário. Experimente. Abra o ambiente de Macros, conforme já explicado aqui. Digite:

MsgBox "Olá mundo!", vbOK, "Minha primeira MsgBox"

vbOK é o botão que você pode utilizar na MsgBox. Quando você põe a vírgula depois da primeira frase (no caso, Olá mundo!), aparece uma listagem com várias opções, entre botões e ícones, que podem ser combinadas com o sinal de +.

Aí é só executar a macro, que pode ser atribuída em um botão, por exemplo.

Abs, Humberto.

Você é casado, usa fio dental (nos dentes, não na praia!), já comprou seu cachorrinho, gosta de fazer exercícios, tem o riso frouxo? Pois saiba que tudo isso colabora para estender seu prazo de validade aqui na Terra. Por outro lado, entornar todas, semear o pessimismo, dirigir que nem um louco e não investir em relações afetivas pode te levar a bater as botas mais cedo. Depois de me ocupar do Bolão Pé na Cova e de ler que o homem mais velho do mundo fez 112 anos na semana passada - querendo continuar ainda muito tempo  nesta nossa dimensão -, resolvi mergulhar numa intensa pesquisa para desenvolver um aplicativo capaz de revelar quantos anos cada um de nós vai viver.

A parada considera desde coisas óbvias a descobertas recentes da ciência. Se você dirige que nem um louco, por exemplo, perde pontos. Mas perde pontos também quem não cuida corretamente dos dentes e gengivas - já que 78% das endocardites bacterianas, uma inflamação da parte interna do coração, são causadas pela falta de limpeza nos dentes (eca!). Se você é casado ou pretende se casar, fica bem na fita. Em compensação, se é casado e mora com a sogra, pode cair no ranking.

Como dá para perceber, além de não subestimar o poder do estresse domiciliar, nós levamos em conta uma enorme lista de variáveis: que lugar as gorduras ocupam na sua alimentação? A religião é o ópio ou a salvação do povo? Seus parentes costumam se mudar para o andar de cima cedo ou tarde? Naturalmente, no final tudo será calibrado pelo inexorável fator sorte. Té, amanhã!

Bj, Pati.

>Abertura: montagem em foto do Banco de Imagens Stock.XCHNG

Falamos, falamos, falamos e... Não linkamos a tal ferramenta para controle de bolões como o Pé na Cova, do Cocadaboa. Bem, aqui está ela. Além de recursos como o Localizar e os Filtros - sobre os quais falamos no post de ontem - esse aplicativo usou também uma tabela dinâmica. É ela que organiza o ranking dos defuntos das almas que renderam mais pontos.

Para fazer uma Tabela Dinâmica, a primeira coisa é selecionar as células onde estão os dados. Note que seus dados devem conter rótulos de campos, ou seja, uma primeira linha com o nome de cada coluna. Depois, na guia Inserir, seção Tabelas, clique em Tabela Dinâmica. Surge uma janela para você definir o intervalo de dados e escolher se quer a Tabela Dinâmica na mesma planilha dos dados ou em uma nova planilha.

Feito isso, já aparece na planilha a área onde será criada a Tabela Dinâmica e uma janela ao lado. A partir daí o processo é bem intuitivo: em Escolha Os Campos Para Adicionar ao Relatório, na janela ao lado, clique na frente dos campos que deseja adicionar à Tabela Dinâmica.

Você pode alterar algumas configurações. No nosso Bolão Pé na Cova, em vez de somar, que é a operação padrão da Tabela Dinâmica, usamos a operação Contar - para estabelecer quantas vezes cada nome aparece - e a operação Máximo - para estabelcer quantos pontos cada morto gerou. Clique com o botão direito do mouse sobre a coluna que você quer configurar e escolha a opção Configurações do campo de valor. Será exibida uma janela onde serão listadas algumas funções do Excel, é só escolher.

Pronto, agora é só ficar na torcida.

Abs, Humberto

Como a Babi registrou no post anterior, o aplicativo Nomes e seus Significados bateu todos os recordes de download do Ócio. Ainda falávamos da planilha da Mega-Sena - que foi baixada 430 vezes em três dias - quando a brincadeira de sortear nomes + significados bateu nada menos que 3.597 downloads também em três dias. Um salto de mais de 700%. Bem, isso merecia uma comemoração. Aproveitando a quantidade de comentários que recebemos de leitores do blog perguntando sobre o significado de nomes que não estavam incluídos nas primeiras versões da planilha - afinal eram só 200 e poucos - resolvemos disponibilizar uma nova edição. Com o dobro de opções!

Entre os hollywoodianos, você agora também tem, por exemplo, Lily-Rose Melody (filha do Johnny Depp) e Paris (filha do Michael Jackson). Potira - que significa flor - foi um dos adicionados entre os  brasileiríssimos. Ao acrescentar um nome, ao meu ver, imperdoavelmente ausente na planilha anterior, tive a grata surpresa de descobrir que seu significado é mais bonito ainda: Humberto = Espírito brilhante.

Abs, Humberto.

Leia também:
- Nomes e Seus Significados
- Nomes de Bebês à La Carte
 

- Nomes com Significados e outras Brincadeiras para Crianças
 

Faz tempo que a gente queria liberar os gráficos do Excel de sua triste e quase monocromática sina.  Gráficos de pizza, tabelas, gráficos de pizza, tabelas, gráficos de pizza, tabelas. A vida é muito mais do que isso, gente!! Partindo do nosso Simulador Populacional de Leporídeos, resolvemos experimentar pelo menos dois formatos novos: o gráfico de superfície e o radar. Primeira constatação: os dados que tínhamos em mãos não eram os ideais para isso. Mas e daí? Alguém aí está preocupado em traduzir números?

Bem, nós, não. Pelo menos na hora do ócio...

No primeiro, a linha inferior do gráfico representa as fêmeas e a superior os machos. As cores representam as quantidades de indivíduos e a evolução horizontal desta superfície maluca é o tempo. Por exemplo, no início do gráfico, da direita para esquerda, temos os machos na parte superior com a cor vermelha: isto indica que na data correspondente tem de 2 a 4 indivíduos. Confuso? Mas que ficou bonito, ficou!

Usamos o gráfico radar para mostrar a mesma evolução resumida na tabela dinâmica. Aparecem números de 0 a 8 informando quantos indivíduos correspondem a cada linha radial. As linhas que partem do centro e as superfícies mostram quantos indivíduos machos e fêmeas nasceram em cada data, representados por cores, conforme informa a legenda.

Para dar informações mais precisas sobre a população de coelhos utilizamos um gráfico de pizza, um de coluna e outro de linha - vocês realmente acharam que eles ficariam de fora? O interessante aqui são as opções de formatação do Office 2007. Algumas estão na guia Design - quando o gráfico está selecionado. Outras opções você obtém com o botão direito do mouse, sobre a área que deseja formatar.

Quanto aos dados, toda a vez que você quiser saber de onde vêm os dados de um gráfico, novamente o jeito mais rápido é clicar com o botão direito do mouse sobre o gráfico e clicar em Selecionar Dados.

Abs,  Humberto

Os matemáticos que me desculpem, mas não há estatística mais poderosa que a sorte. No nosso Sorteador de Números para a Mega-Sena, você pode deixar a escolha totalmente nas mãos do destino ou selecionar alguns critérios - tipo aleatório entre os dez números que mais saíram na história do sorteio, aleatório entre os dez que menos saíram etc. O próximo rateio está acumulado em cerca de 45 milhões. Tá esperando o que?

Um dos critérios está relacionado a datas escolhidas pelo usuário. Os recursos que utilizamos para obter um número a partir de uma data foram as funções de data (DIA, MÊS e ANO) e a função LOCALIZAR. O raciocínio é o seguinte: pegamos a data de uma célula e colocamos dentro da função DIA, somamos com a função MÊS, também com a data dentro, e repetimos o processo com a função ANO. Obtemos a soma do dia, mês e ano. Depois somamos cada algarismo:

25/11/1970 ->25+11+1970 = 2006 -> 2+0+0+6 = 8. Essa é a idéia. Mais ou menos como se usa na numerologia.

Para somar cada algarismo, usamos quatro funções LOCALIZAR, que serve para retornar quantos caracteres você quiser de dentro de um texto. Por exemplo:

= LOCALIZAR ("2008", 4,1) resultará em "8". O número 4 da função funciona como um índice dentro do texto e o número 1 diz a quantidade de caracteres que a função irá retornar. Então, se quisermos somar os algarismos de 2008, faremos o seguinte:

= LOCALIZAR ("2008", 1,1)+ LOCALIZAR ("2008", 2,1)+ LOCALIZAR ("2008", 3,1)+ LOCALIZAR ("2008", 4,1)

Não se trata de incentivar ou jogo nem nada parecido. Mas, como gosta de dizer a Pati, a única certeza que a gente tem é que, se não jogar, não ganha.

Abs, Humberto.

Faça o Download:
- Mega-Sena
- Excel | 286 kb
 

Leia também:
- Sorteador de Prêmios
- Sorteador de Amigo Oculto
 

>Abertura: corte em foto do Banco de Imagens Stock.XCHNG.

 

Bjos,

Babi.

> Abertura: corte em foto do Banco de Imagens Stock.XCHNG.

Adaptar um "clássico" não é das tarefas mais fáceis, mas resolvi aceitar o desafio e aqui está a nossa versão para a Planilha de Churrasco que calcula ingredientes a partir da lista de convidados. Sobre a original, vocês sabem, falamos neste post.

A inspiração para a brincadeira foi a festa de aniversário do meu filhote. Resolvi comemorar com um churrasco e, quando estava diante da lista de convidados,  pensei: que tal uma planilha que parta da lista de convidados, antes de falar em ingredientes? Afinal, nem sempre temos somente homens e mulheres em um churrasco. E as crianças? E os idosos? Até a bisavó do meu filho ia estar lá, será que ela come carne na mesma proporção que os demais? E tem também a galera que come por dois, aqueles que só tomam refrigerantes, aqueles que entornam todas. Percebi que o poder da planilha podia ser estendido.

Comecei abrindo uma nova planilha e me empolguei. Fui copiando e colando informações, organizando fórmulas, decidindo quais os critérios iria utilizar, quando ouvi o meu nome sendo gritado ao longe: estava atrasado para as compras. Bem, tive que adiar meu projeto.

Mas agora está aí: você faz a lista de convidados e estabelece, um a um, quem é homem, mulher, criança e até vegetariano. E não pára por aí, você também deve dar uma nota de 1 a 3 para o apetite da galera e de 0 a 3 para a capacidade que cada um tem de bebericar. Assim, até quem toma só refrigerante é contado. Para finalizar, você ainda pode colocar o preço unitário de cada ingrediente e a planilha informa de quanto será o furo em seu cartão de crédito.

Esta é uma planilha muito simples. Utiliza, além das quatro operações, as funções CONT.SE, SOMASE, SE e Validações - para os Drop Down em cada uma das células dos convidados. Vários parâmetros para os cálculos estão ocultos. Para exibi-los, vá até a planilha Convidados, selecione as colunas G e Q, clique com o botão direito em qualquer lugar da área selecionada e escolha Exibir.

Abs, Humberto.

Faça o download:
- Churrasco!
- Excel | 82 kb

Leia também:
- Para Queimar o Chocolate da Páscoa
- Conversor de Cerveja
- Churrasco e Cerveja
- Feijoada Calculator
- Ceia Calculator

Sub minhaMacro()

Acima, a instrução Sub e o nome da macro dando início a macro

Dim meuNome                                                                               a declaração da variável

meuNome = Humberto                                                          atribuindo a palavra Humberto a

variável - repare nas aspas

MsgBox Meu nome é & meuNome                  MsgBox faz aparecer uma caixa de mensagem com o texto Meu nome é (entre aspas de novo) o operador de concatenação de texto & e a variável meuNome, colocando o conteúdo dela na mensagem

fim da macro

End Sub

Em função do comentário do Esteban, feito no post de ontem, fui dar uma revisada no nosso Simulador Populacional de Leporídeos. Um dos motivos pelos quais ele estava tendo dificuldades é que, para calcular a quantidade de machos adultos e fêmeas adultas, eu tinha usado a fórmula CONT.SES, que só existe no 2007. Nas versões anteriores o que existia (e continua até hoje) é a função CONT.SE.

A CONT.SE é uma função em que você informa um conjunto de células e um critério. A função conta quantas células atendem esse critério e retorna o número correspondente. O que acontece é que a função CONT.SE só atende a um critério e trabalha com um só conjunto de células. Como, em nosso caso, precisávamos retornar o número de machos (ou fêmeas) - um critério - que sejam adultos - outro critério - precisamos utilizar a função CONT.SES, em que é possível colocar vários critérios.

Para que a mesma planilha atenda também às versões anteriores, a solução que encontrei foi estabelecer uma condição para cada linha (função SE). Se, em uma linha contiver um macho e, ao mesmo tempo, for adulto, aparece o número 1, caso contrário, 0. Aí foi só somar tudo com uma função SOMA.

Embora esta tenha sido uma solução simples, custou milhares de funções SE na planilha e alguns KBytes a mais.

Abs, Humberto

>Abertura: corte em foto do Banco de Imagens Stock. XCHNG.

O recurso mais legalzinho dessa planilha é a formatação condicional que usaram no Simulador de Animação. Mas, como já falamos sobre formatação condicional e inspirados pela chegada do final de semana, resolvemos postar também o Break Even da Cachaça - outro aplicativo que tem rodado a rede (desse eu não consegui descobrir a origem. Se alguém souber, por favor avise que a gente dá o crédito). Você escolhe que horas quer começar o bundalelê e especifica a quantidade e a qualidade da bebida. Ao lado, um gráfico vai mostrando a quantidade de álcool no sangue do indivíduo - maior de 18 anos! - em questão.

Nesta planilha, existem dois controles de formulário sobre os quais ainda não falamos: o Caixa de Combinação e o Botão de Rotação. Como acontece com os botões de opção, assunto deste post, a configuração do controle se dá na janela de formatação.

Clique na guia Desenvolvedor e, na área Controles, no botão Inserir. Escolha o Caixa de Combinação e  clique no local da planilha onde você quer que ele apareça. Para mudá-lo de posição basta arrastá-lo. Para redimensioná-lo, arraste pelas alças (bolinhas brancas ao redor).

Para configurar o controle, clique com o botão direito do mouse sobre ele e em Formatar Controle. A janela será aberta na guia Controles. No caso do Caixa de combinação, você terá que preencher:

- Intervalo de entrada: são as células de onde o Excel pegará as  informações para jogar dentro do campo Caixa de Combinação.
- Vínculo da célula: em que célula aparece a escolha do usuário (1 para a primeira opção da lista, 2 para a segunda e assim por diante)
- Linhas suspensas:  que é o tamanho em linhas do menu, quando aberto.

Para configurar o Botão de Rotação, o processo é o mesmo. Só os campos mudam. Veja:

- Valor atual: é o valor no exato momento em que você clicar no controle.
-Valor mínimo:  é o menor valor que o controle aceita
- Valor máximo: o valor limite
- Valor incremental:  decide  se ele vai alterando de 1 em 1, de 2 em 2 etc.
- Vínculo de células: célula onde aparecerá o valor escolhido

Leia também:
- Para Queimar o Chocolate da Páscoa
- Conversor de Cerveja
- Churrasco e Cerveja II
- Feijoada Calculator
- Ceia Calculator

Acabei de atualizar o quadro de medalhas e tive uma grata surperesa: Brasil está em segundo! Só para lembrar, a expectativa antes do início do Pan é que o Brasil ficasse em terceiro, superando o Canadá. Hoje passamos à frente de Cuba!

Se você ainda não tem o quadro de medalhas do Excel, confira este post. Para os que já baixaram, basta abrir e atualizar. Não esqueça de clicar no botão Clique aqui para concluir a atualização para ver a posição atual do Brasil.

Abs, Humberto

Olha o mesmo jogo aqui de novo!

 
Bj, Pati.

> Atualização: Achei melhor tirar o link lá do início para o PacMan depois que encontrei essa observação na página da Neave. Mas agora vocês já sabem que é fácil inserir arquivos como objetos no Excel.

Para a Jennifer e todos aqueles que, como ela, pretendem viajar para o Oriente Médio - e não para Paris ou Madri - aqui vai uma planilha de viagem toda estruturada, com atualização automática da cotação do dólar e do euro,  mas aberta em relação a destinos e demais gastos. Divirtam-se!

Com esta encomenda entregue, gostaria de voltar só mais uma vez à planilha que postamos ontem, para explicar o funcionamento do recurso Solver  - na linha do Atingir Meta, mas mais poderoso.

Enquanto o Atingir Meta só consegue mexer com uma variável, o Solver não tem essa limitação. O Solver evita, por exemplo, que você tenha que diminuir drasticamente um só item. Com ele, é possível equilibrar melhor os cortes.

Antes de qualquer coisa, é preciso entender que o Solver é um suplemento, ou seja, não aparece no Excel a não ser que você o instale. Para fazê-lo é simples: clique no Botão do Office e em Opções do Excel. Na janela que aparece, clique em Suplementos. Na parte inferior da Janela, escolha Gerenciador de Suplementos e, em seguida,  Solver. Após a instalação, o Solver  poderá ser localizado na guia Dados.

Bem, vamos, então,  à  viagem. Digamos que eu decida que o total de gastos não deve passar R$ 5.800,00. Posso estabelecer que quero chegar a esse valor mexendo:

(1)    No transporte de Barcelona para Paris e de Paris para Madri. Cada um desses gastos deve ser igual ou menor que  100 euros.
(2)    Na hospedagem, de modo que seu preço unitário fique igual ou maior que 20 euros.
(3)    Nos almoços: igual ou maior que 8 euros.



Clique na guia Dados e em Solver. Na janela que aparece, defina a célula destino como I28 (a célula com o total gasto); selecione a opção Valor De e digite 5800 na caixa ao lado. Em seguida, defina Células Variáveis com "$H$6:$H$7;$D$17;$D$25". Entenda que $H$6 é a referência para hospedagem, $H$7 para o almoço (separados com dois pontos só porque estão adjacentes), e $D$17 e $D$25 são as células com os valores de transporte. Clique em Adicionar e coloque as condições, conforme o print abaixo.

Clique no botão Solver. O total ficou em 5800, a hospedagem em 20 euros, as passagens em 100 euros e o almoço em 9,09 euros. Razoável, não?

Só faltava uma coisa para fechar a conta: achar um trem que se encaixasse nesse orçamento. E encontramos um por 103 euros! Pronto...

Abs, Humberto.

>Abertura: corte em foto do Banco de Imagens Stock.XCHNG.
 

Conhecer a Europa é o sonho de muita gente. Inclusive o nosso! Por isso eu e o Humberto resolvemos montar uma planilha para entender melhor quanto falta para chegarmos lá. Clique aqui para baixá-la. Como ainda deve demorar um pouco, demos um jeito de a cotação do euro ser atualizada automaticamente. Do Banco do Brasil para a nossa planilha, sem escalas - recurso esperto, esse.

Em princípio pensamos em 15 dias, por Barcelona, Madri e Paris. Neste exercício estamos considerando a hospedagem em albergues. Alguém tem algo a dizer sobre isso, dicas?? Vale a pena comprar um passe de trem ou é melhor calcular separadamente os deslocamentos internos?

Em Barcelona estamos esperando gastar um pouco mais na balada, mas não pagar nada para ver a espetacular Sagrada Família; além de passear pelo Bairro Gótico, o Parque Guell e entre os prédios do Gaudí.

Madri tem o Museu do Prado, uma day trip para Toledo. E, Paris, uma infinidade de atrações! Tanto que estamos pensando em comprar um passe de dois dias que dá direito a conhecer o Arco do Triunfo, o Louvre, o D Orsay. Até pensei em pagar um de quatro dias, mas, como vamos (se Deus quiser!) visitar Versailles em um tour separado, talvez não valha a pena. Na planilha tem um link para esse (e outros) serviço; dá uma checada.

Você vai ver que a nossa tabela está cheia de comentários com os endereços desses lugares que estamos pesquisando. Ela já tem também aquela atualização da cotação do euro e do dólar sobre a qual falei logo no início. Esse recurso funciona assim:

Com a planilha aberta, clique na guia Dados e no botão Da Web. Você verá essa janela:

Aí, é só escolher o site que tem as informações que você precisa, no caso, cotações de dólar, euro, etc. Se o site tiver disponível esse serviço de atualização para o Excel, serão exibidas setas amarelas que indicam links atualizáveis. Basta clicar no que você precisa (a seta ficará verde) e clicar no botão Importar. O Excel perguntará em que célula deseja inserir os dados. Voilá! A partir daí, sempre que o arquivo do Excel for aberto, será requisitada uma atualização. Mas se quiser uma atualização imediata, clique em Atualizar na seção Conexões da guia Dados.

Bem, ainda falta preencher algumas coisas. Quem puder ajudar - com sugestões de passeios, de hospedagem, restaurante - por favor, help! Depois vamos ver como fica. Se passar do nosso budget, vamos ter que aplicar o Go Seek ou o Solver. Já viu esses dois recursos funcionando? Eles ajustam valores anteriores da planilha para chegar a um resultado estipulado  - no caso, a grana que pretendemos ter para gastar.

Bj, Pati e Humberto.

>Abertura: corte em foto do Banco de Imagens Stock.XCHNG.
 

Quem gosta de automobilismo, assim como eu, costuma ser tão, mas tão fanático que não é raro vermos disputas para saber quem conhece mais sobre uma determinada categoria ou piloto. Para entreter um pouco mais os aficcionados pelos esportes a motor, e também quem deseja conhecer mais sobre o assunto, lançamos no Ócio o Desafio dos Capacetes para Excel, que pode ser baixado aqui.

A brincadeira consiste em relacionar a quem pertencem capacetes de 100 pilotos que marcaram presença pelos paddocks da Fórmula 1 mundo afora em diferentes épocas. Alguns são inesquecíveis e um tanto fáceis de descobrir. Já outros...

Quando mostrei o aplicativo por aqui, o desafio rendeu conversa de quase uma hora. Com a planilha aberta em um dos computadores, o pessoal se reuniu para tentar lembrar - ou chutar - de quem eram os famosos cascos. Até quem não entende muito do tema se animou com o assunto e deu, pelo menos, uma espiada para saber do que se tratava tamanho rebuliço.

Desenvolvido em Excel, o teste pode ser montado com funções como a SE, a E e a OU - mas isso, a gente explica amanhã.

Em tempo: a idéia do quiz surgiu no blog da apresentadora do Sportv, Vanessa Riche, com um teste sobre escudos de times de futebol desenvolvido por Vitor Eidelman. Para fazer a brincadeira sobre automobilismo, juntou-se ao time o blogueiro Ivan Capelli. Ele ajudou a desenvolver o Desafio dos Capacetes e também o das Pistas, que pode ser baixado aqui. Esse último, para mim bem mais complexo, desafia o usuário a adivinhar o nome de 100 pistas do mundo todo em seus traçados antigos ou remodelados.

Atenção: aguarde que postaremos o gabarito completo aqui no Ócio para não deixar ninguém curioso. Enquanto isso, você pode deixar um comentário com as suas impressões do desafio, se achou fácil, difícil, se levou horas ou apenas cinco minutos para completá-lo. Divirta-se!

Beijos,

Babi.

>Abertura: montagem com foto do banco de dados Stock.XCHNG.

Quantas medalhas de ouro o Brasil vai trazer para casa? Quer dizer... Em casa elas já estão, né? E de prata? E de bronze? Como todo mundo tem direito a um palpite, resolvemos fazer outro bolão. Baixe aqui o aplicativo.

Este bolão funciona de forma parecida com o anterior: quem tiver maior número de acertos ganha. Sugerimos percentuais que privilegiam o acerto do número de medalhas de bronze. Obviamente, as de ouro são mais importantes,  mas, vamos e venhamos, acertar as de bronze é muito mais difícil, certo? De um jeito ou de outro, você pode alterar os percentuais quando quiser.

Os dois bolões tem a mesma lógica de funcionamento e utilizam um recurso muito interessante: o SOMASE. É uma soma condicional. Usamos esse recurso para calcular o total acumulado, de forma que a planilha somente some as apostas que tiverem sido feitas dentro da data limite.

Você pode solicitar o assistente de função clicando em um "fx" logo acima do cabeçalho de colunas (barra que contém as letras relativas às  colunas) e clicando sobre a função SOMASE .

No print acima, o primeiro argumento a ser preenchido (Intervalo) refere-se a quais células o Excel deverá verificar se a condição que você estipulará em seguida é verdadeira. O segundo argumento (Critérios) é a condição: pode ser uma célula, uma expressão (que ficará em forma de texto) ou um número. O terceiro argumento são onde estarão as células que o Excel deverá somar. No caso deste último ser omitido, ele considera as células do primeiro argumento.

No exemplo acima, somente serão somados os valores que estiverem nas linhas correspondentes aos valores da primeira coluna que forem maiores que 2000.

Abs, Humberto.

Foi inevitável. Bastou o primeiro dizer que o Brasil tinha goleado o Uruguai no primeiro jogo do Pan que começaram os palpites sobre quem vai se dar bem nos jogos do Rio e quem vai afundar. Naturalmente, a conversa desembocou em um bolão: Quem vai ficar em primeiro na classificação geral? E em segundo? E em terceiro? O aplicativo tem algumas variáveis, com as quais você pode dar uma customizada na brincadeira.

Funciona assim:  primeiro você estabelece uma data limite para as apostas  - e avisa à galera, para não aparecer um espertinho querendo participar quando a competição já estiver avançada. Você determina o valor da aposta e ainda pode alterar os percentuais relacionados com os acertos. Estabelecemos percentuais para três acertos, dois acertos e um acerto, mas, como todo mundo sabe que os Estados Unidos devem ficar em primeiro, você pode anular a possibilidade de ganho com um só acerto. Basta botar 0% do lado de "um acerto", certo?

Você coloca o nome do participante e a data do pagamento correspondente à aposta - importante, pois o prêmio só é fornecido a quem fizer o pagamento dentro da data limite que você estabeleceu. Disponibilizamos uns menus drop-down para facilitar o palpite.

As informações sobre a classificação dos primeiros lugares são inseridas automaticamente em sua planilha e atualizadas toda a vez que você a abre, como no Quadro de medalhas. O que conta para ganhar é o número de acertos entre os 3 primeiros lugares. Você verá que, na medida em que acertos vão ocorrendo, a linha correspondente muda de cor.

Para tornar tudo isso possível, utilizamos vários recursos que já comentamos em outros posts: formatação condicional, funções condicionais e o recurso que utilizamos de atualização remota do Quadro de medalhas.

A novidade fica por conta de dois recursos utilizados simultaneamente: função condicional e link para outra planilha na web. Fizemos isso para que os primeiros lugares só apareçam na sua planilha quando dermos um primeiro "ok" na nossa. A fórmula ficou assim:

=SE(http://www.ocio2007.com.br/stuff/[Quadro_de_

medalhas_atualizador.xls]Classific!$I$1=ok;http://www.

http://www.ocio2007.com.br/stuff/[Quadro_de_

medalhas_atualizador.xls]Classific!$C$6;)

Façam sua apostas e bom divertimento!

Abs, Pati e Humberto.

>Leia também: Calendários do Pan 2007 no seu Outlook.

>Abertura: montagem com foto do Banco de Imagens Stock.XCHNG.
 

Aqui está o Quadro de Medalhas do Pan 2007 sobre o qual a gente falou neste post. Agora, ao alcance de um clique você tem o quadro de medalhas sempre atualizado em seu computador. Depois de baixar a planilha uma vez, sempre que você abri-la verá uma mensagem dizendo que o arquivo  precisa ser atualizado. Confirme a solicitação - no Excel 2007 em uma barra, no 2003 em uma pequena janela - e as totalizações das medalhas serão automaticamente atualizadas.

Só para lembrar, toda a vez que um arquivo do Office tiver uma macro, esta será bloqueada por questões de segurança. Se você está baixando o arquivo diretamente do Ócio 2007, pode ficar despreocupado: nossas macros são protegidas por senha e livres de códigos maliciosos. Mas você precisará baixar a segurança de macro para o quadro funcionar. Nas versões anteriores: menu Ferramentas, Macro, Segurança. No 2007:  Guia Desenvolvedor, botão Segurança de Macro. Importante: nos dois casos, depois de fazer esses procedimentos, será preciso salvar, fechar e abrir novamente sua planilha para as alterações terem efeito.

O segredo para todo esse grau de automação da atualização remota das medalhas é muito simples: uma fórmula que, além de fazer referência a uma planilha e a uma célula, contém um endereço de WEB. Basta digitar:

=http://www.ocio2007.com.br/stuff/[Quadro_de_medalhas_atualizador.xls]Quadro de Medalhas!D6

Só precisa digitar certinho: repare que o nome do arquivo (Quadro_de_medalhas_atualizador.xls) aparece entre colchetes e todo o endereço (URL, nome do  arquivo e nome da planilha) entre apóstrofes. Tem também a conhecida exclamação antes da célula. Pronto, o Excel vai buscar o que estiver naquela célula e naquele endereço.

Abs, Humberto.