joabnm

adriano, se eu entendi direito o que você ta querendo... é possivel sim. você tem que criar um grafico com 2 eixos, e adicionar 4 séries, um pra cada valor que voce está querendo, depois é só pegar duas dela e jogar pro segundo eixo do grafico...

KodornaRocks, O erro é apresentado na linha: Sheets(modelo).Select no codigo eu coloquei algumas ">>>>>" monstrando onde da o erro. Cara eu não sei qual é o tipo de informaçao que você ta trabalhando, mas você precisa da uma analisada ae porque o erro acontece justamente quando você vai selecionar uma planilha, que vem de uma variavel, veja ae o que está sendo feito no meiu de tantas condições, porque isso é algum valor que está sendo adicionado a variavel referente ao guia inexistente. ou seja, depois de tanta condições colocadas no codigos ao adicionar o valor a variavel pode estar sendo adicionado uma celula em branco... ou seja até mesmo o nom da guia. só que com algum caracter diferente.. (lembrando que o valor dentro da variavel é Case Sensitive, ou seja "a" é diferente de "A" ou "e" é diferente de "é". enfim.. espero ter ajudado em alguma coisa. abraço

Joaobnm, Você já tentou verificar a quantidade de caracteres da célula? Pois por exemplo, caso a celula tenha mais de 10 (dd/mm/aaaa), você usa o tratamento desejado... Então adriano, eu consegui fazer essa verificação aqui, fiz ela com replace If Replace(DATA, "-", "") = DATA Then [comandos] Else [comandos] End If porem agora estou com mais um porem, como são datas, eu preciso quebrar os valores em um vetor, ou seja, a data 1 vai pro vetor na posição 1 e a data 2 vai para o vetor 2 você conhece algo para que eu faça isso? mas ae.. grato pela resposta hein...

Boa tarde pessoal! Estou precisando fazer uma verificação em uma variavel pra saber se dentro dela tem um caracter. por exemplo, aleatoriamente essa variavel recebe um valor de data "dd/mm/aaaa", só que pode acontecer de em vez receber uma unica data essa variavel receba duas datas "dd/mm/aaaa-dd/mm/aaaa", ou seja, se a data que estiver dentro da variavel tiver o "-" eu preciso dar um outro tipo de tratativa. Aí é onde eu estou parado, não estou achando um jeito pra verificar se dentro da variavel tem o "-". se alguém puder me ajudar já adradeço desde já. um abraço a todos.

não sei se entendi exatamente o que você quer mas eu usei o botao de opcao... com o seguinte codigo: Sub exibe_oculta(r1, r2) Rows("6:10").Hidden = True Rows(r1 & ":" & r2).Hidden = False End Sub Sub Botãodeopção16_Clique() Call exibe_oculta(6, 6) End Sub Sub Botãodeopção19_Clique() Call exibe_oculta(7, 7) End Sub Sub Botãodeopção20_Clique() Call exibe_oculta(8, 8) End Sub Sub Botãodeopção21_Clique() Call exibe_oculta(9, 9) End Sub Sub Botãodeopção22_Clique() Call exibe_oculta(10, 10) End Sub Espero de uma luz aí pra você, se quiser, eu posso mandar o arquivo no seu e-mail para ver o codigo funcionando... abraço

Bom dia, Gente resolvi resgatar esse tópico porque estou com o mesmo problema porém os posts acima não me ajudaram... então vamos la... eu faço o acesso a pagina web... faço o login.... exibo o relatorio... aí que vem o problema... ao colar o conteudo da pagina web para o excel... entre num loop eterno...rsrs... ou seja... eu preciso pausa a macro manualmente. esse é o codigo que eu fiz: objIECopy.SetText (IE.Document.body.outerHTML) objIECopy.PutInClipboard ThisWorkbook.Worksheets("Temp").Cells(1).PasteSpecial IE.Quit a primeira e a segunda linha ele executa sem problemas... na terceira linha onde cola no excel, ele exibe uma mensagem.. "Não foi possível inserir o modo interromper" e começa o loop infinito.. fico no aguardo de alguma dica. abs

Cara você também pode pegar o endereço do pop-up, ou seja, abra o pop-up e clica com o botao direto em qualquer parte do pop-up, vá em propriedade e la você vai achar a url que direciona direto pro pop-up. aí é só você colocar na macro. dessa o pop-up irá abrir na pagina principal