Página 1 de 1

Cadastro em VBA e formulas.

Enviado: 23 Nov 2017 às 16:21
por pasedo
Ola, boa tarde, peguei esta planilha em um forum e achei ela interessante, mas eu gostaria de efetuar o cadastro nas partes de titulos de cor verde pelo formulario em vba, mas não estou conseguindo, se eu efetuar direto na planilha as formulas funcionam certinho, mas pelo Useform1 não da certo as formulas e o cadastro não sai da linha 4. Podem me ajudar ? Grato


OBS: Onde tem a Data Corrigida e Mês Vencimento Última Parcela tem Formulas.

Re: Cadastro em VBA e formulas.

Enviado: 23 Nov 2017 às 16:40
por alexandrevba
Boa tarde!!

Use assim:
Código: Selecionar todos
Private Sub CommandButton1_Click()
Dim ws     As Worksheet
    Dim LastMasterRow As Long
    Set ws = ActiveWorkbook.Worksheets("CARTAO CREDITO")
    With ws
        LastMasterRow = .Cells(Rows.Count, 2).End(xlUp).Row + 1
        .Cells(LastMasterRow, 2).Value = TextBox1.Value
        .Cells(LastMasterRow, 3).Value = TextBox2.Value
        .Cells(LastMasterRow, 4).Value = TextBox3.Value
        .Cells(LastMasterRow, 5).Value = TextBox4.Value
        '.Cells(LastMasterRow, 6).Value = TextBox5.Value
        '.Cells(LastMasterRow, 7).Value = TextBox6.Value
    End With
    MsgBox "Dados adicionado", vbInformation, "Menssagem"
    Set ws = Nothing
End Sub
Att

Re: Cadastro em VBA e formulas.

Enviado: 23 Nov 2017 às 16:51
por gfranco
Boa tarde.
Veja se é isso que deseja.
Ajustei as células de lançamento do userform.

Cadastro em VBA e formulas.

Enviado: 24 Nov 2017 às 09:40
por pasedo
Ola, bom dia,muito obrigado por me ajudarem , olhem tive que fazer umas adaptações pra dar certo, agora o problema é nas formulas que vai de junho 2018 até dezembro de 2018, e no textbox do Valor tenho que digitar "ponto" em vez de" virgula" pra dar certo ao cadastrar na planilha e aparecer em reais no caso das formulas se coloco numero de prestações acima de 20 parcelas ou 7 dependendo da data que eu estiver colocando não faz o calculo na planilha neste meses que falei , por favor podem ver isto tambem?

Re: Cadastro em VBA e formulas.

Enviado: 30 Nov 2017 às 09:49
por wesleyribeiro123
Pasedo
Bom dia,

Veja se é desta forma que você deseja...
Fiz alguns poucos ajustes.

Cadastro em VBA e formulas.

Enviado: 30 Nov 2017 às 12:01
por pasedo
wesleyribeiro123, boa tarde, perfeito. Era isto mesmo, muito obrigado.