Página 1 de 1

Botão para imprimir doc a partir de dados da célula

Enviado: 30 Jun 2016 às 11:07
por FrancieleCris
Pessoal,

Sou nova aqui e estou me batendo pra fazer algo.

Tenho uma tabela com várias colunas com informações, daí quero criar um botão que quando eu clicar nele ele peça a localização da primeira célula da linha e quando eu fornecer essa informação, ele gere um documento (etiqueta) que conste todas as outras informações contida na linha e imprima esse documento gerado.

Não tenho nem ideia por onde começar, só sei fazer o botão, mas não sei criar a macro.

Planilha com informações
Imagem

Tipo de etiqueta a ser gerada
Imagem


Valeuss

Re: Botão para imprimir doc a partir de dados da célula

Enviado: 30 Jun 2016 às 11:47
por alexandrevba
Bom dia!!

Se postar o modelo, talvez possamos ajudar.
Código: Selecionar todos
Sub PostSeuArqModelo()
    Dim val As String
    val = InputBox("Digite o Código", "AleVBA!")
    Range("A1").Value = val
End Sub
Use o botão para inserir o código na parte da table de Etiqueta, com um procv retorne as outras colunas nesta parte.
Use o comendo para imprimir essa table de etiqueta.
Código: Selecionar todos
Plan1.Range("SeuIntervalo").PrintOut 
Att

Re: Botão para imprimir doc a partir de dados da célula

Enviado: 30 Jun 2016 às 17:42
por FrancieleCris
Alexandre, obrigada pela resposta, ajudou um pouco, mas ainda estou com algumas dúvidas.

O que você passou, cria a caixa de mensagem pedindo a célula, porém o que preciso é que ao clicar no botão, eu possa digitar por exemplo: A5 (a primeira célula que contém a informação que eu quero imprimir) e aí após dar enter, o programa gere uma etiqueta com as informações que constam nas colunas seguintes da linha da célula que informei (que está em outra aba).

Tenho uma aba em que coloco todas as informações e na outra vai ter só o botão, onde vou gerar a etiqueta.

Aqui é a planilha onde carrego as informações:
Imagem

Aqui é a aba onde estará o botão que vai carregar as informações da aba anterior:
Imagem