Kleitonkaza

Obrigado pela ajuda @Basole Fiz alguns teste sem modificações na escrita, mas vou fazer outros aindas para verificar, pois percebi que ele abre, le e fecha todos os arquivos contidos na pasta que seleciono, gera uma aba nova na planilha que estou usando mas não registra os valores da celula H515 em lista nesta aba nova....ficando apenas uma aba nova vazia... vou dar uma olhada com mais calma amanhã e ver o que ocorre novamente....assim também posto a planilha aqui... De todo modo muito obrigado!

Olá! Sou pouco leigo no assunto, gostaria de uma ajuda com VBA Tenho um pasta (diretorio) fixa onde salvo diversas subpastas, cada um uma com um titulo numerado, onde dentro destas fica salvo um arquivo excel xlsm com dados de orçamento, Já consegui uma macro onde eu listo o nome de todas as pasta existente neste diretorio e salvo em uma outra planilha especifica, porém estou tentando fazer a seguinte situação: que a macro copie o valor da celula especifica de cada arquivo excel e salve nesta planilha especifica, as planilhas de orçamentos são iguais logo o valor sempre será na mesma celula, mudando somente o nome de cada planilha e cada pasta que ela se encontra, em Resumo para melhor entendimento, de maneira manual eu tenho uma planilha de controle onde, eu vou nesta pasta que constam todas as subpastas de orçamentos, copio todos os nomes e colo nesta planilha de controle, após isto eu abro cada subpasta de orçamento xlsm e abro cada arquivo e copio o valor da celula H515 e colo nesta planilha de controle ao lado do respectivo nome... poderiam me auxiliar nesta execução, por gentileza ? att Kleiton

Pessoal, Estou quase solucionando meu problemas, falta-me um detalhe, para então juntar todas as macros e chegar onde quero, que seria a primeira mensagem postada, o que preciso agora é o seguinte, como mencionado acima estou inserindo uma macro ao qual inseri uma formula Somase, porém esta formula possível seleções variáveis conforme a quantidade de linhas, porém o que me acontece é que eu consigo inserir a formula com as variável corretamente, porém, preciso congelar a formula em determinada parte, exemplo =SOMASE($C$28:$C$31;C28;$D$28:$D$31), ficando livre apenas a parte central da formula ;C28; ate gravei uma macro para verificar se tem algo errado, mas o que me acontece que a formula congela uma parte como eu preciso e outra nao congela corretamente o que deixa uma parte variando conforme copia e cola na linha abaixo, exemplo =SOMASE($C$28:$C31;C28;$D$28:$D31) como podem observar na parte C28:C31 foi congelado corretamente apenas a parte C28 ficando $C$28 ja a parte C31 ficou C$31, gostaria que ficasse $C$28:$C$31 como mencionado, assim acontece na terceira parte da formula D28:D31, Resumo a formula inserida fica =SOMASE($C$28:$C31;C28;$D$28:$D31), porém preciso que ela fique assim =SOMASE($C$28:$C$31;C28;$D$28:$D$13) onde esta grifado em amarelo é onde esta o que acontece e o preciso que aconteça a macro esta da seguinte forma Sub Formula_somase() Dim Lin As Long, Sin As Long, y As Long Lin = 28 'primeira linha a ser verificada Sin = 30 y = 1 Do While Not IsEmpty(Range("C" & Lin)) Lin = Lin + 1 Sin = Sin + 1 y = y + 1 Loop MsgBox "A primeira linha vazia coluna C é a linha: " & Lin Cells(28, 10).FormulaR1C1 = "=SUMIF(R28C3:R[" & Lin - Sin + y & "]C3,RC[-7],R28C4:R[" & Lin - Sin + y & "]C4)" End Sub Bom desde ja agradeço a atenção!

Obrigado pelo retorno, Neste caso preciso repetir os itens, pois, em uma outra aba espelhada ira aparecer os itens e suas quantidades parciais, porém na folha de rosto não poderá se repetir, Estou quase conseguindo algo para minha planilha, porém, estou em outro empasse, parece algo bobo mas estou com dificuldade em um vba, caso eu consiga resolver este vba irei juntar e finalmente finalizar o que preciso, Segue a duvida que me falta Sub Inserir_formula() Range("J28").Select y = ActiveCell.Range("D29").End(xlDown).Value ActiveCell.FormulaR1C1 = "=SUMIF(R28C3:R[" & y & "]C3,RC[-7],R28C4:R[" & y & "]C4)" End Sub O que acontece, preciso inserir esta formula de Somase, mas o que acontece uma posição é fixa, mas a outra é variavel, que seria a ultima célula preenchida da coluna D29, porém quando executo esta vba ela nao grava a posição da ultima celula preenchida para inserir na formula, a formula estará inserida na celula J28, mas precisa selecionar a Celula D28 ate a ultima preenchida continuamente, ou seja, apareceu a primeira célula vazia não conta,

Tirei um print para entenderem melhor o que preciso Se notarem no MATERIAL PRODUTO 01, la constam um produto repetido 3 vezes, onde eu precisaria de uma macro para somar os valores deste produto apenas neste subitem e deletar as copias, mas sem interferir no MATERIAL PRODUTO 02 que esta acim.... Desculpe o transtorno, mas tenho pouco conhecimento em VBA e macros excel.....e realmente preciso que isto seja feito com uma macro, pois, tenho muitas outras que executam na planilha e inserem estes itens muito obrigado

Boa tarde a todos, Estou com dificuldades com macros no excel, tenho uma planilha ao qual é referente a orçamentos de itens, terei um item com nome do produto orçado em uma aba, logo abaixo na coluna B terá os códigos de cada item, na coluna ao lado o nome do item desse código e na outro coluna do lado a quantidade deste item, assim terei uma lista de talvez 10 itens que compõe o produto, isto estou inserindo com VBA, quando preciso lançar outro item faço o mesmo processo e este é lançado a baixo do produto ja lançado, minha dificuldade é a seguinte, enquanto estou lançando os itens no VBA, sempre tenho alguns itens específicos que preciso lança-los repetidas vezes só que com valores diferentes, pois estes sao copiados automaticamente para outra aba, mas na aba principalmente onde mostra o orçamento dos produtos nao se pode repetir o mesmo item dentro de um produto, logo ele precisa ser lançado uma vez e somado, Exemplo, o produto A ja esta lançado com seus itens, o produto B em vermelho, lancei como mostrado mas esta repetindo o item 1, esta errado, em verde o Produto B esta correto, somei o item 1 e deletei a repetição. Porém preciso fazer isto manualmente, sei que existe maneira de usar do proprio excel, porém preciso de uma macro para fazer isto quando finalizo um VBA que lança os itens de cada produto. Produto A item 1 / item especifico do tipo 1 / 5x item 2 / item especifico do tipo 2 / 1x item 3 / item especifico do tipo 3 / 6x Produto B (ultimo produto lançado, esta repetido, ou seja, errado) item 1 / item especifico do tipo 1 / 5x item 1 / item especifico do tipo 1 / 1x item 5 / item especifico do tipo 5 / 6x Produto B (ultimo produto lançado, esta correto, somou o item 1 e deletou o repetido) item 1 / item especifico do tipo 1 / 6x item 5 / item especifico do tipo 5 / 6x Obrigado a todos!

Ola! Bom dia Pessoal! Por gentileza, preciso de uma ajuda no excel, Tenho uma planilha ao qual eu executo algumas macro para exibir e ocultar abas conforme minha escolhe, essas abas contem lista de cliente ou produtos, Meu problema ocorre da seguinte maneira, na minha aba inicial eu utiizo um botao com Macro para exibir uma aba oculta na qual irei procurar na lista o produto que quero, porém quando exibe essa aba oculta eu começo a utilizar como de costume o a barra de rolagem do mouse para procurar o item que preciso, o que acontece é que a a barra de rolagem do excel nao responde normalmente ao comando do mouse, noto que a barra de rolagem do excel diminui o tamanho como se estivesse sendo usada normalmente, porém a planilha nao acompanha na tela, apenas se eu clicar com esquerdo do mouse na barra e for descendo, assim volta ao normal, Acredito que necessite de alguma macro ao final desse comando para ativar normalmente a barra de rolagem ou algo semelhante, Alguem por gentileza, poderia me ajudar. Grato pela atençao!

Bom dia a todos! Primeiramente peço desculpas caso comenta alguma infração mediante as regras do fórum, sou iniciante aqui e busco conhecimento de todos e também poder compartilhar assim que possível com todos, Bom, tenho uma planilha ao qual possuo uma pagina inicial onde tenho alguns botões para acessar algumas abas ocultas, cada uma com sua devida função, Um desses botões serve para acessar uma aba oculta para cadastro de clientes, uma aba simples com VBA, ao clicar nesse botao ele ativa essa aba oculta ja abrindo uma Janela de cadastro, nesta aba o cadastro é simples por linhas como muitos encontrados na internet, Porém necessito de algo um pouco diferente e que não estou conseguindo fazer, como sou principiante em VBA, tenho pouco conhecimento nesta área, A Macro que gostaria de executar seria para seguinte função, ao invés desse método que expliquei acima para cadastrar clientes gostaria que este botão criasse uma aba nova ja abrindo uma janela VBA, semelhante ao citado, onde cada aba nova criada seria exclusiva para cada novo cliente, assim a cada cliente novo que fosse registrar seria criado uma nova Aba com seu nome, abrindo esta janela VBA para registrar seus dados, pois, esta aba ira conter o histórico somente deste cliente, A planilha em anexo é um modelo inicial que estava criando, vejam que nesta versao o botao para Cadastro de cliente, cria uma lista de clientes cadastro em uma unica aba ja existente mas oculta, Agradeço a todos que puderem me auxiliar neste momento, e desculpas pela ignorância na área. obrigado! MATRIZ DE ACESSO_05.rar