Adriel Ortiz Mangia

[Hola haber prueba esto Private Sub btn_autoriza_Click() Set h = Sheets("REPORT_FALLAS") 'busca el folio con Find ' Set r1 = h.Columns("D") Set b1 = r1.Find(Me.txt_placa, LookAt:=xlWhole) Set r2 = h.Columns("F") Set b2 = r2.Find(Me.txt_periodo,...

[Hola Entonces pon la macro si de ahí viene el problema

[Hola Valora la respuesta para finalizar Lo harías de esta manera Private Sub UserForm_Initialize() Dim Hoja As Worksheet ComboBox1.Clear For Each Hoja In Worksheets If Hoja.Visible <> False Then ComboBox1.AddItem Hoja.Name End If Next End Sub creas...

¿Y la lista en cuál hoja está?

[Hola Sube tu archivo y explica resaltando con colores los procesos a realizar

Va la macro Private Sub Worksheet_Change(ByVal Target As Range) If Not Intersect(Target, Range("A:A")) Is Nothing Then If Target.Count > 1 Then Exit Sub Cells(Target.Row, "B") = "" End If End Sub

[Hola Si con esto te funciona es porque es problema de la ruta, asegúrate que esté bien escrita Sub guardarfra() ' ' guardarfra Macro ' ruta = ThisWorkbook.Path & "\" nombre = Sheets("Diario").Range("g4") ' Range("A1:H45").Select...

[Hola Aquí te dieron respuesta, si tienes dudas aun sigue con la consulta y valora la respuesta .. saludos! Combobox sin duplicados con macro

[Hola valora la respuesta para finalizar Sub borra_contenido() ' 'para borra2 fila 2 Rows("2:2").ClearContents End Sub para borrar de la fila 2 al 10 Sub borra_contenido() ' 'para borra2 fila 2 al 10 Rows("2:10").ClearContents End Sub

[Hola Pon un ejemplo como deseas el resultado