Usando a planilha como formulário VBA.

Excelente ideia: Sim!

Usando a planilha como formulário VBA.

Puxa, faz tempo que não posto nada. Sorry. rs.

Bom, vi um post num forum com essa dúvida, como transformar uma planilha em um form e como cadastrar os dados em plan2, como um banco de dados. Na verdade, é mais fácil, criar um form do proprio Excel e fazê-lo executar na planilha, mas o resultado final fica

Para melhor entendimento, baixe o arquivo de exemplo, clicando aqui.

Segue o código que criei, no botão de comando na plan 1:

Private Sub CommandButton1_Click()
On Error GoTo 1 'Inibe a mensagem de erro, caso ocorra, encerrando a macro.
Dim linha
linha = 2
While Plan1.Cells(5, 6) <> "" And Plan1.Cells(7, 6) <> "" And Plan1.Cells(7, 9) <> "" ' Campos do form (Planilha)
'Por exemplo, Plan1.Cells(5, 6), se refere a célula F5 (Linha 5, Coluna 6) - Daí por diante, ok?

While Not (IsEmpty(Plan2.Cells(linha, 1)))
linha = linha + 1 ' Incremento
Wend

Plan2.Cells(linha, 1) = Plan1.Cells(5, 6)
Plan2.Cells(linha, 2) = Plan1.Cells(7, 6)
Plan2.Cells(linha, 3) = Plan1.Cells(7, 9)

'Limpeza dos campos da planilha form:
Plan1.Cells(5, 6) = ""
Plan1.Cells(7, 6) = ""
Plan1.Cells(7, 9) = ""
Wend
Plan1.Cells(5, 6).Select ' Seleciona a primeira linha do form
1:
End Sub

 Bom, é isso aí!

Espero tê-los ajudado.
Abraço.

João Lopes Junior

Feliz dia dos Namorados!

"O amor é grande e cabe nesta janela sobre o mar. O mar é grande e cabe na cama e no colchão de amar. O amor é grande e cabe no breve espaço de beijar." - Carlos Drummond de Andrade.

Excelente ideia: Sim!

Aproveitando a ocasião do Dia dos Namorados, deixo-lhes o viral da Vivo Eduardo & Mônica, que utiliza a canção de igual nome, da banda Legião Urbana. Muito bem feito!

E para minha esposa, eterna namorada, deixo um beijo apaixonado e o vídeo abaixo. Te amo muitoooooo!

Feliz dia dos Namorados!

João Lopes Junior



Curva ABC - Modelo para Download.

"A Matemática não mente. Mente quem faz mau uso dela." Albert Einstein

Excelente ideia: Sim.

Saudações,

Atendendo a pedidos, disponibilizo um modelo de curva ABC, as fórmulas estão no arquivo. Analisem e alterem a vontade.

Se você deseja entender o funionamento da Curva ABC, acesse a postagem anterior sobre o assunto, clicando aqui.

Para baixar o arquivo de exemplo, clique aqui.

Forte abraço.

Jesus abençoe nosso dia.

João Lopes Junior

Como descobrir a idade de alguém.

"Água mole e pedra dura, gasta a água e molha a pedra"

Excelente ideia: Sei lá...

Descobrir a idade de alguém é moleza, agora, para que isso vai servir? Também não sei...
Mas vamos ao que interessa (interessa?), duas formas simples:

1ª) Basta dizer:
- Vou fazer uma mágica e descobrir sua idade. A propósito, você nasceu em que ano?
 - Eu nasci em 1918.
 Daí você só precisará subtrair o ano atual por 1918.
Ex.: 2011-1918= (93 - Idade da pessoa). Tcharããããã. Isso é mágica?! rsrsrsrs.

2ª) Peça para a pessoa fazer fazer os seguintes procedimentos:

1. Escrever um número de dois algarismos.
2. Multiplicar o número escrito por dois.
3. Somar cinco unidades ao produto obtido.
4. Multiplicar esta soma por cinqüenta
5. Somar ao produto o número 1761.
6. Subtrair o ano do nascimento.

Exemplo:

1. O número pensado é 91.
2. O produto deste número por dois é: 91x 2 = 182.
3. Somando cinco unidades: 182 + 5 = 187.
4. Multiplicando a soma obtida por 50: 187 x 50 = 9350.
5. Somando o número 1761: 9350+ 1761 = 11111
6. Subtraindo o ano de nascimento, vamos supor que a pessoa que realizou os cálculos nasceu no ano de 1983, portanto, tem 28 anos ou vai completar 28 anos.
   11'111- 1983= 9128. - Os dois primeiros números são os que foram inicialmente pensados, depois aparecem os números correspondentes a idade da pessoa.

Este post mudou a sua vida, não? Rsrs.

Abraço.

Jesus abençoe nosso dia!

João Lopes Junior

Kanban e Just-in-time

"A curiosidade e a produção do conhecimento no homem muitas vezes supera qualquer prazer carnal, distinguindo-o dessa forma de qualquer animal" Thomas Hobbes.

Kanban e Just-in-time.

Excelente Ideia: Claro!



A palavra Kanban tem origem japonesa e significa cartão, ou ainda, etiqueta. É um sinalizador com instruções para a produção adequada de itens, nem mais, nem menos. Foi criado no modelo de Produção da Toyota (Produção enxuta).

Custa muito mais barato utilizar o Kanban para evitar faltas em processos de produção do que utilizar recursos tecnológicos caros, como CLP, sensores, etc.

Regras Kanban:

ü A retirada do estoque só pode ser feita quando realmente for necessário. “Ei, me adiante mais 15 latas de tinta, pois esse meio metro quadrado de parede está dando um trabalho danado!”

ü A produção de um determinado item só poderá ocorrer com o Kanban específico do item e na quantidade exata. “Vai produzindo aí que já trago o cartão...”

ü Somente peças boas são colocadas em estoque. Logo, elas passam por uma adequada verificação de qualidade. “Eu fiz esse boneco do Ben-10, mas ele está bom, só faltou o braço, vai ver é um primo distante do Saci...”

ü Os cartões ficam nos quadros. “Ai que droga, pisei num papel molhado aqui no banheiro, olha gente, nunca tinha visto um Kanban marrom!

Não confundir Kanban com Just-in-time!

Just-in-time é um sistema de administração da produção em que nada é produzido ou pode ir para a próxima etapa de produção (transporte) ou ainda comprado, senão na hora exata! Propicia uma grande redução de estoque. Isso diminui também o número de fornecedores, o que tem de ser analisado com cautela. Existe a necessidade de integração e treinamento dos fornecedores, para evitar eventuais problemas de fornecimento.

Ex.: Numa fábrica de automóveis as portas para o modelo XYZ deverão chegar no dia 07/04/11, às 11h22 na linha de montagem.

Utilizando Kanban e Just-in-time teremos a produção de itens com alta qualidade e na exata quantidade (Kanban) e no tempo exato (Just-in-time).

O kanban também é utilizado no Gerenciamento Ágil de Projetos (Scrum), e pode ser utilizado nas rotinas de uma empresa de forma adaptada. 

É isso aí! Até o próximo post!

Comentário sobre a frase do início do post:

Essa frase do Thomas Hobbes é meio esquisita, né? Primeiro o camarada afirma que o homem é o lobo do homem, depois manda uma dessas...Hummm...Muito estranho! Hahahhaahaha.

Forte abraço.

Jesus abençoe seu dia.

João Lopes Junior

Função SE

"Todos nascemos sem nada. Tudo o que adquirimos depois é lucro." Sam Ewing

Excelente Ideia: Ah, é sim!

Essa função é utilizada para retornar um determinado valor após realizar um teste lógico.

Teste lógico:

A ajuda do Excel define teste lógico como: “qualquer valor ou expressão que possa ser avaliado como VERDADEIRO ou FALSO”.

Como assim? Moleza, veja só:

Supondo que minha vó vá ao shopping fazer umas “compritas”. Daí, eu digo assim: Vovó, já que a senhora vai ao Shopping, e eu terei de trabalhar, por favor, me compre uma camisa roxa com bolinhas amarelas. Só serve se for roxa com bolinhas amarelas! Caso não encontre a camisa do jeito que eu pedi, não precisa trazer, ok? Obrigado, vovó.

 Ahn? O quê, vovó? Ah, a senhora quer o dinheiro? Ah, ta, Vovó... Poxa... Quase me dei bem! Rsrs.

No exemplo acima, o teste lógico envolve a compra da camisa. Se a Vovó encontrar a camisa ela trará( VERDADEIRO), senão, não trará(FALSO).

A sintaxe desta fórmula no Excel é a seguinte:

SE(teste_lógico;valor_se_verdadeiro;valor_se_falso)

SE(VOVO_ENCONTRAR A CAMISA ENTÃO COMPRARÁ SENÃO NÃO COMPRARÁ).

Veja o exemplo abaixo:

Em B7 está a descrição do Produto comprado, em C7 está o teste lógico: Vovó encontrou? VERDADEIRO ou FALSO? E em D7 aparece o valor, verdadeiro ou falso, na função SE.

Ficou assim:

=SE(C7="SIM";"Compre vovó";"Não compre vovó")

O texto que será retornado na função SE deve ficar entre aspas (Ex.: “SIM”; “Compre vovó”; “Não compre vovó”). E para facilitar sua compreensão, pense no primeiro “;” como Então e o seguinte como “;” Senão.

Nem toda função serve para fazer cálculos, como você pôde ver.

Vamos fazer mais um exemplo juntos?

Quando eu dava aulas era um dos exemplos mais usados em cursos de informática:

Se o aluno tiver a média maior ou igual a sete ( Se o cara tirou sete ou mais), então “Aprovado” senão “Reprovado”.

Ficaria assim:

=SE(I6>=7;"Aprovado";"Reprovado")

Lembra-se do maior ou igual a 7? É o sinal de maior (>) e o sinal de igual(=), o 7 é a média. E o texto que será exibido fica entre aspas (“Aprovado” e “Reprovado”).

Clique aqui para baixar o arquivo com os dois exemplos. Faça testes alterando as notas dos alunos e também colocando Não na compra da minha camisa roxa com bolinhas amarelas. Rsrs.

Espero ter contribuído para seu crescimento profissional!

Abraço.

Jesus abençoe todos nós!

João Lopes Junior

NINTENDO WII

"Inventor é um homem que olha para o mundo em torno de si e não fica satisfeito com as coisas como elas são. Ele quer melhorar tudo o que vê e aperfeiçoar o mundo. É perseguido por uma idéia, possuído pelo espírito da invenção e não descansa enquanto não materializa seus projetos." - Alexander Graham Bell 

Excelente Ideia: Tá louco, mano?! Claro!

Como prometi no post anterior, esse seria bost (bobeira post)! O outro tópico foi sério demais... Rsrs.
Leonardo Marinho, disse-me que estava jogando nintendo Wii no computador, utilizando Dolphin, um emulador que "roda" jogos de GameCube e Nintendo Wii. A sacada é tão boa que permite até a conexão do seu Wiimote e Nunchuck ao seu computador, usando uma conexão Bluetooth.

Se o seu computador já possuir dispositivo Bluetooth você só precisará de um controle do Wii, caso você não possua, as lojas de informática vendem o adaptador Bluetooth, por aproximandamente R$ 15, ou se não desejar, utilize o teclado mesmo!

Clique aqui para baixar o emulador do Nintendo Wii.
Atenção ao baixar! Descubra primeiro se o seu os é 32 ou 64 bit.
Você deverá clicar com o botão direito do mouse em Meu Computador/Propriedades para descobrir se seu sistema operacional é 32 ou 64 bit.

Acesse a página do Dolphin Emulator para maiores informações! Festa!!!

Agora, se você é do tipo de pessoa que gosta da praticidade do vídeo-game e não está querendo investir uma grana no Nintendo Wii eu recomendo o fantástico (rsrsr), Chintendo Vii, uhuu, seja underground!

Chintendo Vii - Ignore as legendas em inglês, elas estão zoadas demais. Hahahahahhahahaha.

Parece que os caras criaram jogos para o console. Que maneirooooo!

Eu quero um Chintendo Vii de presente!

Forte abraço.

Jesus abençoe nosso dia!

João Lopes Junior.