snaki Fco

Lo puedes hacer mediante una tabla dinámica o un filtro avanzado Pero te recomiendo la tabla dinamica

Te comparto esta macro que me ayudo mucho, espero que también lo haga contigo, en la cual tu puedes ingresar lo que quieres que se ingrese Function SoloNumeros(ByVal KeyAscii As Integer) As Integer 'permite que solo sean ingresados los numeros, el...

Primero intenta habilitar las macros, para esto debes ir a: Opciones de Excel =>Centro de confianza => Configuración del Centro de Confianza =>Configuración de Macros =>Habilitar todas las macros => Barra de mensajes => Habilitar inicio de session de...

Debe ser asi ActiveCell.FormulaR1C1 = "=(R1C4-" & HORASG2 & ")"

Cambialo por esto: Sub Abre_Txt() Dim strNombreArchivo strNombreArchivo = Application.GetOpenFilename If strNombreArchivo = False Then Exit Sub With ActiveSheet.QueryTables.Add(Connection:= _ "TEXT;" & strNombreArchivo _ , Destination:=Range("$A$1"))...

Para ponerle clave a las Hojas con protección lo debes hacer así Activesheets. Protect "Pass" Para desproteger Activesheets. Unprotect "Pass" Por lo que debes hacer es al Inicio de la macro Desproteger la hoja, y al final de esta protegerla. Con esto...

Las sumas debes realizarla en el evento KeyUp ya que debe realizarlo después que has presionado la tecla, y no en el mismo instante (onchange), entonces, en cada textbox (1 - 2 - 3), debes poner en el evento keyup de cada uno de ellos así: textbox4 =...

Para Combinar celdas se utiliza la opción "merge" Así: Range("A5:C5"). Merge Con eso has combinados las celdas. Y para que dejen de ser conbinadas Es así Range("C1:D1"). UnMerge

Así es En el ThisWorkbook, pones esto Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object, ByVal Target As Range) If ActiveCell.Address = "$A$1" Then ActiveCell.Offset(0, 1).Select MsgBox "No se pude acceder a esa celda" End If End Sub Acá...

Para sumar textbox, se debe hacer así: total = cint(textbox1) + cint(textbox2) +......................... textbox11.value = total