Excel Avanzado

Macros, Vba en Excel y muchos ejemplos de nuestro Curso de Excel Avanzado

Excel Avanzado

Trucos de Excel Avanzado

Muchas veces cuando estamos resolviendo un problema en el cual empleamos VBA o macros es necesario contar con algunos ejemplos que nos puedan ser de utilidad para resolver los casos que tengamos que resolver.

En la siguiente lista de trucos de Excel Avanzado se encuentra una relación de temas relevantes, para la compresión de los mismos se requiere tener algún conocimiento de VBA o Macros a fin de poder sacarle el máximo provecho a alguno de estos, esperamos su consultas o sugerencias sobre los mismos.

  1. Símbolos Patrios de Portugal
  2. Símbolos patrios de Ecuador
  3. Personajes principales de Los Simpson
  4. Símbolos Patrios de Chile
  5. Símbolos Patrios de EL SALVADOR
  6. Símbolos Patrios de Bolivia
  7. Personajes Principales de SAILOR MOON
  8. Identificar color de celda en Excel
  9. Catalogo de imágenes (automóviles)
  10. Lista Pokemon Excel
  11. Seleccionar rango en VBA
  12. ¿Qué es ScreenUpdating?
  13. ¿Qué significa application.displayalerts?
  14. RefEdit
  15. Busqueda de datos con listbox - Aplicado al top 100 de las marcas mas recordadas por los peruanos
  16. Proteger y Desproteger todas las hojas
  17. Función para Sumar Datos por Color
  18. Sumar solo celdas en Negritas
  19. Mostrar filtros en la barra de estado
  20. Alinear un gráfico a un determinado rango
  21. Ocultar algunas flechas de selección en un Filtro
  22. Marcar las Celdas Duplicadas
  23. Reemplazar celdas en blanco con algun valor
  24. Coincidir los colores de una serie con los de las celdas de datos
  25. 5 Trucos de VBA necesarios
  26. Crear y seleccionar rangos con nombres
  27. Alternar bandas de colores con Macros
  28. Seleccionar la primera fila o columna en blanco
  29. Determinar con VBA si un archivo se encuentra abierto
  30. Seleccionar y dar formato a todos los rangos con nombres
  31. Resaltar la fila y columna activas
  32. Desproteger una hoja al abrir un libro con Macros
  33. Guardar rango de celdas como PDF
  34. Ejemplo de Números Aleatorios Únicos
  35. Ordenar datos con macros - VBA EXCEL
  36. Manejo de colores con macros en excel
  37. Identificar si archivo esta en uso VBA
  38. ¿Cómo identificar la fecha de modificación de una celda en VBA?
  39. Enviar archivo adjunto en Email con VBA
  40. Cambiar de categoría de una UDF
  41. ¿Cómo buscar un valor en un rango de celdas en VBA?
  42. Extraer primera letra de la palabra (Acrónimos)
  43. ¿Cómo ejecutar macros al abrir un archivo en Excel?
  44. Combinar dos columnas
  45. Ordenar Hojas en excel con macros
  46. Crear un Archivo por cada hoja de Excel
  47. Uso de colores para autofiltro en VBA
  48. Crear hojas de una lista (VBA)
  49. Asignar una tecla de acceso directo a una macro existente
  50. Ideas para concatenar celdas con VBA o Macros
  51. Contar palabras en Excel aplicando VBA Macros
  52. Verificar un formato de fecha con Macros
  53. La Desviación Estándar en VBA
  54. Concatenar el contenido de un rango de celdas (mail recordatorio)
  55. ¿Qué es el OptionButton en VBA y cómo se usa?
  56. Listar nombres de archivos en excel con macros
  57. Unir contenido de Celdas
  58. ¿Cómo se usan los botones de opción en VBA?
  59. Arreglos Multidimensionales en VBA
  60. Manejo de Hojas de Excel con macros
  61. ¿Cómo se usan las casillas de verificación en VBA?
  62. Catálogos de imágenes con Macros
  63. Excel Avanzado: Manejo de Libros de Excel con Macros
  64. Mostrar y ocultar líneas de división con macros
  65. Eliminar Validación de datos con macros
  66. Eliminar tíldes con Macros
  67. Cambiar un color de letra en función de la fecha
  68. Convertir números en letras con Macros en Excel
  69. ¿Cómo encontrar celdas combinadas?
  70. VBA - Objeto WORKBOOKS
  71. Intercalar filas en blanco con Macros o VBA
  72. Algunos trucos para optimizar macros en Excel
  73. Uso de WorksheetFunction.RandBetween
  74. Eliminación de comentarios en Hojas Excel
  75. Listar los links existentes con VBA
  76. Ejemplo Application.DisplayAlerts
  77. Eliminar los hipervínculos de la hoja activa
  78. Operaciones básicas con archivo y carpetas
  79. Uso de WorksheetFunction.Vlookup
  80. Formulario de Excel Avanzado para el ingreso de documentos de Salida de un Almacén
  81. UDF para el cálculo del valor futuro según pagos con Gradiente Geométrico
  82. Uso de Macros En la Elaboracion de un Índice Bursátil
  83. Macro para convertir capital con tasa efectiva
  84. Rentabilidad de activos en un horizonte de inversion variable
  85. Encontrar información eliminando filas
  86. Tabla dinámica para análisis de Quejas y Reclamos - VBA
  87. Principales propiedades de un checkbox en un userform
  88. Generador de Horarios en Excel
  89. Calculo de posiciones de partidos de la eliminatoria Brasil 2014
  90. Combobox Dependientes
  91. Validar el ingreso de un email en un textbox
  92. Validar que solo existan letras y números en un textbox
  93. Activar o Desactivar el recalculo automático (F9) en una función
  94. Identificar la última fila en uso con VBA
  95. Ejemplo de uso de Solver con Macros
  96. Cambiar los colores de fondo con VBA
  97. Uso de Resize en Offset
  98. Mostrar cuadro de dialogo "Abrir" donde se elige un archivo
  99. ¿Cómo mostrar todas las hojas ocultas?
  100. Uso de la función PROPER
  101. Creación de un listado de Archivos
  102. Buscar Objetivo (con macros)
  103. Buscar y reemplazar masivo (parte1)

25 Comments

  1. Interesante Blog, es gusto lo q uno quiere encontrar … mas adelante are mis contribuciones ..

  2. Un proyecto de VBA lo puedes proteger al colocar una clave. De tal forma que no puedan cambiar o copiar la programación.
    Para esto ingresa en el ambiente de VBA y realiza lo siguiente:
    • Selecciona el proyecto.
    • Da un clic derecho sobre el proyecto
    • Elige la opción Propiedades de VBAProject…

  3. Sino tengo cargado el complemento de Power Pivot ¿puedo visualizar y operar un archivo que tenga esta aplicación?de no ser asi, ¿se puede crear un “ejecutable” para que otros usuarios si lo puedan ver?

  4. Como se puede obtener de una lista de excel de una viñeta un elemento de otra viñeta sin el uso de macros

    • Eso de logra con validación de datos, dale una mirada a:

      www.excelintermedio.com/lista-desplegable-de-datos-en-excel/

  5. Cuando se trabaja con base de datos en hojas de excel, se necesita tener en las columnas de tus tablas elementos que ya se han definido anteriormente. Esto se necesita hacer debido a que cuando se llena las hojas se puede colocar el mismo elemento pero con mayúscula, en plural, etc. Cuando se filtra se contabiliza estos elementos de manera separada y causa errores. Es por ello que se recomienda utilizar la herramienta VALIDACIÓN DE DATOS, en criterio de validación se utiliza la lista, se ubica los elementos a elegir, se arrastra y se tiene una lista. Con este sencillo ejemplo se tiene una lista de elementos que uno mismo ha señalado y no habrá confusiones a la hora de filtrar estos elementos.

  6. Hola mira tengo un excel con macros, que tiene fecha creacion del 2013 y yo lo modifique pero cambio solo la fecha modificación, que puedo hacer para cambiar la fecha de creacion?, es para un trabajo para que no detecten que lo edite en vez de crear. gracias

  7. Hola … tengo el siguiente caso :

    En una hoja de la planilla Excel coloco una matriz (3×3) partiendo desde la celda A7 hasta la celda C9, ahora bien me doy un amplio rango para ordenar los números de esta matriz, entre la celda A1 hasta celda C15 (en las restantes celdas no hay datos) y requiero que se ordene de mayor a menor pero en la misma ubicación.

    Al hacer una macro utilizando todo el rango (desde A1 hasta C15) las coloca siempre ordenadas a partir de la celda A1 y obviamente si lo efectúo manualmente y reduzco el rango a las que las contiene datos me las deja como quiero.

    Alguna macro o instrucción me permite realizar este procedimiento.

    De ante mano gracias y saludos

  8. Hola que tal.

    quisiera hacer una consulta. Tengo un problema al ejecutar:

    Private Sub Worksheet_Activate()
    Sheets(“GUIAS”).Cells(4, 2) = Format(Now, “MM/DD/YYYY”)
    End Sub

    Me sale error de compilación, no se puede encontrar en proyecto o biblioteca.

    La cree en excel 2003 pero trato de ejecutarla en 2010 y 2013 y sale ese error. Podrían ayudarme? Gracias 😉

    • Ojo con las comillas dobles, ya que las copié tal cual las tienes y me sacó error.

      Ensaya esto:

      Sub Worksheet_Activate()
      Cells(4, 2).FormulaR1C1 = Format(Now, “MM / DD / YYYY”)
      End Sub

      Si te sirve, es con mucho gusto…

  9. como puedo leer un dato en negrita de una tabla dinamica?

  10. Buenos días,

    tengo varias filas combinadas ya que cada fila tiene el mismo dato, pero al filtrar solo me filtra una de las filas por lo que no puedo ver realmente todos los datos asociados a esa información.

    NÚMERO DESCRIPCIÓN CAPACIDAD MEDIO
    CUARTO

    CARROS
    MOTOS
    1 TIPO A 90 CAMIONES
    BICICLETAS
    CAMIONETAS

    y al filtrarlo solo me aparece la primera fila! como puedo solucionar esto?

    agradezco su ayuda.

  11. Buenas! Quisiera saber si hay alguna manera de hacer una lista desplegable en una celda la cual, al abrir la lista, cada dato tenga una casilla de verificación para poder marcar sólo las que queremos.
    Me explico. Necesito crear una relación de pisos que están alquilados por meses sueltos, entonces quisiera tener una lista en la que poder marcar que en el piso X la persona Y lo tuvo alquilado enero, marzo y julio….no sé si se puede hacer, la idea es que haya una lista con los meses y al desplegarla, pueda ver los meses marcados..
    Gracias!

  12. Hola…!
    Estoy creando mi primera macro… pero al ejecutarlo para probarlo en otra hoja del mismo libro me sale la siguiente ventana:
    ¡se ha producido el error 1004 en tiempo de ejecución!
    una tabla no puede superponer sobre otra tabla.

    Al dar clic en el botón depurar:

    ActiveSheet.ListObjects.Add(xlSrcRange, Range(“$A$3:$P$33”), , xlYes).Name = _
    “Tabla3”

    Espero sus comentarios
    Gracias

  13. Hola a todos, me gustaría que me puedan ayudar con el siguiente problema que a la vez es un reto que les puede servir a cualquiera algún día.

    Tengo 12 meses de venta, del cual quiero sacar el promedio de ventas de los 06 últimos meses, pero, sin considerar 4 meses cualquieras (pueden estar dentro de los 6 ultimos meses) esos meses yo lo tengo concatenado en una sóla celda.

    Gracias de antemano!

  14. Tengo un problema, creo sencillo, pero no lo puedo resolver. Tengo en una celda una lista desplegable que arme con la opcion “validacion de datos”, pero cuando comparto el archivo no se porque motivo pierde la referencia. En fin, lo que quiero hacer es, y aprovechando que tengo algunas macros en la hoja, armar el listado en la celda pero con macro, pero sin utilizar una lista desplegable, quiero que se arme la lista desplegable en la celda tal como la funcion validacion de datos pero con una macro. Se puede?

  15. Hola amigos estoy en la búsqueda de alguna macro excel para comprimir (winrar ó WinZip) carpeta completa, e realizado varios intentos con algunos ejemplos vistos en Internet pero no logro hacer lo que quiero.

    ejemplo

    Sub ComprimirArchivos()
    Dim ShellApp As Object
    Dim FileNameZip As Variant
    Dim FileNames As Variant
    Dim i As Long, FileCount As Long

    ‘ Obtener los nombres de los archivo
    FileNames = Application.GetOpenFilename _
    (FileFilter:=”Todos los archivos. (*.*),*.*”, _
    FilterIndex:=1, _
    Title:=” Seleccione los archivos para comprimir. “, _
    MultiSelect:=True)

    ‘ Salir si se cancela el cuadro de diálogo
    If Not IsArray(FileNames) Then Exit Sub

    FileCount = UBound(FileNames)
    FileNameZip = Application.DefaultFilePath & “\PruebaComprimir.zip”

    ‘ Crear archivo Zip vacío…
    Open FileNameZip For Output As #1
    Print #1, Chr$(80) & Chr$(75) & Chr$(5) & Chr$(6) & String(18, 0)
    Close #1

    Set ShellApp = CreateObject(“Shell.Application”)

    ‘ Copia los archivos a la carpeta comprimida
    For i = LBound(FileNames) To UBound(FileNames)
    ShellApp.Namespace(FileNameZip).CopyHere FileNames(i)
    Next i

    On Error Resume Next
    Do Until ShellApp.Namespace(FileNameZip).items.Count = FileCount
    Application.Wait (Now + TimeValue(“0:00:01″))
    Loop

    If MsgBox(FileCount & ” Los archivos se han comprimido en:” & _
    vbNewLine & FileNameZip & vbNewLine & vbNewLine & _
    ” Quieres ver el archivo zip?”, vbQuestion + vbYesNo) = vbYes Then _
    Shell “Explorer.exe /e,” & FileNameZip, vbNormalFocus
    End Sub

    En este ejemplo me hace algo de lo que quiero pero no escoge la carpeta completa que quiero comprimir, sino que abre y hay que escoger todos los archivo, al hacerlo con un solo archivo lo encripta pero al escoger varios me da un error.

    Me ayudan por favor

  16. Hola tengo una base de datos con la cual quiero llenar una tabla pero sin tener que poner todos y solo se pongan los que elija de una lista despegable, y asi al elegir una opcion de dicha lista se rellene la tabla automaticamente.

  17. habria la posibilidad de crear una macro que concatene celdas conservando su formato (por ejemplo color, tamaño de letra, tipo, etc)

    • Las macros extienden la funcionalidad de Excel, consrvando las restricciones correspondientes a Excel, por ejemplo, si una celda contiene un color A y otra el color B, solo se podría hacer algún artificio con el format condicional para lograr que aparezcan dos colores, en cambio, si se tratan de dos tamaños de letra ese efecto si se podría realizar sin artificios de por medio.

  18. buenas noches, tengo una consulta.

    Tengo un macro para duplicar hojas a partir de una hoja “apu”, y con respecto a un listado que tengo en una hoja “presupuesto”, todo bien hasta ahí, lo que quiero es que al momento de insertar nuevos registros en el listado y ejecute el macro se cree la hoja nueva.

    Sub apus()
    Dim HojaOrigen As Worksheet, HojaNueva As Worksheet
    Set HojaOrigen = Sheets(“Presupuesto”)
    Dim ultfila As Long
    ultfila = Range(“A” & Rows.Count).End(xlUp).Row
    ‘para recorrer los 11 registros del listado
    For i = 1 To ultfila – 1
    ‘desactivamos la actualización/refresco de pantalla
    Application.ScreenUpdating = False
    ‘duplicamos la Hoja ‘modelo’
    Sheets(“APU”).Copy after:=Worksheets(Worksheets.Count)
    Set HojaNueva = Sheets(Worksheets.Count)
    NombreHoja = Worksheets(“Presupuesto”).Cells(6 + i, 1).Value
    ‘damos nombre a la hoja con el valor de la celda D7+i
    On Error GoTo ErrorHandler
    HojaNueva.Name = NombreHoja
    ‘activamos la actualización/refresco de pantalla
    Application.ScreenUpdating = True
    ‘trasladamos el valor de la celda item
    HojaOrigen.Cells(6 + i, 1).Copy
    HojaNueva.Cells(6, 2).PasteSpecial Paste:=xlValues
    ‘Seleccionas el rango q quieres combinar
    HojaNueva.Range(“B6:E6”).Merge
    ‘trasladamos el valor de la celda descripcion
    HojaOrigen.Cells(6 + i, 2).Copy
    HojaNueva.Cells(7, 2).PasteSpecial Paste:=xlValues
    ‘Seleccionas el rango q quieres combinar
    HojaNueva.Range(“B7:E7”).Merge
    ‘trasladamos el valor de la celda unidad
    HojaOrigen.Cells(6 + i, 3).Copy
    HojaNueva.Cells(8, 2).PasteSpecial Paste:=xlValues
    ‘Seleccionas el rango q quieres combinar
    HojaNueva.Range(“B8:E8″).Merge
    ”trasladamos el valor de la celda Cantidad
    HojaOrigen.Cells(6 + i, 4).Copy
    HojaNueva.Cells(9, 2).PasteSpecial Paste:=xlValues
    ‘Seleccionas el rango q quieres combinar
    HojaNueva.Range(“B9:E9”).Merge
    ‘limpiamos el portapapeles
    Application.CutCopyMode = False
    Next i
    ErrorHandler:
    HojaNueva.Name = NombreHoja & i
    ‘activamos la actualización/refresco de pantalla
    Application.ScreenUpdating = True
    ‘limpiamos el portapapeles
    Application.CutCopyMode = False
    End Sub

  19. Hola

    Necesito realizar una validación de datos para que se pueda ingresar los siguientes numeros, dónde los primeros tres no cambian, cómo podría hacerlo. Gracias

  20. Hola
    Necesito de vuestra ayuda para poder solucionar un problema que surgió en mi proyecto.
    “Convertir el contenido de una celda en fórmula.”
    Os pongo en situación: Supongamos que tenemos por un lado celdas con valores y por otro una tabla que debe actualizarse según el valor de dichas celdas.
    A1: 4 >>> [valor_1]
    A2: 2 >>> [valor_2]
    A3: ([valor_1]*[valor_2])+Tabla_1[@[importe]] >>> [valor_calculado]
    Si llevara el signo = delante devuelve un error, por ello ha de dejarse como texto
    nota: @ es [#Esta fila]

    Tabla_1.- campos:
    [secuencia] >>> (1) será un secuencial
    [importe] >>> (10) importe x
    [total] >>> [valor_calculado] resultado ha de ser 18

    Como veréis la celda A3 es una cadena de texto y lo que se quiere es que se pueda convertir dicha cadena a fórmula.

    La pregunta es, hay función o manera alguna de convertir una cadena de texto en fórmula?

    Gracias de antemano vuestra colaboración

Deja un comentario

Required fields are marked *.


Excel Avanzado located at , Lima, Perú . Reviewed by usuarios rated: 4.7 / 5