Boa tarde!! joragen, fiz uma opção com formatação condicional sem macro e outra por macro mas um pouco diferente do que você pediu veja qual te atend...

Anderson, tente assim: Sub Imprimir() Dim copias Sheets("Relatório").Select Range("a1:h47").Select copias = Input...

Uziel, veja se esta funcionando a planilha.

Tiago_S veja se é isso.

Bom dia!! Fernando, tem um pequeno problema que esta acontecendo quando fiz essa alteração. As Checkbox não atualiza toda vez que clico em algum grup...

Obrigado Fernando. Neste post tem a planilha completa. http://www.planilhando.com.br/forum/viewtopic.php?f=10&t=23781

Para rodar uma macro a planilha não pode estar oculta. Se tentar rodar a macro com a planilha oculta vai dar erro.

Para rodar uma macro a planilha não pode estar oculta. Se tentar rodar a macro com a planilha oculta vai dar erro.

Acho que você pode simplificar e criar um botão pra rodar a sua macro. Pois do jeito que esta ela entra em loop infinito.

Boa Noite!! esbs, desabilitei a o evento update e não entendi qual o sentido dela pois quando clico em algum item da opção 8 a tabela mantido atualiz...

Boa tarde!! Incluir uma código para ele pegar a ultima linha utilizada.

odilojr, de uma olhada nesse topico. viewtopic.php?f=10&t=23721

Bom dia!! Segue planilha completa.

Fazerbem, veja se é isso.

heiderick, adpte o código abaixo na sua planilha. Private Sub Workbook_Open() Dim W As Worksheet Dim UltCel As Range Application.ScreenUpdating...