Dante Amor

Te anexo el código actualizado Private Sub CommandButton1_Click() Sheets(Hoja1.Name).Activate Sheets(Hoja1.Name).Range("B3:L3").Select Selection.AutoFilter ActiveSheet.Range("$B$3:$L$19").AutoFilter field:=9, Criteria1:=ComboBox1.Value u = Range("J"...

Veo la imagen pero no entiendo qué celdas son la que se tienen que llenar. Puedes poner una imagen con un ejemplo de lo que tienes. Y en otra imagen con el resultado que esperas. Una breve explicación de cómo llegaste al resultado

Envíame un correo nuevo Me explicas con detalle lo que necesitas En el asunto del correo escribe tu nombre de usuario: Francisco Jaimes

Puedes realizar una tabla con los valores Pon la siguiente fórmula en la celda C2 =BUSCARV(B2, E:F, 2,1) Nota: Cambia en la fórmula la coma (,) por punto y coma (;) si lo utilizas como separador de argumentos. En mi ejemplo debes poner en las columna...

Cuando seleccionas una celda que no tiene comentarios y quieres leer el comentario, entonces te envía error. Antes de leer el comentario puedes revisar si la celda tiene comentarios, de esta forma: Dim cell As Range For Each cell In Selection cell =...

Puede ser así Private Sub cmdevie_Click() codigo = 1011000 Set h = Sheets("ID_Usuario") Do While True Set a = h.Columns("A").Find(codigo, LookIn:=xlValues, lookat:=xlWhole) If a Is Nothing Then MsgBox "ID disponible = " & codigo Exit Do End If codigo...

Utiliza la siguiente fórmula para la celda E3: =SUMAPRODUCTO(($C$14:$C$50)*(E14:E50)) Cambia el 50 por la última celda con datos. Copia la fórmula hacia la derecha hasta la última columna con fecha.

Te anexo un ejemplo: Sub EnviarHoja() 'Por.Dante Amor hoja = "Planilla de Solicitud" ' Application.DisplayAlerts = False Application.ScreenUpdating = False ruta = ThisWorkbook.Path & "\" ' nombre = Sheets(hoja).Name Sheets(hoja).Copy...

Te anexo la macro actualizada Solamente revisa lo siguiente. En esta línea de la macro u2 = h2.Range("A" & Rows.Count).End(xlUp).Row + 1 La columna "A" significa que siempre va a tener datos, si la columna "A" no siempre tiene datos, entonces cambia...

De la pregunta original moviste las columnas, y ya no sé dónde está la información. Envíame tu archivo con ejemplos reales y me explicas con un ejemplo qué necesitas. Mi correo [email protected] En el asunto del correo escribe tu nombre de usuario...