Guru do Excel e Power BI

Enviado: **18 Mar 2017 às 18:26**

boa tarde, estou copiando dados de uma planilha para outra usando o macro copiar e colar ate aqui tudo joia funciona 100% mais que colar como valores para não vim as formulas .

uso esse código para copiar e colar, onde a macro abre a planilha seleciona os dados copia vai ate a planilha que desejo colar os dados e executa o procedimento.

Código: Selecionar todos

Workbooks.Open Filename:="C:\Users\felmback\Desktop\bsc\dinamicas-bases.xlsm" ' caminho da planilha que vai ser copiados os dados
            Range("c3:ae45").Select
            
            Selection.Copy
        
            Windows("Indicadores_Diarios.xlsm").Activate '
            
            Worksheets("matriz").Select
            
            Range("c3").Select '
            
            ActiveSheet.Paste

já gravei uma macro que copia e cola os valores substitui pelo código abaixo e retornar a um erro .

Código: Selecionar todos

Selection.PasteSpecial Paste:=xlPasteValues

poderiam me ajudar..

Enviado: **19 Mar 2017 às 14:44**

Boa tarde!!

Segue algo, não testado.

Código: Selecionar todos

Sub AleVBA_4329()
    Dim wb As Workbook
    Set wb = Workbooks.Open("C:\Users\felmback\Desktop\bsc\dinamicas-bases.xlsm")
    ActiveWorkbook.Sheets("matriz").Range("C3").Value = wb.Sheets("Nome da guia aqui").Range("C3:AE45").Value
    wb.Close False

End Sub

Att

Guru do Excel e Power BI

Colar valores

Colar valores

Re: Colar valores