Conforme está comentado logo abaixo do nome no código que passei ('marcar a Referência 'Microsoft Forms 2.0 Object Library), é preciso marcar a Refer...

Veja se aproveita algo. O código abaixo "copia" os conteúdos das células do intervalo 'B3:B12' para a Área de Transferência e cola em 'E3:E1...

Olá, Mariana. O código funciona também para a colagem mas de apenas uma célula por vez, pois eu coloquei um comando no código que impõe essa limitaçã...

Cole o código abaixo no módulo da planilha. A propósito, sugiro que você mude o código que envia e-mail, que está no módulo da planilha, para um módul...

Experimente: substitua esta linha vPagina = ActiveSheet.HPageBreaks(i).Location.Row - 1 por esta vPagina = ActiveSheet.HPageBrea...

sugestão - disponibilize uma amostra do seu arquivo e informe em qual célula será lançado o código lido pelo leitor do código de barras

substitua esta linha 'Sheets("Matriz").[A1] = Range("A2:F" & LR).SpecialCells(xlCellTypeVisible)(1...

Experimente mudar as linhas abaixo para io interior do Loop: 'atualiza o valor dos nomes para a proxima linha Name = Sheets("Base").Rang...

...porém todas as vezes que aparece o nome "teste1 " no caso eu queria que fosse o valor de uma célula dessa planilha... Exemplo, 'coloque ...

Cole a fórmula abaixo em 'C25' e em seguida arraste para a direita. =PROC(2;1/($C2:$C22=C24);$B2:$B22)

Sub GeraPlanilha() Dim m As Long, k As Long, x As Long, t As Long, c As Long, r As Range, LR As Long Application.ScreenUpdating = False k = ...

Agora preciso que a planilha gerada seja alterada seu cabeçalho Claro, chefe. Já vou providenciar. na coluna "A1" Para se referir a colu...

c.Offset(0, 2).Value = Format(jtfHoraInicio.Value,"hh:mm")

Veja se o arquivo anexado atende.

Porem gostaria uma caixa de mensagem informando que esta inválido (se impossibiltar de preencher melhor ainda) Experimente aplicar a Validação de Dad...