Jump to content

Carlos Grados Ames

Members
  • Content Count

    34
  • Joined

  • Last visited

About Carlos Grados Ames

  • Rank
    Member
  • Birthday 05/21/1976

Recent Profile Visitors

The recent visitors block is disabled and is not being shown to other users.

  1. Gracias a todos amigos, aunque esta es la solución que más me gustó, mil gracias jhon Jairo.
  2. Gracias Gerson Pineda, todavía se poco de power query sería una buena opción aunque desearía resolverlo con formulas también.
  3. Buenas tardes amigos del foro, quisiera que me ayuden con este problema, cree una formula matricial para extraer de una base de datos (de varias columnas y filas) solo el contenido de las celdas llenas y las pone en una sola columna, pero solo me funciona cuando la base de datos es pequeña (como unas 20 filas y 7 columnas) pero cuando uso la misma formula en una base de datos mas grande no extrae nada. Les adjunto una imagen y el archivo de excel con dos hojas BD PEQUEÑA (funciona la formula) y BD GRANDE (no funciona la formula) ={SI.ERROR(INDICE(baseA,K.ESIMO.MENOR(SI(baseA<>
  4. No, lamentablemente con este cambio sigue saliendo el mismo error ☹️
  5. Este es el codigo Sub DividirYCuadrar() Dim NumFilVisiblesEnRango As Long Dim PriFilaVisible As Long Dim FilaCeldaActual As Long Dim FilasAMover As Long Dim ValorBuscado As String Dim ConteoValorEncontrado As Integer Dim FilaEncontrada As Long Dim celda As Range If Left(ActiveCell.Value, 6) <> "Cuadre" Then Exit Sub With ActiveWindow .SplitColumn = 0 .SplitRow = 0 End With FilaCeldaActual = ActiveCell.Row NumFilVisiblesEnRango = ActiveWindow.VisibleRan
  6. Muchas gracias, ya no muestra el error, pero este código cuando lo integro con otro código mas grande si muestra error, lo muestro en las imágenes, archivo y lo explico: Como tengo casos prácticos largos, de bastantes filas, al seleccionar una celda que inicia con la palabra cuadre y algo más escrito como "Cuadre DatosGen Pcom" y teclar F10 se divide la hoja y en el panel de arriba me muestra la celda que también tiene la misma palabra "Cuadre DatosGen Pcom" con el objetivo que el usuario vea abajo la parte que tiene que llenar y arriba los datos con los que se calcúla abajo la solución.
  7. No se que debería contener la variable rango, supongo que para mostrarse en un msgbox seria dirección, al final corregido el código (con la ayuda de Haplox) el msgbox mostró $A$1:$X$15
  8. No se que debería contener la variable rango, supongo que para mostrarse en un msgbox seria dirección, al final corregido el código (con la ayuda de Haplox) el msgbox mostró $A$1:$X$15
  9. Buen día amigos, este código no me fallaba antes y ahora dice ERROR 13 "no coinciden los tipos", adjunto el código Falla cuando quiero asignar un rango a una variable (Rango) , rango que también se arma con una variable (FilaCeldaActual) Les agradezco la ayuda de antemano. Sub prueba() Dim FilaCeldaActual As Long Dim Rango As String ' el tipo de variable la cambio por range long string y siempre falla FilaCeldaActual = ActiveCell.Row Rango = Range("A1:X" & FilaCeldaActual) MsgBox Rango End Sub macro prueba.xlsm
×
×
  • Create New...

Important Information

Privacy Policy