Macro em Excel

[Tauri]

Boas,

Gostava que me ajudassem com um problema.

Eu quero fazer uma macro em excel....

Eu tenho um botao e queria que ao carregar nesse botao que apagasse o conteudo de 1 ou varias cells
.
Ex. (apagar o coteudo da cell A, 13)
Ex. (apagar o conteudo da cell A, 13 e B, 13)
como e que eu faco isso?

Obrigado

 

[slowman]

Tauros, pelo que entendi no teu post acho que consegues criar um Form com um botão no excel.

O que tens que fazer é o seguinte:

. No evento click desse botão criar o código para pagar a célula. (Para ires de uma maneira rápida para esse evento clica duas veze sno botão).

Bom para dar uma ajuda deixo aqui o código que após clicares no botão chama uma mensagem para meteres a célula a apagar. Deves meter a celula tipo (Linha, Coluna), mas deves meter na coluna um n.º e não uma letra. Por exempli linha 1 coluna A deverá ser: 1,1 ( sem parenteses nem espaços). Pr exemplo Linha 15, coluna F, deverá ser: 15,6.

Código:

Private Sub CommandButton1_Click()
Dim CelltoDelete As String
Dim tmp_array() As String

CelltoDelete = InputBox("Cell to delete, ex: 13(Linha),1(n.º da colna correspondente, neste caso ao A)")

If Not CelltoDelete = "" Then
tmp_array = Split(CelltoDelete, ",")
Worksheets(1).Cells(CInt(tmp_array(0)), CInt(tmp_array(1))).Value = ""

Else
MsgBox ("no value gave!")
End If

End Sub


Espero ter ajudado.

Cumps.