Acho que ja vi esse pedido antes... Em todo caso, coloque em AR4: =SEERRO(MENOR($B4:$AO4;COLS($AR:AR));"") Arraste para a direita e para b...

range("A" & ActiveCell.row).select

Cara, não pude ver com detalhes (to sem tempo mesmo, mas vê se era isso): Sub teste() ActiveSheet.DisplayPageBreaks = False Application...

Eu cometi um erro, no lugar dessa linha: aut_total Data + i, Cells(10, i + 1), Cells(6, i + 1) Deve ser esta: aut_total aut + i, Cells(10, i + 1), ...

Segue a planilha. Aprendiz_GT2.zip

Primeiro, porque vc não troca essa parte: Do While Not IsEmpty(Cells(nLinFim, 1)) nLinFim = nLinFim + 1 Loop Por essa: nLinFim = Cells(Rows.Count, ...

Voce pode bloquear o VBA com senha sim. - Entra nele com Alt + F11 - Vai em Ferramentas, e pega Propriedades de VBA Projetc. - Na aba Proteção vc def...

não precisa alterar a fórmula, pois vcnão vai ter "dia negativo", a menos que preencha errada a tua planilha Fresas. Se ajudou, clique na m...

Para E3: =SOMARPRODUTO((Fresas!$O$2:$O$857)*(Fresas!$I$2:$I$857=$D3)*((Fresas!$N$2:$N$857-Fresas!$M$2:$M$857)<=15)) Para F3: =SOMARPRODUTO((Fresas...

Não entendi muito bem, mas vê se ajuda: Sub teste_GT() Dim i As Long Dim aut As Date aut = "06/01/14" For i = 1 To 14 aut_total Dat...

Marciel, não entendi sua dúvida. Vc apresentou a função DURAÇÂO() com apenas 2 argumentos, mas essa função tem 5 argumentos obrigatórios Do help do ...

Desculpe, me enganei mesmo e coloquei pra contar. Agora está somando: =SOMA(SE(ÉERROS(CORRESP(atual!$B$11:$B$64;$A$2:$A$5;0));0;1)*(ANO(at...

Vc deve usar formatação condicional. Dá uma pesquisada, caso não consiga, posta o modelo da planilha que eu (ou algum outro membro) aplico pra vc.

Colouqe esta fórmula em H2: =SOMA(SE(ÉERROS(CORRESP(atual!$B$11:$B$64;$A$2:$A$5;0));0;1)*(ANO(atual!$D$11:$D$64)=ANO($G2))*(MÊS(atual!$D$11:$D$64)=MÊ...

Cara, como a tua carta é simples, dá pra fazer tudo no Excel (o que eu acho que vai ficar mais fácil de programar). Vai em exibição e deixa em "...