Ir ao conteúdo
  • Cadastre-se

Carlos Vizoni

Membro Júnior
  • Posts

    8
  • Cadastrado em

  • Última visita

Reputação

0
  1. Ficou perfeito Osvaldo, Só mais um detalhe, algumas células possuem a "palavra" que esta na coluna critério da forma como o exemplo (material_gesso ou fornecedor-gesso-branco) entre outras varias opções, com a palavra do critério "perdida no meio de uma palavra mais composta", ai a macro não acha. É possível achar desta forma?
  2. Não coloquei a lista pois os termos podem variar, haverá planilha que preciso separar os termos "gesso", "granito" e "mármore", outra terei que separar "areia", "pedra", e "vidro", por isso achei ótima a sua ideia de colocar as palavras para o critério em uma coluna vazia.
  3. Boa tarde Osvaldo, não consegui anexar a planilha no post anterior pois estava fazendo na extensão *.xlsm. Agora deu certo. Os arquivos possuem mais de 10 mil linhas cada, então preciso separar as linhas que contenham os critérios selecionados em qualquer uma das 4 colunas. Os termos podem variar pois haverá planilha que preciso separar os termos gesso, granito e mármore, outra terei que separar areia, pedra e vidro, por isso achei ótima a sua ideia de colocar as palavras para o critério em uma coluna vazia. exemplo.xlsx
  4. Bom dia Osvaldo, a ideia de colocar a lista em uma coluna vazia é perfeita. Pode colar o codigo na primeira linha vazia, sem problemas. Quero adicionar os registros nos registros existentes na plan2. As colunas utilizadas são de A até D. Anexo uma amostra do arquivo com alguns registros.
  5. Bom dia Pessoal! Preciso copiar todas as linhas da Plan1 com a palavra "forro" para a Plan2 e depois apagar as respectivas linhas da Plan1. Fiz a macro abaixo que esta funcionado palavra por palavra, mas como são várias palavras (ex: gesso, mármore, granito, etc), preciso saber se é possível pré determinar as palavras na macro e o comando fazer todas de uma unica vez, sem ter que digitar palavra por palavra e executar a macro uma a uma. Outra duvida é que quando a macro não encontra mais linhas com o critério selecionado, a macro retorna o erro: "A variável do objeto ou a variável do bloco "With" não foi definida" Como corrigir? Abaixo a macro que consegui fazer: Sub CopiaLinhaCritério() Do While Range("A1").Select Cells.Find(What:="forro").Activate lin = ActiveCell.Row Rows(lin).Select Selection.Copy Sheets("Plan2").Select ActiveSheet.Paste Rows("1:1").Select Application.CutCopyMode = False Selection.Insert Shift:=xlDown, CopyOrigin:=xlFormatFromLeftOrAbove Sheets("Plan1").Select Application.CutCopyMode = False Selection.Delete Shift:=xlUp Range("A1").Select Loop End Sub
  6. Bom dia a todos! Preciso uma macro para excluir as linhas com determinada palavra, encontrei a macro abaixo. Sub Excluizebra() Dim LR As Long With ActiveSheet .UsedRange.AutoFilter Field:=1, Criteria1:="zebra" LR = .Cells(.Rows.Count, 2).End(xlUp).Row If LR = 1 Then GoTo vazaí .Range("A2:A" & LR).SpecialCells(xlCellTypeVisible). _ EntireRow.Delete vazaí: .AutoFilterMode = False End With End Sub Meu problema é que em muitos casos a palavra "zebra" vem acompanhada por outras palavras como por exemplo "zebra+leão" ou "zedralistrada" ou "florestacomzebra", etc.. Como devo fazer?

Sobre o Clube do Hardware

No ar desde 1996, o Clube do Hardware é uma das maiores, mais antigas e mais respeitadas comunidades sobre tecnologia do Brasil. Leia mais

Direitos autorais

Não permitimos a cópia ou reprodução do conteúdo do nosso site, fórum, newsletters e redes sociais, mesmo citando-se a fonte. Leia mais

×
×
  • Criar novo...