No tienes acceso a esta clase

隆Contin煤a aprendiendo! 脷nete y comienza a potenciar tu carrera

Macros - grabando macros

36/38
Recursos

Aportes 131

Preguntas 11

Ordenar por:

驴Quieres ver m谩s aportes, preguntas y respuestas de la comunidad?

Esto no es para meterlo dentro de un curso de excel, esto merece un curso a parte y entero la verdad

conoceran alg煤n link 贸 recurso (libro) donde pueda ver casos donde aplicar las macros?, en el video nos ense帽贸 a usar con 鈥渂uscar objetivo鈥 y estuvo muy bueno.
encontr茅 estos ejercicios con macros:

  • Control de Almac茅n y Kardex
  • C谩lculo de Precios
  • Ventas y Facturaci贸n
  • Traer fotos cambiantes con macros y con formulas

Mi pregunta, es para que sirven las macros ?

Hola, a pesar de que logr茅 cumplir el reto estoy teniendo un problema. Despu茅s de grabar la macro, le soy alt + F11 y no aparece el c贸digo de esta 煤ltima, algui茅n sabe qu茅 puedo hacer?

La clase m谩s importante, a consideraci贸n personal.

Si es que no cuentan con la pesta帽a de 鈥淒ESARROLLADOR鈥 o 鈥淒EVELOPER鈥 como dejare aqu铆 abajo 馃槃

Alguien sabe porque me sale esto? 馃槮
Sub RETO2()

鈥 RETO2 Macro

'
Application.CutCopyMode = False
Application.CutCopyMode = False
Application.CutCopyMode = False
ActiveCell.Offset(1, 0).Range(鈥淎1鈥).GoalSeek Goal:=1829, ChangingCell:= _
ActiveCell
End Sub

Reto

Reto cumplido

Sub Macro_Ejercicio2()

鈥 Macro_Ejercicio2 Macro

'
Application.CutCopyMode = False
Application.CutCopyMode = False
Application.CutCopyMode = False
Range(鈥淐23鈥).GoalSeek Goal:=1829, ChangingCell:=Range(鈥淐22鈥)
End Sub

Me gusto demasiado esta clase

Resumen

En esta clase se grabaron Macros para buscar objetivos, asignar a botones y formas con el fin de ejecutarlas de manera amigable, vimos el bot贸n de desplazamiento asignado al cambio num茅rico en la funci贸n objetivo.

Excelente teacher!

No me aparece ni un link para ver la lista de codigos mas frecuentes.

![](https://static.platzi.com/media/user_upload/image-a7f55280-3517-4215-abbc-c45b2388a01f.jpg)

Es un tema complejo que se debemanejar en un curso completo

Muy potente juntar las macros con las herramientas aprendidas previamente en este curso.

Excel informaci贸n.

Que incre铆ble lo que puede hacer excel

Para quienes deseen profundizar un poco m谩s en las macros, en Platzi hay un curso especializado: https://platzi.com/cursos/excel-avanzado-macros/

ok reto superado

Reto Cumplido:

Listo, ya quedo el reto ejemplo2

隆excelente d铆a!

Excelente complemento de herramientas con Macros

no me deja trabajar macros

Excelente clase!

Con este c贸digo se evita ver los pantallazos de la ejecuci贸n de la macro, se congela la pantalla

Sub Prueba()
Application.ScreenUpdating = False

Secuencias de macro

麓麓 Para descongelar la pantalla se pone el mismo pero terminado en true

Application.ScreenUpdating = True
End Sub

Reto:

Sub BUSCAR1829()

鈥 BUSCAR1829 Macro

'
Range(鈥淐23鈥).GoalSeek Goal:=1829, ChangingCell:=Range(鈥淐22鈥)
End Sub

Aqu铆 el reto de este curso

En una macro se pueden eliminar valores repetidos pero que sume el valor de los repetidos y solo me agregue un solo valor con el importe de los tres ??

![](

Fue todo un reto hacer el tema de los macros! pero es de gran ayuda.

Modifique el ejercicio, ahora la macro no se limita a buscar solo el valor 1829. En una celda ingreso el valor que quiero calcular y la marco me dice cuanto debo mutiplicar para que el resultado sea valor que ingrese.

Estas son las instrucciones de la macro:
Sub retoMacro()
Range(鈥淐23鈥).GoalSeek Goal:=1829, ChangingCell:=Range(鈥淐22鈥)
End Sub

En mi caso, la celda que resta 1829 al valor calculado es la D25.

De modo que mi macro queda as铆.

Sub RetoBuscarObjetivo()
Range(鈥淒25鈥).GoalSeek Goal:=0, ChangingCell:=Range(鈥淐22鈥)
End Sub

Sub Buscar1829()
鈥 Reto

Range(鈥淐23鈥).Select
Range(鈥淐23鈥).GoalSeek Goal:=1829, ChangingCell:=Range(鈥淐22鈥)

End Sub

Es un tema muy interesante.

La rpta al reto:
Sub MacroReto()

鈥 MacroReto Macro

'
Range(鈥淒25鈥).GoalSeek Goal:=0, ChangingCell:=Range(鈥淐22鈥)
End Sub

https://drive.google.com/drive/recent/macros-grabando-macros_2fb5ff22-9d37-4e27-b0be-f628047ed2e9.xlsm

Esta clase estuvo fascinante 馃槂

Como puedo hacer para que cambie el valor en tiempo real, mientras muevo el cursor el valor vaya cambiando

Muy buena clase!

Reto cumplido:

reto cumplido:

excelente

Sub Reto1()

鈥 Reto1 Macro

'
Application.CutCopyMode = False
Application.CutCopyMode = False
Application.CutCopyMode = False
Range(鈥淒23鈥).GoalSeek Goal:=0, ChangingCell:=Range(鈥淐22鈥)
End Sub

https://drive.google.com/open?id=1bRGMrlnWuG17iFWU04L-mLlssOPmSHWW

Esta es la forma en como me ense帽aron macros en la U, pero la parte de escribir las macros me pareci贸 una cosa super potente (掳銉)

Buenas Tardes

Comparto ejercicio.

CS

Listo reto cumplido.

Sub BUSCAR_1829()
Range(鈥淐23鈥).GoalSeek Goal:=1829, ChangingCell:=Range(鈥淐22鈥)
End Sub

Reto de Macro Grabada

Al final se habla de un link incrustado en la p谩gina para revisar los diferentes tipos de c贸digos. Sin embargo, no encuentro tal link, o acaso se refiere al de la sesi贸n anterior? alguien del p煤blico o del staff puede sacarme de la duda?

Excelente clase

![](

Este es el link que mencionan al final del video, igual lo encuentran en los archivos y enlaces de la clase pasada

https://www.gerencie.com/codigos-mas-comunes-de-macros-en-excel.html

Sub RETOMACRO()
鈥欌 RETOMACRO Macro
鈥 Range(鈥淒25鈥).GoalSeek Goal:=0, ChangingCell:=Range(鈥淐22鈥)
End Sub

no entender porque me aparece offset y de color rojo鈥

Aporte Reto:
Sub buscar1829()

Range(鈥淐23鈥).GoalSeek Goal:=1829, ChangingCell:=Range(鈥淐22鈥)
Range(鈥淐23鈥).Select

End Sub

Sub Buscar1829()

鈥 Buscar1829 Macro

'
Application.CutCopyMode = False
Application.CutCopyMode = False
Application.CutCopyMode = False
Range(鈥淐23鈥).GoalSeek Goal:=1829, ChangingCell:=Range(鈥淐22鈥)
End Sub