Como excluir linhas e colunas indesejadas em uma planilha do Excel
( Não vai demorar o tempo que uma primeira olhada sugerir e é seguro!)
Existem duas folhas mencionadas no procedimento abaixo.
Vamos chamar sua planilha original YourOriginalSheet(ela representa o nome real da planilha original).
Vamos chamar a outra planilha ShortSheet, que conterá uma cópia apenas das células relevantes.
(1) Na YourOriginalSheet, Selecte Copya gama de células relevantes (ainda não cole em qualquer lugar).
(2) Adicione uma nova planilha chamada ShortSheet, coloque o cursor na célula que representa o canto superior esquerdo do intervalo que está sendo copiado (provavelmente A1) e cole da seguinte maneira:
(2a) Paste Special...> Formulas[clique com o botão direito do mouse na célula do canto superior esquerdo]
(2b) Paste Special...>Values
(2-C) Paste Special...>Formats
(2d) Paste Special...>Column Widths
(2e) Inclua outras Paste Specialopções que você acha que podem ajudar a melhorar a aparência da folha.
(3) Pressione Ctrl-Shift-Endpara encontrar o canto inferior direito de ShortSheetpara garantir que ele contenha todos os dados relevantes.
(4) Savea pasta de trabalho. ( Save As ...um novo arquivo se você quiser um backup.)
(5) Excluir YourOriginalSheet(os dados relevantes estão atualmente salvos em ShortSheet.)
(6) Renomeie ShortSheetpara o nome real da sua folha original.
Nada mudou, exceto para tornar a pasta de trabalho muito menor; portanto, todas as macros, referências externas a esta planilha etc. devem continuar funcionando.
Aqui está um macropara realizar as etapas em (2).
Sub pasteSpecialAll()
Selection.PasteSpecial Paste:=xlPasteFormulas, Operation:=xlNone, SkipBlanks:=False, Transpose:=False
Selection.PasteSpecial Paste:=xlPasteColumnWidths, Operation:=xlNone, SkipBlanks:=False, Transpose:=False
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks:=False, Transpose:=False
Selection.PasteSpecial Paste:=xlPasteFormats, Operation:=xlNone, SkipBlanks:=False, Transpose:=False
End Sub
Antes de usar a macro Select e Copy o intervalo relevante, como foi feito na etapa (1).
Salvei minha macro na minha Personal.xlsbpasta de trabalho para uso futuro em qualquer lugar e atribuí o pressionamento Ctrl + Shift + Vde tecla a ela.