PK pergunta:
Eu tenho uma planilha onde introduzo alguns valores. Ao clicar em um botão de macro, desejo que os valores ou seus resultados calculados sejam anexados a uma planilha ou arquivo diferente.
Boa pergunta. Digamos que os valores estejam nas células C10 e E12 da Planilha1 e você deseja que eles sejam anexados à próxima linha da Planilha2.
O verdadeiro truque aqui é o código para localizar a próxima linha na Planilha2. Começando na última linha na Folha2 (A65536) e usando .End (xlup) encontrará a última linha com dados na coluna A. Adicionar 1 a essa linha irá apontar para a próxima linha de dados na Folha2. Use este código:
Sub CopyThem() NextRow = Worksheets("Sheet2").Range("A65536").End(xlUp).Row + 1 Worksheets("Sheet2").Cells(NextRow, 1).Resize(1, 2).Value = Array( _ Worksheets("Sheet1").Range("C10").value, _ Worksheets("Sheet1").Range("E12").value) End Sub
