Bom dia ! Adoro este forum por essa razao, aqui nao ficamos sem as devidas respostas. 1- Por enquanto ele possui 3.350Kb 2- Os codigos muito gramde ...

Outra pergunta que faco, se eu transformar esta planilha em executavel, podera ficar mais rapida ?

Outra coisa que percebo aqui, é se eu deixar algumas plans desbloqueadas aparecem os pontinhos vermelhos dizendo que tem problema de calculo ou format...

Era axatamente isso que eu queria MPrudencio ! Muito Obrigado. Em breve vou postar aqui uma demonstracao de minha Planilha pronta. A proposito conse...

Ola , vejo daqui a pouco, estou scaniando pelo inicializar meu note, dai te falo, certo de que vai ficar bom. Grato Andre

vou enviar a planilha conforme solicitado no outro topico, ok . Andre

A sim, quero colocar as porcentagem para aparecer nas TextBox 12, 13 e 14 e nas demais que aparecam R$ incuindo os centavos Text Box : 1,2, 3 , 4, 5,...

Eis ai Private Sub UserForm_Initialize() Dim Loja As String Loja = Range("B1").Value TextBox11.Value = Sheets(Loja).Rang...

consegui nao veja que postei logo abaixo da mensagen dele Andre

Oi o meu funciona assi: TextBox13.Value = Sheets("Empresa").Range("F50") TextBox13.Value = Sheets("Empresa").Range(&quo...

Grato M.Prudencio !

Eu acho que tem a ver com isso : Dim Cont1 As Long Long nao se refere a monetario correto ? Qual colocaria no lugar deste ? Andre