Respostas criadas no fórum
-
AutorArtigos
-
jorgerodAdministrador
boas,
não tão inútil assim… no mínimo, este tópico já deu para dar a conhecer mais alguma coisa 😉
por exemplo:
http://msdn.microsoft.com/en-us/library/aa730921(office.12).aspx
e
http://visio.mvps.org/excel_2007.htm
fica bem! 🙂
jorgerodAdministradorpor favor manda a planilha, se puderes/quiseres. pode ser mais fácil de entender. ok?
jorgerodAdministradoredson,
a planilha não chegou em anexo. há algum problema? se houver, eu reporto ao bruno, que é o administrador executivo do site.
jorgerodAdministradorboas, miguel!
possível resposta à tua questão:
“o que pretendia era, na coluna c inserisse uma fórmula que ele verificasse o conteúdo da célula a1 e caso contivesse a palavra farmacia a célula c1 passaria a mostrar, por exemplo, 1, se tivesse compras, devolvia o valor 2 e por aí fora.”:
=se(É.nÚm(procurar(“*farmacia*”;a1;1));1;se(É.nÚm(procurar(“*compras*”;a1;1));2;se(É.nÚm(procurar(“*gasolina*”;a1;1));3;””)))
atenÇÃo! o número máximo de ifs aninhados, na versão 2003, é 7! nas versões 2007 e 2010, é 64. no entanto, não é de aninhar mais do do que 7, uma vez que, depois, é um pouco difícil de se perceber a própria nomenclatura dos aninhamentos…
uma outra possível aproximação, será talvez a utilização da função procv()…
jorgerodAdministradorboas,
depois desta troca de informação, excelente, proponho que vejam os dois exemplos que se encontram na grelha que agora envio:
[file name=calendrio01.xls size=39936]https://www.exceler.org/media/kunena/attachments/legacy/files/calendrio01.xls[/file]
Calendrio01.xlsjorgerodAdministradorboas,
sobre gráficos, podes ver dois sítios formidáveis, que, espero, te possam ajudar:
http://peltiertech.com/excel/charts/chartindex.html
e
jorgerodAdministradorboas,
eu iria para uma situação diferente, em que, se o mês fosse de 31 dias, apareceriam os dias 29,30 e 31; se fosse de 30 dias, apagaria o 31, se fosse fevereiro, ano bissexto, apagaria os dias 30 e 31 e se fosse fevereiro, ano comum, apagaria os dias 29, 30 e 31.
para tal, escolheria uma célula, para me dar o número de dias do mês pretendido (neste caso, como é julho, apareceria 31).
a fórmula na tal célula (por exemplo, em d2): =dia(data(ano(c2);mÊs(c2)+1;1)-1)
depois, nas células onde teria os dias 29, 30 e 31, colocaria as seguintes fórmulas:
para a célula correspondente a 29: =se(d2=28;””;29)
para a célula correspondente a 30: =se(ou(d2=30;d2=31);30;””)
e para a célulua correspondente a 31: =se(d2=31;31;””)
ou seja, em vez de estar a colocar cores (que presumo seria para significar a passagem de mês), faria desta maneira.
no entanto, sobra a possibilidade do mês ser de 31 dias. neste caso, sim! deveria o dia 1 ficar com outra cor, para distinguir.
aqui vai o desafio:
fico à espera dos vossos contributos. 😉
jorgerodAdministradoralbino,
experimenta: =an13-aj13+((an13<aj13)*24)
tudo formatado como hora, na forma 00:00.
fica bem e diz qq coisa.
jorgerodAdministradorboas, albino,
vê o ficheiro listbox.xls na pasta anexos e tenta adaptar às tuas necessidades. depois, diz qq coisa, ok?
jorgerodAdministradorpaulo,
qual a razão para imprimir uma msgbox?
jorgerodAdministradordani,
não sei se será uma possível resposta para o que pretendes, mas podes ver o ficheiro “dani.xls” que se encontra na área de downloads – anexos
pode ser que seja uma primeira aproximação…
depois, diz qq coisa, ok?
fica bem.
jorgerodAdministradorok, paulo.
fico à espera.
jorgerodAdministradorboas, gustavo!
supondo que tens a tua data actual em h1 (superior à data actual – será o critério), que tens as datas entre a2:a5 (será o intervalo), que tens as saídas entre d2:d5 (será o intervalo-soma) e que pretendes, em h3, ter o resultado, de acordo com o critério que definiste,
então, em h3, colocas a seguinte fórmula: =soma.se(a2:a5; “>”&h1; d2:d5)
perante os teus dados, dará 9. mas se alterares a data actual, por exemplo, para 26/4, então dar-te-á o resultado 6. se digitares 27/4, irá dar-te o resultado 0.
será isto que pretendes?
diz qq coisa, ok?
fica bem!
jorgerodAdministradorpaulo,
talvez utilizando o método intersect:
exemplo:
if intersect(activecell, range(“a1:a10”)) is nothing then
msgbox “the active cell does not intersect a1:a10” -> aqui não colocavas código
else
msgbox “the active cell does intersect a1:a10” -> aqui colocavas o código para executar
end if
ou então:
private sub worksheet_change(byval target as range) –> utilizarias o evento worksheet_change
if not intersect(target, range(“a1:a10”)) is nothing then
msgbox “hello” –> aqui colocarias o teu código – nota: o range é aquele onde a msg aparece…
end if
end sub
vê se te serve, ok?
jorgerodAdministradorcomo é referido em http://pubs.logicalexpressions.com/pub0009/lpmarticle.asp?id=362 (mousetrax computing solutions),
“me” is a vba keyword that a form can use to refer to itself.
🙂 🙂
-
AutorArtigos