Dante Amor

Revisa si lo siguiente es lo que necesitas. Pon el código en los eventos donde tienes la tabla. Cambia "Tabla1" por el nombre de tu tabla. Cambia "F2" por la celda donde quieres pegar el resultado. Cambia "A" por la primera columna de la tabla....

¿Y cómo sabes que el empleado1 y el empleado2 pertenecen a la gerencia de sistemas?

Cambia en la macro la hoja origen y la hoja destino por los nombres de tus hojas Sub unir_columnas() 'Por.Dante Amor Dim ci As Long, cf As Long, cd As Long Dim sh1 As Worksheet, she As Worksheet ' Set sh1 = Sheets("Hoja1") 'hoja origen de datos Set...

Tienes que utilizar la función BuscarV. Revisa vídeos en youtube para el funcionamiento de la función BuscarV Aquí un ejemplo: https://www.youtube.com/watch?v=_WxfHXzQxLU Si tienes dudas, Sube el archivo a google drive, lo compartes para que...

Vamos a necesitar unas columnas auxiliares. Realiza lo siguiente: En la celda O1 pon la siguiente fórmula: =K.ESIMO.MAYOR($A1:$F1;COLUMNAS($A1:A1)) La copias hacia la derecha hasta la celda T1 y luego la copias hacia abajo. El resultado es así: Ahora...

Prueba lo siguiente: Private Sub CommandButton1_Click() Dim f As Range Set f = Cells.Find(What:=Me.ComboBox1.Value) If Not f Is Nothing Then f.Activate Unload Me Else MsgBox "el dato no se encuentra en esta hoja" Me.ComboBox1.Value = ""...

Con esta fórmula puedes calcular el número de semana: =NUM.DE.SEMANA(Tabla2[[#Esta fila],[Fecha]],2) Pon esta macro en los eventos de la hoja "Inicio". Cada que cambies la semana en la celda D4 en automático te copiará los datos que coinciden con la...

Siempre es complicado trabajar con nombres, ya que no existe un patrón o que todos los nombres sean homogéneos. Si bien en tu ejemplo, le patrón sería que los nombres tienen 2 apellidos. Pero si en algún caso un nombre tiene más de 2 apellidos...

Puedes hacerlo con fórmula. En la hoja May, pon la siguiente fórmula en M2 y la copias hacia abajo =SI.ERROR(BUSCARV(L2;InfoRecursos!$A$2:$B$3000;2;0);"") Si lo quieres con macro, entonces: Sub Macro1() Dim lr As Long Dim nombre As String With...

Y doy a guardar cuando vuelvo a buscar el archivo me aparece 44233 ¿El 44233 te aparece en la celda? Pon aquí el código que utilizas para pasar los datos a la celda. Utiliza lo siguiente: Para pasar el dato de la celda al textbox. Cambia Range("A2"),...