ESTIMADOS 

buenas noches , nuevamente vengo... si es posible me ayuden (Pls)

en el Userform3 tengo un boton que dice Eliminar ( la idea es que borre datos de la hoja 2 )

y No se como hacerlo  ... disculpen me ayudarian con la sintaxis...

Descarga Historica 2 eliminar.xlsm

A mi parecer creo que la mejor opcion seria utilizar un ListBox donde salgan todos los registros y puedes hacer un buscador para que te filtre el dato que deseas y asi puedas modificar o eliminar

Private Sub CommandButton11_Click()
Dim Descarga As Range
Set Descarga = Sheets("Hoja2").Columns("C").Find(TextBox2, lookat:=xlWhole)
If Not Descarga Is Nothing Then
   Descarga.EntireRow.Delete
   CommandButton6_Click
End If
End Sub
'---------
Private Sub CommandButton6_Click()
TextBox2.Text = ""
TextBox12.Text = ""
TextBox13.Text = ""
TextBox14.Text = ""
TextBox15.Text = ""
TextBox16.Text = ""
TextBox17.Text = ""
TextBox18.Text = ""
TextBox19.Text = ""
TextBox20.Text = ""
TextBox23.Text = "" '<-------------------- estaba mal
TextBox2.SetFocus ' EL SetFocus devuelve el cursor al inicio
End Sub

 

Editado el el 27 de febrero4 años por Antoni

gracias pero con listbox ? será mas complejo...

Gracias Antonio por su ayuda RESULTO el boton Eliminar 

 

Tema Resuelto