1.consigo gerar as parcelas 2.consigo lança-las em cada planilha 3.MEU PROBLEMA: a última parcela está repetindo após o fim. No seu projeto há um cód...

Segue uma sugestão: Ao clicar com o direito na célula bloqueada que se deseja editar, o código sugerido abaixo exibirá uma "ImputBox" pedind...

No arquivo definitivo o preenchimento do intervalo é feito com validação com lista, isso pode interferir no funcionamento do código? O código deveria ...

Desculpe, Luiz, passei batido em relação à senha Veja se melhora com a alteração abaixo. substitua esta linha ActiveSheet.Protect UserInte...

Solução alternativa: a fórmula abaixo em 'B3' e arraste para baixo; formate o intervalo para "ddd" =SE(LIN()=CÉL("lin");DATA($A$1...

Veja se ajuda. 1. proteja a planilha manualmente antes de iniciar e deixe desbloqueadas as células liberadas para receber dados 2. funcionamento - apó...

Experimente esta fórmula matricial na célula 'I3'. =ÍNDICE($C$3:$C$8;CORRESP(1;($B$3:$B$8=F3)*($D$3:$D$8=MÁXIMO(SE($B$3:$B$8=F3;S...

Experimente: Sub ArranjaDados() Dim a As Long, k As Long, m As Long, x As Long, rng() Columns("J:L") = "" For a = 2 To C...

If Columns(iLSA & ":" & nLSA).EntireColumn.Hidden = False Then --> AGORA O ERRO ESTÁ AQUI. O que pode ser? Você pode corr...

Provavelmente o texto "interfaces" (exatamente escrito como está no código) não existe no intervalo pesquisado pelo código, por isso acusa o...

Experimente remover o código que está no módulo da Plan1 e colocá-lo no módulo de EstaPasta_de_trabalho.

... preciso em uma nova coluna receber o valor VERDADEIRO caso uma das células daquela linha tenha sido pintada de vermelho pela formatação condiciona...

Private Sub Worksheet_Change(ByVal Target As Range) Dim k As Long, m As Long If Target.Address <> "$A$2" Then Exit Sub Rows(&q...

Qual a fórmula que você utiliza na FC ?

wsAtiva.Range ("C12:C" & UltL)