Ir ao conteúdo
  • Cadastre-se

Maikon Lopes

Membro Júnior
  • Posts

    2
  • Cadastrado em

  • Última visita

Reputação

0
  1. Não seria desse jeito, eu preciso que cada linha seja copiada e colada em uma pasta diferente, pois desejo após isso salvar cada uma delas, para envio. Seria como uma mala direta, mas sem enviar, apenas salvar em algum lugar.
  2. Boa tarde, Estou precisando de ajuda para realizar uma macro para agilizar um trabalho que tenho que fazer. Trata-se de uma planilha com vários códigos e algumas descrições . Eu preciso que uma macro copie cada linha e cole em uma nova pasta do excel. Exemplo: linha 2 copia e em uma nova pasta, e assim por diante. Se a planilha tiver 20 linhas, será necessário colocar copiar cada uma delas para uma nova pasta, ou seja 20 pastas. Eu tentei criar uma macro, porém quando eu executo, ocorre um loop infinito e a planilha trava " Sub Salvar() Application.ScreenUpdating = False Range(Cells(2, 2), Cells(2, 6)).Select Do If ActiveCell <> "" Then Range(Cells(2 + 1, 2), Cells(2 + 1, 6)).Select End If Loop Until ActiveCell = "" Selection.Copy Workbooks.Add Range("B2").Select Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _ :=False, Transpose:=False Selection.PasteSpecial Paste:=xlPasteFormats, Operation:=xlNone, _ SkipBlanks:=False, Transpose:=False End Sub " Copiar linhas.xlsx

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...