Aneudys Martinez

Vastaria con que la instruction que dice limpia listbox2 la elimines Private Sub ListBox1_Change() ' Me.ListBox2.Clear On Error Resume Next f = 1 num = frm_Requi.ListBox1.List(frm_Requi.ListBox1.ListIndex, 0) Set r = Hoja19.Columns("C") Set b =...

[email protected] mandame el archivo para agregar la macro O si puedes una imange que se vean las columna de las dos hojas

¿Es en toda la hojas o solo en la hoja Viernes? ¿Todas las hojas tiene el botón entregado? Para el botón en seria de la siguiente manera Sub Entrtegado() Set h = ActiveSheet Set b = h.Columns("A").Find(Range("j3")) If Not b Is Nothing Then b.Select...

¿Por qué major no la eliminas ya están vacíos no tiene ningún valor? Para ocultar seria de esta manera Sub ocultar() Final = Range("a10000").End(xlUp).Row For Each celda In Range("a2:a" & Final) If celda = "" Then celda.EntireRow.Hidden = True End If...

Eso se puede deber a muchas fórmula en la hojas trata de eliminar algunas fórmulas [email protected] permite ver la hoja a ver que puedo hacer

[email protected] trabajemos en ellos enumerando lo que requires

[email protected] si es possible solo escribeme para enviarte un archivo

¿Lo qué requires es que se copia el duplicado? ¿O qué actualice los datos con la información nueva? [email protected] enmumera lo que require y la pregunta del foro

Seria de la siguiente manera Sub copier_celda_hacia_arriba() ActiveCell.Copy Range(ActiveCell, ActiveCell.End(xlUp)).PasteSpecial xlPasteValues Application.CutCopyMode = False End Sub

[email protected] trabajemos en eso que requiee solo enumera los puntos