Boa noite rdogogo Seja bem-vindo ao fórum! Como você é novato, para facilitar a tua participação, sugiro tomar conhecimento do conteúdo dos links ab...

Caio Nas respostas, não utilize o botão Citar, use Responder, que fica logo abaixo da janela da última resposta.(Eu editei todas as tuas respostas e ...

Boa noite Franciely Para facilitar descreva os critérios e condições para que seja efetuada a soma, pois assim facilita. Exemplo: Somar as células ...

Boa tarde! Veja se este código atende: Sub Importar() Dim Arquivo With Application.FileDialog(msoFileDialogFilePicker) �...

Na solução do colega wagner o fechamento da função está em local incorreto deve ser Weekday(Range("A1").Value) = 7

Boa tarde!! Chaulin, eu já demonstrei como fazer algo assim, use a pesquisa do fórum!! Recomendo fortemente: Veja:

Bom dia!! Uma ideia seria assim: Sub Teste() Sheet1.Unprotect Password:="Secret" 'Seu Codigo Sheet1.Protect Password&...

joragem Acesse o link abaixo e veja como agradecer aos colaboradores (pontuar) e como utilizar corretamente a ferramenta de marcar o tópico como Reso...

Utilizando CurrentRegion quando A4 tem valor, essa linha passa a ser considerada como parte da range. Para verificar Utilize o comando Range("A5&...

Bom dia!! Eu não verifiquei sua rotina, apenas adaptei um caso que recentemente havia presenciado. Att

Bom dia!! Use a pesquisa do fórum!

. CTRL + Page Down / CTRL + Page Up / Crtl+End / Crtl+Home ... não resolvem??!! .

DIFITI Como você é novato no fórum, para facilitar a tua participação, sugiro tomar conhecimento do conteúdo dos links abaixo: viewtopic.php?f=7&...

Boa tarde esasantos Seja bem-vindo ao fórum! Como você é novato, para facilitar a tua participação, sugiro tomar conhecimento do conteúdo dos links ...