Forum Replies Created
-
AuthorPosts
-
jorgerod
Keymasterboas, wagner,
fixe. obrigado. a tua participação no forum tem sido óptima!!!!!! 🙂
jorgerod
Keymasterolá mário ivo,bem vindo ao forum do exceler. esperamos ver-te mais vezes por aqui e, se possível, dares a conhecer este site aos teus amigos 🙂
quanto à tua pergunta: se não me engano, o que pretendes será isto:
se assim for, vamos então à explicação:
a tua tabela será com uma coluna de datas e outra coluna de valores ( no exemplo, ranges c2:c16 e d2:d16). então, as células g4 e g5, serão as células onde digitarás o intervalo de datas (da menor, para a maior). poderás fazer isso, digitando as datas ou, mais simples, associares as células às outras onde tens as datas, no exemplo: em g4: =c10, ou seja 09/12/2012 e em g5: =c13, ou seja, 12/12/2012.
agora, temos que elaborar uma fórmula que contenha um array de datas e que, das mesmas, procure o valor maior correspondente ao intervalo pretendido.
então, no exemplo, vamos digitar na célula f3, a seguinte fórmula:
=mÁximo(se(c2:c16>=g4; se(c2:c16=g4; se(c2:c16<=g5; d2:d16)))}
o resultado, como podes ver no exemplo, será 10.
achas que é isto que pretendes?
diz qq coisa, ok?
fica bem.
ver mais e melhor em:
Attachments:
You must be logged in to view attached files.jorgerod
Keymaster🙂 obrigadão pela partilha!!!!!
jorgerod
Keymastercláudio,
podes colocar aqui o teu arquivo? É que dá erro ao tentar aceder ao 4shared e é melhor o arquivo ficar agregado a este tópico.
pode ser?
fica bem.
jorgerod
Keymasterwagner,
experimenta: cont = datediff(“d”, criacao, hoje)
para veres melhor, acede a: http://www.techonthenet.com/excel/formulas/datediff.php
fica bem e diz qq coisa.
jorgerod
Keymasterdaniel,
manda a planilha com as alterações que referiste, para eu tentar perceber, ok?
jorgerod
Keymasterdaniel,
em relação à questão sobre encontrar o mês em que se encontra o maior valor, penso que já o resolvi. envio-te a planilha com as alterações efectuadas, espero que percebas.
quanto à procura do dia e da média que pretendes, penso que será um pouco mais difícil, uma vez que são 12 as planilhas… mas vou tentando ver se consigo.
verifica o que fiz e depois diz qq coisa, ok?
fica bem.
Cpiadeteste_2013-01-07.xlsmjorgerod
Keymasterwagner,
sinceramente, verifiquei e não vi erro, mas que o dá, dá mesmo… vou tentar ver isto com olhos de quem vê 😉
jorgerod
Keymasterboas, traga (traga de tragar ou de trazer 🙂 ?)
coloca a folha com as tuas fórmulas de retorno de valor, para se poder perceber melhor como efectuar o que pretendes, ok?
fica bem.
jorgerod
Keymasterpodes enviar planilha de exemplo?
jorgerod
Keymasterfizeste colar especial com a opção transpôr?
jorgerod
Keymasterboas, isantos,
achas que poderá ser possível através de um “colar especial”?
fica bem.
ScreenHunter_1.jpgjorgerod
Keymasterolá noel,
experimenta este código:
'---------------------------------------------------------------------------------------
' procedure : procuranumero
' datetime : 20-12-2012 23:23
' author : jrod
' purpose : pesquisa número e insere dados consecutivamente, até querer ser cancelado o procedimento
'---------------------------------------------------------------------------------------
'
sub procuranumero()dim rfound as range
dim rfind as string
dim rtryagainon error resume next
with sheets("base.dados.antiga")
rfind = inputbox(prompt:="digite o valor pretendido", title:="pesquisa")
set rfound = .columns(1).find(what:=rfind, after:=.cells(1, 1), lookin:=xlvalues, lookat:= _
xlpart, searchorder:=xlbyrows, searchdirection:=xlnext, matchcase:=false _
, searchformat:=false)on error goto 0
if not rfound is nothing then
application.goto rfound, trueactivecell.offset(0, 4).select
activecell = "fundido"
end if
rtryagain = msgbox("quer continuar?", vbokcancel + vbquestion)
if rtryagain = vbcancel then 'não continua
exit sub
else 'continua
run "procuranumero"
end if
end withend sub
diz qq coisa, ok?
fica bem.
jorgerod
Keymasterolá noel,
talvez através deste código vba, que podes associar a um botão de comando
sub procuranumero()dim rfound as range
dim rfind as stringon error resume next
with sheets("base.dados.antiga")
rfind = inputbox(prompt:="digite o valor pretendido", title:="pesquisa")set rfound = .columns(1).find(what:=rfind, after:=.cells(1, 1), lookin:=xlvalues, lookat:= _
xlpart, searchorder:=xlbyrows, searchdirection:=xlnext, matchcase:=false _
, searchformat:=false)on error goto 0
if not rfound is nothing then
application.goto rfound, trueactivecell.offset(0, 4).select
activecell = "fundido"
end ifend with
end sub
fica bem e diz qq coisa, ok?
jorgerod
Keymaster🙂 🙂
-
AuthorPosts
EXCELer Tudo sobre EXCEL em Português