edumc8,

Boa Noite!

Não sei se entendi corretamente a sua necessidade. Todavia, veja se assim atende a sua necessidade.

Prezado,

Coloque essa fórmula em A7 ->

=SE(((LIN()-1)/6)>=$H$1+1;"";SE((LIN()-1)/6-INT((LIN()-1)/6)>0,5;"";INDIRETO(ENDEREÇO(+LIN()-6*+INT((LIN()-1)/6);COL()))))

Arraste para o lado (COL F) e para baixo. Ao determinar o número de vezes em H1, a lista é gerada automaticamente.

Depois, só copiar e colar como valores (macro bem simples).

Me avise se atende. Veja no anexo como foi feito.

Abs,

Pessoal,

Estava ausente! Vou olhar analisar os dois códigos e ver qual se encaixa na minha aplicação! Deu uma breve olha e já me surpreendi!

Desde já agradeço e dou um OK mais tarde.

Abç

Boa noite, Wagner e Mandrix.xls
Tentei usar os dois mas não consegui adaptar.
Estou usando o Excel para emitir etiquetas, pois estou importando dados XML(já vi que seria melhor em Access mas não nunca usei). Bom, assim que eu importo ele preenche alguns campos na primeira etiqueta(nome,end,nota,transp,e a quantidade de volume) Quantidade essa que irá determinar a quantidade de etiquetas (no caso cópias das células) dos campos preenchidos no formato de uma etiqueta.
Neste anexo eu tenho a etiqueta formatada, os dados não são xml mapeados pois tirei para anexar, mas assim que importo eu executo duas macros crtl+f e depois crtl+g, que primeiro copia (f) e depois acerta os números dos volumes (g) 1/6...2/6...6/6.
Existem células mescladas para chegar no formato que preciso (PIMACO) , portanto, configurei as linhas e células abaixo da mesma forma para a cópia se encaixar e na impressão sair correta, sem ajustes.
Ufa.... desculpa ai! Pode ser que existam maneiras mais simples, mas não encontrei.
Ah.. A macro (F) quase funciona, só que ela copia até 30 vezes pois não consigo determinar a quantidade então fiz uma com o maior número de volumes que tenho
em minhas notas. Na impressão eu seleciono apenas o que me interessa, se for 6 volumes imprimo até 6/6 (selecionando)....e o restante até 30 desconsidero.
Abç

Agora entendi como as células estão dispostas.

F9 para testar. Sem macro.

Me avise.

Abs,

Estamos quase lá! Será que dá para ficar perfeito ?
O preenchimento ficou ótimo , o detalhe ficou por conta da impressão! Como são fórmulas, o formato ficou preenchido para 100 etiqueta, certo?
Se quem operar a planilha esquecer de imprimir só a seleção (por exemplo uma nota com 6 volumes ele deveria selecionar as 6 etiquetas) a planilha continuará imprimindo as
etiquetas em branco, e isso vai consumir as etiquetas! Até ele ver e cancelar.
No mais, funcionou certinho.
Alguma sugestão?

Com range dinâmico para impressão vc deve encerrar o assunto.

Teste e me avise.

Abs,

Testado e aprovado.

Fiz alguns ajustes no formato e configurei a página conforme as etiquetas, ficou perfeito.

Assunto resolvido!

Abç