Página 1 de 1

O código VBA não está salvando

Enviado: 28 Nov 2016 às 10:09
por Suenne
Bom dia,

criei 3 macros com fórmulas para preencher determinadas células, porém ela só funciona a primeira vez, depois ao preencher o formulário e mandar a salvar ela não cola as fórmulas.

São os seguintes códigos:
Código: Selecionar todos
Sub Seq_pavimento()
'
' Seq_pavimento Macro
'

'
    ActiveCell.FormulaR1C1 = "=VLOOKUP([PAVIMENTO],Tabela5[#All],2,FALSE)"
    Range("B12").Select
End Sub
Código: Selecionar todos
Sub Subetapa()
'
' Subetapa Macro
'

'
    ActiveCell.FormulaR1C1 = _
        "=VLOOKUP([DESCRIÇÃO SUBETAPA],Tabela6[[#All],[Descrição]:[Código_descrição]],2,FALSE)"
    Range("F12").Select
End Sub
Código: Selecionar todos
Sub Concatenar()
'
' Concatenar Macro
'

'
    ActiveCell.FormulaR1C1 = _
        "=CONCATENATE([@[CÓD_SUBETAPA]],"" - "",[@[DESCRIÇÃO SUBETAPA]])"
    Range("G12").Select
End Sub

O código VBA não está salvando

Enviado: 28 Nov 2016 às 10:46
por gfranco
As duas SUBS descritas acima estão escritas dentro do userform.
Recorte-as e cole-as num módulo.

O código VBA não está salvando

Enviado: 28 Nov 2016 às 10:49
por gfranco
Ou insira dois botões no userform e coloque-as dentro dos botões no evento click

O código VBA não está salvando

Enviado: 28 Nov 2016 às 12:09
por Suenne
Então Gfranco, eu não consegui identificar onde estou errando.

Porque meu objetivo é que quando clicar no comando adicionar ele faça essas ações também.

O código VBA não está salvando

Enviado: 28 Nov 2016 às 12:20
por gfranco
Então coloque esses códigos dentro da execução da rotina que já está no botão e não como uma sub separada.