Este fórum está sendo desativado

[feio134]

Boa tarde!
Uma ajuda por favor. Estou a adaptar uma tabela cadastro de artigos e deparei com um problema que não estou a conseguir resolver. tenho um formulário que esta a funcionar perfeitamente, insere e elimina dados da tabela até à coluna "S", mas da coluna até à coluna "AF" tenho Formulas que precisava de limpar, porem o código para o botão eliminar esta a limpar só o conteúdo das "txtBox". Dá para colocar no mesmo código umas linhas para limpar o conteúdo das celula "S" até AF no registo selecionado? vou postar o código que estou a utilizar para limpar o conteúdo das txtBox.
Boa tarde e obrigado

Código: Selecionar todos

Sub lsLimparStudents()
    With frmCadastroStudents
        .lblCod.Caption = ""
        .txtDataRegisto.Text = ""
        .txtEncomenda.Text = ""
        .txtReferencia.Text = ""
        .txtDescricao.Text = ""
        .txtEncomendaTipo.Text = ""
        .CmbPrioridade1.Text = ""
        .cmbDescricao.Text = ""
        .cmbDesenhador.Text = ""
        .cmbLocal.Text = ""
        .txtDesenhos.Text = ""
        .cmbDificuldade.Text = ""
        .txtDataInicio.Text = ""
        .txtHoraInicio.Text = ""
        .txtDataFim.Text = ""
        .txtHoraFim.Text = ""
        .cmbEstado.Text = ""
        .txtCubo.Text = ""
        .Image1.Picture = LoadPicture("")
 
    End With
End Sub

[alexandrevba]

Boa tarde!!

Adicione essa linha

Código: Selecionar todos

Range("S1:F5000").ClearContents

Obs: Favor fazer as devidas referencias caso necessário.

Att