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.
Encuentra en esta lista más de 150 trucos para usar en Excel, todos los ejemplos corresponden a macros útiles en Excel, y pueden funcionar en Excel 2013, Excel 2016 y Excel 2019.
- El objeto hyperlink
- Tipos de errores en Excel
- ¿Cómo sacar un porcentaje en Excel?
- VBA IDE
- Concatenar en Excel
- Eliminar espacios sobrantes en Excel
- Mid en VBA
- Tabla de datos en Excel
- Ejecutar aplicaciones de Windows desde VBA
- Completar celdas en blanco con el primer dato
- Validar DNI en Excel
- Cambiar puntos por comas en Excel
- Date Picker
- Convertir temperatura en Excel
- Sorteo en Excel con Macros
- RemoveDuplicates VBA Excel
- Dim en VBA
- Habilitar Macros en Excel para Mac
- VBA Ancho de columna
- Evitar parpadeo en Excel (VBA)
- Guardar como PDF en VBA
- Exportar varias hojas de Excel a PDF VBA
- Doble condicional en VBA
- Crear hipervínculos con VBA
- Pasar datos de tabla a Listbox en Excel
- Mostrar u ocultar filas con Macros
- Macro para insertar imagen en correo
- ¿Cómo enviar correos masivos?
- Eliminar Filas Según Criterio
- Enviar correo con html
- Manipular Formatos en VBA
- Uso Goto
- Proceso Masivo de Datos
- HIPERVINCULOS DENTRO DEL COMBOBOX
- OPTIONBUTTONS EN UN FORMULARIO
- Fechas en Formulario con VBA
- Saltos de Página con Macros
- Mensaje de Bienvenida con VBA
- Llenar Listbox con VBA
- Simular usuario y Password en VBA
- Quitar Filtros con VBA
- ¿Qué es un Palíndromo?
- ¿Qué es un inputbox?
- Guardar y cerrar libro con macros
- Funciones de Fecha
- For Each en VBA
- ¿Cómo determinar el mayor de 4 números con VBA?
- Copiar Hojas con Macros
- Controlar el Zoom en VBA
- BeforeSave en VBA
- Keypress en VBA
- Seleccionar carpeta en VBA
- CheckBox en VBA
- El Modelo de Objetos de Excel
- VBA Guardar Como
- Quitar los filtros en VBA
- Debug.Print en VBA
- Quitar duplicados en VBA
- On Error en VBA
- Wait en VBA
- Macro para abrir y cerrar archivos en Excel
- Error 7 en VBA
- Control LABEL en VBA
- Guardar libro en VBA
- GetOpenFilename en VBA
- Función String en VBA
- Vectores en VBA
- Salto de línea en VBA
- Generar números primos en Excel
- Pantalla completa en Excel (VBA)
- Símbolos Patrios de Portugal
- Símbolos patrios de Ecuador
- Personajes principales de Los Simpson
- Símbolos Patrios de Chile
- Símbolos Patrios de EL SALVADOR
- Símbolos Patrios de Bolivia
- Personajes Principales de SAILOR MOON
- Identificar color de celda en Excel
- Catalogo de imágenes (automóviles)
- Lista Pokemon Excel
- Seleccionar rango en VBA
- ¿Qué es ScreenUpdating?
- ¿Qué significa application.displayalerts?
- RefEdit
- Busqueda de datos con listbox - Aplicado al top 100 de las marcas mas recordadas por los peruanos
- Proteger y Desproteger todas las hojas
- Función para Sumar Datos por Color
- Sumar solo celdas en Negritas
- Mostrar filtros en la barra de estado
- Alinear un gráfico a un determinado rango
- Ocultar algunas flechas de selección en un Filtro
- Marcar las Celdas Duplicadas
- Reemplazar celdas en blanco con algun valor
- Coincidir los colores de una serie con los de las celdas de datos
- 5 Trucos de VBA necesarios
- Crear y seleccionar rangos con nombres
- Alternar bandas de colores con Macros
- Seleccionar la primera fila o columna en blanco
- Determinar con VBA si un archivo se encuentra abierto
- Seleccionar y dar formato a todos los rangos con nombres
- Resaltar la fila y columna activas
- Desproteger una hoja al abrir un libro con Macros
- Guardar rango de celdas como PDF
- Ejemplo de Números Aleatorios Únicos
- Ordenar datos con macros - VBA EXCEL
- Manejo de colores con macros en excel
- Enviar archivo adjunto en Email con VBA
- Cambiar de categoría de una UDF
- ¿Cómo buscar un valor en un rango de celdas en VBA?
- Extraer primera letra de la palabra (Acrónimos)
- ¿Cómo ejecutar macros al abrir un archivo en Excel?
- Combinar dos columnas
- Ordenar Hojas en excel con macros
- Crear un Archivo por cada hoja de Excel
- Uso de colores para autofiltro en VBA
- Crear hojas de una lista (VBA)
- Ideas para concatenar celdas con VBA o Macros
- Contar palabras en Excel aplicando VBA Macros
- Verificar un formato de fecha con Macros
- La Desviación Estándar en VBA
- Concatenar el contenido de un rango de celdas (mail recordatorio)
- ¿Qué es el OptionButton en VBA y cómo se usa?
- Listar nombres de archivos en excel con macros
- Unir contenido de Celdas
- ¿Cómo se usan los botones de opción en VBA?
- Arreglos Multidimensionales en VBA
- Manejo de Hojas de Excel con macros
- ¿Cómo se usan las casillas de verificación en VBA?
- Catálogos de imágenes con Macros
- Excel Avanzado: Manejo de Libros de Excel con Macros
- Eliminar Validación de datos con macros
- Eliminar tíldes con Macros
- Cambiar un color de letra en función de la fecha
- Convertir números en letras con Macros en Excel
- ¿Cómo encontrar celdas combinadas?
- VBA - Objeto WORKBOOKS
- Intercalar filas en blanco con Macros o VBA
- Algunos trucos para optimizar macros en Excel
- Uso de WorksheetFunction.RandBetween
- Eliminación de comentarios en Hojas Excel
- Listar los links existentes con VBA
- Ejemplo Application.DisplayAlerts
- Eliminar los hipervínculos de la hoja activa
- Operaciones básicas con archivo y carpetas
- Uso de WorksheetFunction.Vlookup
- Formulario de Excel Avanzado para el ingreso de documentos de Salida de un Almacén
- Encontrar información eliminando filas
- Tabla dinámica para análisis de Quejas y Reclamos - VBA
- Principales propiedades de un checkbox en un userform
- Generador de Horarios en Excel
- Calculo de posiciones de partidos de la eliminatoria Brasil 2014
- Combobox Dependientes
- Validar el ingreso de un email en un textbox
- Validar que solo existan letras y números en un textbox
- Activar o Desactivar el recalculo automático (F9) en una función
- Identificar la última fila en uso con VBA
- Ejemplo de uso de Solver con Macros
- Cambiar los colores de fondo con VBA
- Uso de Resize en Offset
- Mostrar cuadro de dialogo "Abrir" donde se elige un archivo
- ¿Cómo mostrar todas las hojas ocultas?
- Uso de la función PROPER
- Creación de un listado de Archivos
- Buscar Objetivo (con macros)
- Buscar y reemplazar masivo VBA
04/11/2012 a las 12:26 am
Interesante Blog, es gusto lo q uno quiere encontrar ... mas adelante are mis contribuciones ..
23/05/2013 a las 12:11 pm
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…
24/01/2017 a las 7:18 pm
Por favor, para desproteger un proyecto...como haría?...
20/08/2014 a las 9:25 am
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?
26/10/2014 a las 6:40 pm
Como se puede obtener de una lista de excel de una viñeta un elemento de otra viñeta sin el uso de macros
31/10/2014 a las 3:49 pm
Eso de logra con validación de datos, dale una mirada a:
www.excelintermedio.com/lista-desplegable-de-datos-en-excel/
26/10/2014 a las 7:07 pm
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.
09/12/2014 a las 9:38 pm
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
04/03/2015 a las 2:07 pm
Hola ... tengo el siguiente caso :
En una hoja de la planilla Excel coloco una matriz (3x3) 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
10/03/2015 a las 6:51 pm
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 😉
17/03/2015 a las 1:11 pm
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...
06/04/2015 a las 7:38 am
como puedo leer un dato en negrita de una tabla dinamica?
23/04/2015 a las 12:27 pm
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.
07/05/2015 a las 4:59 am
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!
14/05/2015 a las 11:35 pm
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
22/05/2015 a las 12:46 am
Prueba añadir una macro que elimine la tabla creada previamente antes de crear la nueva tabla.
Saludos
04/06/2015 a las 5:25 pm
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!
10/06/2015 a las 8:56 am
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?
25/06/2015 a las 10:00 pm
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
11/08/2015 a las 10:11 pm
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.
22/05/2016 a las 1:30 am
habria la posibilidad de crear una macro que concatene celdas conservando su formato (por ejemplo color, tamaño de letra, tipo, etc)
01/07/2016 a las 3:46 pm
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.
22/07/2016 a las 8:03 pm
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
16/08/2016 a las 1:57 pm
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
18/09/2016 a las 10:20 am
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