Inquiridor
Criar nova planilha com nome de célula

Pergunta
-
Conforme exemplo:
https://social.msdn.microsoft.com/Forums/pt-BR/a99d8e3c-5f1f-4b2e-8753-7b6489282f20/criar-nova-planilha-com-nome-de-clula?forum=vbapt
Como faço para que as células copiadas para a nova planilha, sejam copiadas somente valores e formatação?
Por exemplo, quando criar a nova planilha as células de A7 até i11, deverá ser copiado somente valores e formatação, sem as fórmulas.
Obrigado!
Todas as Respostas
-
A macro a seguir copia os dados e fórmulas da planilha ativa e cola somente os valores no mesmo lugar:
Sub Macro1() ActiveSheet.UsedRange.Copy ActiveSheet.UsedRange.Cells(1, 1).Select Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _ :=False, Transpose:=False ThisWorkbook.Save End Sub
Anderson Diniz
- Sugerido como Resposta AndersonFDiniz2 quarta-feira, 5 de julho de 2017 14:52
-
Anderson, grato pela ajuda. Mas eu preciso que execute:
Sub fMain()
ThisWorkbook.Worksheets("Matriz").Copy _
Before:=ThisWorkbook.Sheets(1)
ActiveSheet.Name = Range("k1")
Worksheets("Plan2").Activate
End SubPorém a única coisa que preciso ajustar nessa Macro é que ao colar os dados na planilha criada, as células de A7 a i11, sejam coladas somente valores e formatação.
-
DEPOIS QUE VOCÊ JÁ COLOU OS DADOS, EXECUTE ESTA MACRO:
Sub Macro2() ActiveSheet.Range("A7:I11").Copy ActiveSheet.Range("A7").Select Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _ :=False, Transpose:=False ThisWorkbook.Save End Sub
Anderson Diniz
- Sugerido como Resposta AndersonFDiniz2 quarta-feira, 5 de julho de 2017 16:37
-
-