Ejemplos de Excel Avanzado

Ejemplos de Excel Avanzado

Ejemplos reales de Excel avanzado

 

ejemplos de Excel Avanzado (casos reales)

Gestión de Alertas de Fechas de Vencimiento

Formato condicional para ejemplo de Excel avanzado

Se selecciona toda la columna (haciendo clic en la letra de la misma) en la que vamos a llevar a cabo el formato condicional y se seleccionan las opciones de la imagen, lo que se trata es de que aparezcan diferentes colores de alerta en función de las 3 opciones de texto que se utilizan.

 

Formato condicional personalizado

 

Código VBA en Registros/Filas

Elimina registro de la hoja cuando cumple condición y lo guarda en otra hoja

Macro que traslada registro a otra hoja que cumple una determinada condición

Codigo VBA para la macro de trasladar registro a otra hoja en función de un criterio, por ejemplo que esté pagado.

Cómo ejemplo de Macro de Excel de inyectar código, esta Subrutina de Código VBA para generar la macro de trasladar registro a otra hoja en función de un criterio, por ejemplo que esté ‘pagado’, y eliminar ese registro de la tabla principal (master). Se crea una macro vacía, y se añade el código en el módulo de Visual Basic para Aplicaciones (VBA), en que está desarrollado todo el entorno de Office y Microsoft. No es necesario tener conocimientos avanzados en el lenguaje, tan sólo tener una idea de en qué líneas realizar la modificación correspondiente. En Internet y en Foros de Excel, se pueden encontrar todo tipo de Macros y sus códigos, en función de nuestras necesidades en particular.

Sub QuitaRegistro()

‘ QuitaRegistro Macro

Dim Ht1, Ht2 As Worksheet
Set Ht1 = Worksheets(«Hoja2»)
Set Ht2 = Worksheets(«Hoja3»)
Ht2.Select
nFilas2 = Cells.SpecialCells(xlLastCell).Row
Ht1.Select
nFilas1 = Cells.SpecialCells(xlLastCell).Row
‘Trasladar Pagadas
For i = 2 To nFilas1
If Cells(i, «B») = «Pagada» Then
nFilas2 = nFilas2 + 1
Ht1.Rows(i).Copy Destination:=Ht2.Rows(nFilas2)
End If
Next i
‘Depurar Pagadas
For i = 2 To nFilas1
Volver:
k = k + 1
If k > nFilas1 Then Exit Sub
If Cells(i, «B») = «Pagada» Then ‘Criterio
Rows(i).Delete
GoTo Volver:
End If
Next i
MsgBox «Finalizado.»
End Sub

*Código VBA de la Macro de Ariel E. Reynoso

 

Macro borra registros/casos en blanco de una hoja de pedido y mantiene los registros realizados por el cliente

 

Macro consolida pedido y limpia los registros de debajo

Macro que consolida el pedido realizado por el usuario/a, y limpia los registros/casos/filas de la hoja que quedan vacíos debajo, para poder imprimir o guardar con otros sencillos botones de Macro, si se requiere.

CÓDIGO VBA DE LA MACRO:

Private Sub CommandButton1_Click()Dim Fila As Integer

Dim Contador As Integer
Fila = 18
Contador = 66

Do While Contador > 0
If Cells(Fila, 1).Value = «» Then
Rows(Fila).Delete
Rows(Fila).Delete
Else
Fila = Fila + 2
End If
Contador = Contador – 1
Loop

End Sub

 

BuscarV coincidencia aproximada

BuscarV() coincidencia aproximada para rangos

Ejemplo de función de Excel avanzado BuscarV() coincidencia aproximada para solventar problema de rangos de orden ascendente, también se puede llevar a cabo, de una manera quizá más tradicional con un condicional anidadado, esto es, un condicional SI dentro de otro SI (el primer paréntesis que se abre en la anidación, es el último que se cierra).

 

estamatica@gmail.com