Página 1 de 1

Macro para adicionar números à uma célula

Enviado: 12 Mai 2015 às 19:55
por aurelio2502
Olá, amigos. Tudo bem? Então, estou fazendo a contagem dos entrevistados da minha pesquisa de TCC e tentei criar uma macro na qual adicionasse o número 1 ao valor atual da célula para cada resposta encontrada. Exemplo:

Identifiquei que o entrevistado é do sexo feminino;
Clicaria no botão "+" e a macro iria adicionar o valor 1 àquela célula, totalizando o valor 1;
Identifiquei que outro entrevistado é do sexo feminino;
Clicaria no botão "+" e a macro adicionaria o valor 1 à mesma célula, totalizando agora o valor 2

PS: os formulários estão impressos e não queria ter o trabalho de ficar apagando e adicionando um valor a todo momento, até porque são mais de 20 itens para contabilizar.

Acho que fui claro. Esta é minha dúvida. Caso alguém possa ajudar, ficarei muito grato. Até breve.

Macro para adicionar números à uma célula

Enviado: 12 Mai 2015 às 19:58
por Yera
Olá,

com uma função simples você consegue fazer isso.

Seria algo do tipo:

funcion somarPonto(celula) 'Por exemplo "A1"
range(celula).value = range(celula).value +1
end function

aí você pode chamar essa function a partir de um botão passando como parâmetro a célula que você deseja somar.

Grande abraço.

Macro para adicionar números à uma célula

Enviado: 12 Mai 2015 às 20:06
por aurelio2502
Obrigado pela resposta, Yera. O problema é que eu ainda estou aprendendo a linguagem VBA. Teria alguma outra solução além desta? :|

Macro para adicionar números à uma célula

Enviado: 12 Mai 2015 às 20:16
por laennder
Não vejo a necessidade de criar uma macro para o que deseja aurelio.

Você pode simplesmente montar uma tabela e transcrever todas as respostas. Depois pode utilizar uma tabela dinâmica para gerar a contagem dos dados.