Dante Amor

Sin problema alguno te puedo ayudar. Puedes poner ejemplos de lo que tienes y de lo que esperas como resultado O envíame tu archivo con ejemplos reales de lo que tienes, procura explicar en las hojas con colores y comentarios lo que tienes y lo que...

En un rango de celdas, por ejemplo, el rango A1 a A1000, ahí en ese rango de celdas tienes NFC, por ejemplo: A 1 A010010010100000001 2 A010010010100000002 3 A010010010100000003 4 ... y así hasta la A1000 Quieres poner en una celda, por ejemplo en la...

Te anexo el código para tu botón: Private Sub CommandButton1_Click() 'Por.Dante Amor If TextBox1 = "" Then MsgBox "Debes llenar el número " Exit Sub End If ' If OptionButton1 = False And OptionButton2 = False And OptionButton3 = False Then MsgBox...

Ejecuta la siguiente macro Sub Crear_Hiper() 'Por.Dante Amor For Each h In Sheets Select Case LCase(h.Name) Case LCase("0_Índice"), LCase("Hoja4") Case Else dato = h.Range("E8").Value If dato = "" Then dato = h.Name & "!AP3" h.Hyperlinks.Add...

Cambia esta línea For x = 97 To 217 Por esta: For x = range("E3").value To Range("E4").value Cambia "E3" y "E4" por las celdas donde vas a poner los números .

Realiza lo siguiente. Activa la grabadora de macro. Selecciona una hoja que vayas a imprimir. Entra al menú de Configuración de página, actualiza los datos de la impresión: Portrait, letter, márgenes, etc. Regresa a apagar la grabadora de macros....

Envíame el archivo y me explicas con ejemplos varios casos. Tienes que poner en amarillo en la hoja "" los datos que quieres ver en la hoja "reporte" También haz la parte que te comenté para eliminar las columnas, ya que tu archivo es muy grande....

Quedaría así: Sub Separar_Datos() 'Por Dante Amor ' Application.ScreenUpdating = False Application.DisplayAlerts = False Set l1 = ThisWorkbook Set h1 = Sheets("Hoja1") 'hoja con registros Set h2 = Sheets("temp") 'hoja temporal h2.Cells.Clear col =...

Te anexo la primer fórmula para la celda M14 =SUMAR.SI(F6:F10,3,$E$6:$E$10) Copia la fórmula para las celdas N14 y O14 Para la segunda fórmula en la celda K16, en este caso tienes que sumar cada rango y la condición 3...

Bien, reviso el archivo y te envío una respuesta. Sal u dos