cancella dati in foglio

Rem cancella celle singole o in gruppo, Rem cancella testo in listbox1
Rem cancella dati in textbox, Rem cancella testo in label1

vedi formato2.xls

Private Sub CommandButton1_Click()
Rem cancella celle singole o in gruppo
Cells(4, 1) = ""
For r = 1 To 3
For c = 1 To 2
Cells(r, c) = ""
Next c
Next r
End Sub

Private Sub CommandButton2_Click()
Rem cancella dati in textbox
TextBox1 = ""
End Sub

Private Sub CommandButton3_Click()
Rem cancella testo in label1
Label1.Caption = ""
End Sub

Private Sub CommandButton4_Click()
ListBox1.AddItem ("testo in listbox1")
ListBox1.AddItem ("testo in listbox1")
ListBox1.AddItem ("testo in listbox1")
ListBox1.AddItem ("testo in listbox1")
End Sub

Private Sub CommandButton5_Click()
Rem cancella testo in listbox1
ListBox1.Clear
End Sub

Private Sub Label1_Click()
Label1.Caption = "testo in label"
End Sub

indice