renatovds

Boa noite! Há algum código que eu possa colocar nessa macro abaixo para que as impressões saiam frente e verso? Eu tentei configurar a impressora para automaticamente já imprimir frente e verso mas não funcionou. Esse código é uma espécie de numeração automática da página de um documento que tenho.Toda vez que uma folha é impressa, a numeração muda. Mas queria que a impressão fosse frente/verso. Sub PAGINA() Range("D24").Activate Y = ActiveCell.Value X = Range("E24").Value Do While Y < X ActiveWindow.SelectedSheets.PrintOut Copies:=1 ' M = MsgBox(Y) ActiveCell = Y + 1 Y = ActiveCell Loop ActiveWindow.SelectedSheets.PrintOut Copies:=1 End Sub Obrigado!

Oi Jeff! Demorei pra responder porque estava viajando... Vou usar essas dicas que você deu e logo retorno com a resposta, pra ver o que será necessário mudar... Muito obrigado pela ajuda! Então, consegui dar uma simplificada nas macros utilizando essas dicas que você deu... Economiza tempo e fica com uma formatação mais agradável. O que acontece é que eu coloquei aqueles valores em Dados Pessoais meio à deriva mesmo. Na verdade aqueles valores vem de outra planilha, eu só deixei eles em Dados Pessoais para você usar como exemplo, mas nesta aba terão outras informações. O que eu faço é o seguinte: - Através de um equipamento que eu trabalho é gerada uma planilha com os resultados (aqueles que estavam à deriva); - Entro nesta planilha que enviei, seleciono o número de coletas e vou até a aba Dados do contador. O número de coletas que eu selecionar deve ser o mesmo numero de coletas que eu utilizei no meu equipamento, para os dados coincidirem. - Pego os resultados que saíram na outra planilha, copio e colo em Dados do contador. - Aí entra umas contas e tal que não faz diferença no momento. Eu não entendo muito dessa função PROCV, mas o que eu posso fazer é inserir uma nova aba nesta planilha onde os dados serão colados e depois fazer a relação com a aba Dados do contador, sem que eu precise colar diretamente nesta aba. É mais ou menos isso?

http://www.sendspace.com/file/qcenyz demorei porque no meu trampo o sendspace é bloqueado!!! ahahhahaha

Aqui tem um modelo do meu arquivo: http://www.4shared.com/office/VYtv0xDK/Clculo_EDTA.html Faça o teste: - selecione 4 coletas na primeira aba (isso vai ocultar algumas linhas na aba "Dados do contador") - copie os dados na aba "Dados pessoais" - que são para 4 coletas - cole na célula D6, na aba "dados do contador" (os dados vão caber exatamente nas células "cinza escuro" devido a escolha na primeira aba) Como eu tenho algumas fórmulas vinculadas a esses valores, elas acabam bagunçando nessa colagem!!! A sua macro já está neste arquivo. Já habilitei o "ctrl+v"... Mais uma vez obrigado!!!

Caramba jeffsilveira.... deu certinho... Fiz alguns testes agora e tá funcionando no que eu precisava... Muito obrigado mesmo!!! Vou fazer mais uns testes... mas parece perfeito!!! Valeu! Jeffsilveira... então, andei fazendo uns testes e encontrei alguns problemas para o meu caso: 1 - No meu caso as células onde eu vou colar os dados tem alguns valores. Parece que quando há valores nas células de destino a colagem fica estranha, parece que os dados são "empurrados" para baixo. Faça o teste: deixe alguns valores de C13:C25 e cole os dados de B2:B10 por cima pra você ver. Parece besteira, mas pra mim esses valores "deslocados" atrapalham umas fórmulas que tenho. 2 - Eu achei estranho quando tentei copiar esta macro para outra planilha, parece que o "ctrl+V" não funciona. Tenho que modificar algo? Teria alguma solução para esses problemas? Manjo muito pouco de macros pra poder modificá-la... Desculpe o incômodo!!! E muito obrigado novamente!

Sim... sem problema! Obrigado!

Ninguém??? Não acho isso em lugar nenhum......

Bom dia, o que eu gostaria é o seguinte: - selecionar uma série de dados, por exemplo, de B2:B10 - copiar - colar na célua B2 de uma outra planilha na qual há linhas ocultas, por exemplo, linhas 4 e 6. Ou seja, os dados deveriam ser colados apenas nas linhas visíveis. Queria que as linhas 4 e 6 fossem ignoradas e os dados continuassem a ser colados. Neste exemplo eles seriam colados de B2:B12, pois há duas linhas ocultas. É possível? Colar dados ignorando linhas ocultas? Muito obrigado!