cliffpk

Coloquei um exemplo da planilha/gráfico. Tive que colocar em zip porque o formato do arquivo é .xlsm e o forum não estava aceitando. A forma que queria que os rótulos fossem exibido é como está na planilha, iria mostrar o rótulo previsto e realizado referente a linha do ultimo dado coletado na coluna "Realizado." CRONOGRAMA_14112018.7z

Pessoal, bom dia. Iria criar um novo tópico com a mesma solicitação mas encontrei esse já existente. Existe alguma forma de apresentar somente o rótulo de dados do ultimo dado de um gráfico, de forma automática, por VBA ou alguma outra forma?

Na verdade a planilha é um modelo de controle de notas fiscais à ser utilizado em diferentes situações por uma equipe, então algumas linha serão acrescentadas, editadas... caso fosse possível simplesmente ignorar as celulas bloqueadas, eu poderia manter as celulas da estrutura da planilha bloqueadas e englobar uma quantidade de células maior no botão de limpar as planilhas, de forma que ele realmente limpasse toda a planilha, englobando mesmo as possíveis adições de linhas. De qualquer forma muito obrigado..

@osvaldomp Os intervalos estão certos, a questão é que se houver uma célula bloqueada dentro desses intervalos ela também é apagada. A ideia que tive é que a mesma seria ignorada, não gerando erro e não sendo limpa!

@osvaldomp, fiz dessa forma e o que aconteceu foi que as células bloqueadas foram apagadas, ao invés de apresentar erro. Como as minhas planilhas não tem senha, deixei o código da seguinte forma: Sub Limpar_celulas() Senha = "1234" resposta = InputBox("Digite a senha para continuar.") If resposta <> Senha Then MsgBox "Senha incorreta.", vbCritical, "Atenção!" Exit Sub 'Não continuar a macro End If Sheets("Resumo Geral").Protect userinterfaceonly:=True Sheets("Resumo Geral").Range("C4:C5,C7:C11,C14:C16,C20:C21,D26:D30").ClearContents Sheets("Resumo Financeiro").Protect userinterfaceonly:=True Sheets("Resumo Financeiro").Range("E4:E15").ClearContents Sheets("Resumo OC").Protect userinterfaceonly:=True Sheets("Resumo OC").Range("C8:C16,D8:D16").ClearContents Sheets("Notas Fiscais").Protect userinterfaceonly:=True Sheets("Notas Fiscais").Range("B3:I200").ClearContents Sheets("Ordens de Compra").Protect userinterfaceonly:=True Sheets("Ordens de Compra").Range("A3:G200").ClearContents Sheets("Medições").Protect userinterfaceonly:=True Sheets("Medições").Range("A3:B17,D3:H17").ClearContents Sheets("Cronograma").Protect userinterfaceonly:=True Sheets("Cronograma").Range("E38:N90").ClearContents For Each xWs In ActiveWorkbook.Worksheets For Each xComment In xWs.Comments xComment.Delete Next Next End Sub

Amigos, boa tarde. Atualmente tenho um botão que limpa as células da minha planilha, o problema é que entre uma célula ou outra tenho algumas células bloqueadas. O excel tenta limpar as células e, por ter células bloqueadas entre elas, apresenta erro. Gostaria de saber como posso adaptar a função VBA para ignorar as células que apresentam bloqueio. Muito obrigado, abraços! Sub Limpar_celulas() Senha = "1234" resposta = InputBox("Digite a senha para continuar.") If resposta <> Senha Then MsgBox "Senha incorreta.", vbCritical, "Atenção!" Exit Sub 'Não continuar a macro End If Sheets("Resumo Geral").Range("C4:C5").ClearContents Sheets("Resumo Geral").Range("C7:C11").ClearContents Sheets("Resumo Geral").Range("C14:C16").ClearContents Sheets("Resumo Geral").Range("C20:C21").ClearContents Sheets("Resumo Geral").Range("D26:D30").ClearContents Sheets("Resumo Financeiro").Range("E4:E15").ClearContents Sheets("Resumo OC").Range("C8:C16").ClearContents Sheets("Resumo OC").Range("D8:D16").ClearContents Sheets("Notas Fiscais").Range("B3:I200").ClearContents Sheets("Ordens de Compra").Range("A3:G200").ClearContents Sheets("Medições").Range("A3:B17").ClearContents Sheets("Medições").Range("D3:H17").ClearContents Sheets("Cronograma").Range("E38:N90").ClearContents For Each xWs In Application.ActiveWorkbook.Sheets For Each xComment In xWs.Comments xComment.Delete Next Next End Sub

Muito obrigado @Patropi, funcionou perfeitamente. Obrigado também Osvaldomp mas não será necessário!

Pessoal, bom dia. Preciso encontrar uma forma de arredondar uma data inserida em uma célula para o dia 15 do mês que aquela data foi inserida e caso a data seja menor que dia 15, retorne na célula com a fórmula o dia 15 do mês anterior. Por exemplo, Na célula A1 insere-se 22/05/2018, a data mostrada na célula A2 seria 15/05/2018. Caso fosse inserido 03/09/2018, retornaria em A2 o valor do dia 15/08/2018. Caso fosse inserido 14/09/2018, retornaria em A2 o valor do dia 15/08/2018. Alguem sabe me dizer se é possível e como é possível? Obrigado!

Bom dia! Na verdade sim, mas como a fórmula pra resolver essa situação é mais simples eu nem questionei a respeito!

Amigo, a planilha de exemplo ja esta postada no topico, o que coloquei foi só uma imagem pra facilitar a visualização.

Amigo, me desculpe, realmente escrevi errado. O certo seria dessa forma: Quando o valor de uma celula na coluna "I" atingir 0, o excel recolhe o que está escrito naquela linha para a coluna "J" e, todos as linhas que tiverem na coluna "J" o mesmo número daquela linha que atingiu o valor 0, retornarão "OK" na coluna K. Por exemplo, a ordem de compra 9 possui 3 notas fiscais, na terceira nota, linha 12, o saldo (coluna I) do fornecedor atingiu 0, então o excel analisará a coluna J da mesma linha e todos as linhas que possuírem 9 naquela mesma coluna ficarão com "OK" na coluna K. A planilha do que deveria acontecer está anexa

Alguém pra dar uma luz pessoal?..

Pessoal, bom dia. Trabalho com uma planilha de controle de notas fiscais e queria saber como executar a seguinte tarefa: Quando o valor de uma celula na coluna "I" atingir 0, o excel recolhe a informação na coluna "J" e, todos as linhas que tiverem na coluna "L" o mesmo numero da coluna "L" da linha que atingiu o valor 0 na coluna "J" retornarão "OK" na coluna K. Por exemplo, a ordem de compra 9 possui 3 notas fiscais, na terceira nota, linha 12, o saldo (coluna I) do fornecedor atingiu 0, então o excel analisará a coluna J da mesma linha e todos as linhas que possuirem 9 naquela mesma coluna ficarão com "OK" na coluna K. [ Espero ter deixado claro o problema, de qualquer forma agradeço desde já. planilha_teste2.xlsx

Pessoal, bom dia. Faço uso de uma planilha para controle de notas fiscais em que utilizei do recurso de formatação condicional para demonstrar em cor quanto cada fornecedor da minha empresa tem de saldo financeiro, está devendo ou se o mesmo já encontra com a situação quitada. A fórmula é basicamente simples, ela analisa a ultima coluna da planilha e pinta a linha toda de acordo com o valor, >0 amarelo, =0 verde, <0 vermelho. O problema é que há situações em que tenho que mesclar a celula do fornecedor, fazendo com que ela ocupe varias linhas, de forma que não possa ser previsto a quantidade, as vezes 2, as vezes 3 ou 7 linhas, como na planilha de exemplo anexa, no caso o FORNECEDOR 4. Eu queria que, quando a ultima linha das celulas mescladas atingisse 0, todas as linhas que tem participação naquela célula mesclada também ficasse da mesma cor, no caso, verde. Utilizei uma fórmula na coluna D que consigo separar as linhas mescladas em um tipo de "grupo", mas não sei como dizer ao excel que se o saldo do fornecedor atinge 0, todas as linhas com valores equivalentes ao valor da linha D, que é a divisão de grupo, devem ser coloridas de verde. EXEMPLO.xlsx

Bom, o Bulletstorm aqui ta rodando com 60fps, com tudo no max, inclusive AA 8x, vou esperar pra instalar outros jogos pra fazer o teste, parece que no GTA o FPS é bem baixo mesmo... Valeu por enquanto galera!

Bem, eu tinha usado o FRAPS sem reiniciar o PC, quando liguei o PC de manhã, FPS do GTA chegou a aumentar um pouco sim (120 em casa, 40~50 rua), mas ontem ainda sem reiniciar o PC depois da instalação do FRAPS, tinha testado o Bulletstorm tambem, a velocidade esta bem estavel, mas tava marcando 30fps (tudo no max), não sei se é porque não tinha reiniciado, ou o CPU estava mais aquecido... sei lá... Eu sei que eu to MUITO preocupado entendem, a ponto até de meio desanimar, pelo computador ser novinho tenho medo de que algo nele não esteja 100% e eu esteja perdendo tempo e $$$! Desculpa o incomodo galera. Estou no trabalho agora, chegando em casa eu vou testar mais e dou um up no post aqui. Os Patchs tão instalados, mas vou fazer o teste com o Driver sim! Valeu gente

Galera, desculpa mas eu to meio desesperado! Não sei se a placa ta com defeito, to meio com medo de estar. Fora o problema citado acima, o GTA aqui ta rodando até beleza a velocidade, mas quando rodei o fraps, alertou que dentro de casa fica 75, mas quando vai pra rua, pra esses lugares mais carregados a media fica de 50 parado, chega reduzir pra 30. Apesar de não ter percebido lentidão (pode ser porque to acostumado com aquela velocidade) o frame me preocupa muito...

O problema do GTA eu ja resolvi, mas a setinha desconfigurada ainda me preocupa, tenho medo de se tornar uma bola de neve depois, ou ja estar perdendo desempenho por causa de algum mísero defeito na placa...

É sério? Aqui ta acontecendo que o FPS ta bem distribuido, mas frequentemente fica dando umas travadas! To muito preocupado com isso, muito mesmo.

Ola galera, comprei um PC novo muito recentemente com as seguintes configs. Então, instalei Windows7 e os drivers da placa, não fiz nenhuma configuração no clock de nenhuma peça, depois de formatado, percebi que as vezes a setinha do mouse ficava "desconfigurada" (serrilhada, meio avacalhada), por hora deixei pra la, mas como trabalho como tecnico em informatica, pensei que poderia ser placa de video, pois esses erros meio "especificos" e intermitentes geralmente são. porém nao me incomodou em nada, e apareceu somente umas 2 ou 3x, então instalei 2 jogos de inicio, Bulletstorm e Splinter Cell: Conviction O Bulletstorm rodou no maximo com uma velocidade boa, porém as vezes, dava uma travadinha, coisa minúscula, mas perceptivel. Ja o SplinterCell tambem rodou no maximo, mas se eu reduzisse a resolução melhorava POUCA coisa a velocidade (que não estava ruim) Bom, então depois de alguns dias, instalei o GTA IV, esse ultimo me deixou bastante grilado, pois acontece o seguinte, o jogo roda beleza, com bons graficos, só que muito frequentemente o jogo da umas travadas, maiores que a do Bulletstorm, o que torna meio ruim de jogar. Não sei se é por causa que é o primeiro gameplay, mas mesmo reiniciando continuou as travadinhas. Estou com medo de ser a Placa de Video ou outra peça, mas suspeitando que seja a Placa de Video, não sei se faz tanta diferença, mas comprei no Balão em um "RUSH" pois achei ela MUITO barata (599,00), então sei lá, pode ser que seja meio suspeito. Ah, esqueci de mencionar, a resolução maxima do meu monitor é de 1280x1024. Desculpe o post gigante, só queria deixar bem claro o que aconteceu, estou muito preocupado com a situação.

Estou querendo muito comprar um XBOX, mas queria tirar umas duvidas antes