Página 1 de 1

COPIAR E MOVER PLANILHA COM MACROS

Enviado: 26 Mai 2015 às 11:52
por valdabr
caros amigos bom dia, estou comum pequeno problema não consigo copiar e mover para o final a planilha valdecir nesse arquivo em anexo, não sei se é pelo fato de haver macros, porém precisava desse recurso, será que é possível ?

Re: COPIAR E MOVER PLANILHA COM MACROS

Enviado: 26 Mai 2015 às 13:33
por alexandrevba
Boa tarde!!

Eu não entendi o que quer, mas leia:
https://msdn.microsoft.com/en-us/librar ... 34742.aspx
Código: Selecionar todos
Sub AleVBA_192()
    Worksheets("DADOS").Move after:=Worksheets("VALDECIR")
End Sub
Att

COPIAR E MOVER PLANILHA COM MACROS

Enviado: 26 Mai 2015 às 14:00
por valdabr
desculpe a minha falta de atenção, gostaria de copiar a planilha valdecir para poder aproveitar a formatação porém com novos nomes para mesma pasta de trabalho, pois ela é a uníca que não consigo copiar !

Re: COPIAR E MOVER PLANILHA COM MACROS

Enviado: 26 Mai 2015 às 14:32
por alexandrevba
Boa tarde!!

Lembre se de usar o Gravador de Macros
Código: Selecionar todos
Sub Macro2()
' Macro2 Macro
'
Dim nomeGuia As String

    Sheets("VALDECIR").Select
    Range("A1:I7").Select
    Selection.Copy
    Sheets.Add After:=Sheets(Sheets.Count)
    ActiveSheet.Paste
    Cells.Select
    Cells.EntireColumn.AutoFit
    Columns("K:K").Select
    Range(Selection, Selection.End(xlToRight)).Select
    Selection.EntireColumn.Hidden = True
    Rows("7:7").Select
    Range("B6").Activate
    Range(Selection, Selection.End(xlDown)).Select
    Selection.EntireRow.Hidden = True
    nomeGuia = Application.InputBox("Digite o nome da guia")
    [A1].Value = nomeGuia
    ActiveSheet.Name = nomeGuia
End Sub
Agora edite seu código.

Att