Excel VBA and Macros - Chapter 23 - For...Next loop and structured programming @EXCELeINFO

[@FELENRIQUE]

Muchas gracias Sergio por tus excelentes clases.

[@sanchezalexito]

Wooooa!!!! Me emocioné con este video y el ejercicio tan padre. Ya se me está quitando el temor al código VBA y espero ponerlo pronto en acción.

[@rodrigocorrales5049]

gracias Sergio. Eres un excelente profesor. Sigo aprendiendo mucho. Dios te bendiga

[@adminpowermix]

Sergio muchas gracias, por tu tiempo y dedicación, excelente curso!!!!!!, ojala con el tiempo pudieras hacer un curso dejando tareas asignadas por tema visto para practicar con una estructura fija y retadora, y desarrollarlo al iniciar el siguiente video, esto con el fin de poner en práctica lo visto en el video pero con casos prácticos y cotidianos, es una sugerencia más sin embargo sino se pudiera de todas formas muchas gracias por el excelente material, un fuerte abrazo desde Colombia

[@christianrodriguez3022]

Este video es asombroso. Excelente forma de explicar. Gracias nuevamente por el curso

[@carolcabrera8103]

Sergio Alejandro, tienes una EXCELENTE manera de enseñar: Planificada, Ordenada y muy Clara, sigo aprendiendo con mucha dedicación. Mil Gracias.. es el mejor curso que he visto...

[@GabrielDeGondor]

Muy bueno Sergio, mucha claridad en la explicación, Saludos desde Argentina.

[@williamallasiechevarria2005]

Excelentes clases, la verdad contigo si dan ganas de aprender Macros en excel. Muchas gracias y que Dios y el Universo te llenen de bendiciones y mucha abundancia. Saludos.

[@samuelfranciscogarcia1440]

Me gusta todo lo que haces y GRACIAS por regalarme tu conocimiento 👪💇

[@Mar10Bravo]

Sin duda ver estos videos y aplicarlos a mi trabajo me han ahorrado mucho tiempo.

[@CarlosOrtiz-vp3fg]

Excelente Profesor. Estoy aprendiendo mucho y siguiendo los videos uno a uno con bastante interes y deseos de aprender mas. Su forma de enseñar es muy buena y repasar lo aprendido de los videos anteriores en uno nuevo me parece correcto. Gracias por compartir el curso. Saludos desde El Salvador

[@alejandromiguelromerojimen7215]

La explicación del ejercicio y el desarrollo están excelentes, el curso cada vez toma mejor rumbo ya con todas las instrucciones... SALUDOS

[@SergioAlejandroCampos]

Gracias Alejandro.

[@davidmallo4850]

Me están sirviendo mucho tus videos para hacer diferentes macros para el desarrollo de tareas repetitivas en mi trabajo, sobre todo la materia explicada en los primeros 16 temas que son más fáciles para mi nivel actual. A partir del tema 17 de las instrucciones y bucles de la programación estructurada, me es más complicado, de momento, darles practicidad en mis actividades. Será cuestión de más práctica. Además tu dicción y vocabulario es muy agradable y tu forma de explicar magnífica. Muchas gracias por todo

[@torricd]

Muchas gracias por el curso!!!!

[@wendycastillo2522]

GRACIAS PROFE POR COMPARTIR SUS CONOCIMIENTOS, Y FELICITACIONES POR SU EXCELENTE MANERA DE DICTAR EL CURSO...

[@jaimealonsoprietopalomar6349]

Excelente exposición. Gracias por enseñarnos de una manera fácil, sencilla, clara y didáctica. Hemos despejado muchas dudas y hemos realmente aprendido los fundamentos de las Macros en VBA..

[@HectorMendozas]

Me a parecido excelente el curso, tantas cosas buenas y bien detalladas que existen gracias Sergio.... como sugerencia a lo que se venga en este curso mas adelante avanzado de macros, seria interesante, ver el manejo con Access, Outlook, Word, la combinacion con estas dos aplicaciones que son muy útiles...

[@SergioAlejandroCampos]

Sí, en algún momento veremos integración con esas aplicaciones.

[@jorgerodriguezbueso2718]

Muy de acuerdo...!!!

[@bot6731]

Justo lo que estaba buscando para realizar mi trabajo. Gracias por el aporte.

[@johnmedina5222]

Gracias Sergio, tu conocimiento es un legado muy importante

[@juanjosanchez1484]

Genial Todos los vídeos . Muchas Gracias Sergio

[@Josegregorio2601]

Felicitaciones profe eres muy bueno impartiendo tus conocimientos en la materia

[@cristaldisenospanamapanama7515]

Muchas gracias Sergio, muy interesante, util y excelente pedagogia. Saludos!

[@tenasas10]

Excelentes los videos he aprendido un montón muchas gracias

[@carlosalcolea3152]

Excelente Sergio, muy bien explicado, sigue a si, eres de gran ayuda.

[@hectorsanchez9225]

Que buen vídeo..Gracias he dado un pasito màs !!!!

[@alexisalca4080]

Gracias, muy bueno como siempre, sigue así Sergio.

[@jorgerodriguezbueso2718]

Muchas Gracias Sergio...!!!

[@ing.luisgonzalez2206]

Saludos Sergio. Excelente curso, lo sigo completo aunque ya programo VB. La pregunta. En el cuadro de diálogo no debería ser WorkSheet en vez de WorkBook para cambiar el nombre de la hoja.?

[@AtindriyaDas]

Gracias Sergio!

[@oscarsantos9251]

grandioso Sergio gracias sal2 y pulgar arriba.

[@albertopenalver1435]

Muchas gracias Sergio. Muy buen material

[@SergioAlejandroCampos]

Gracias Alberto.

[@ericksegura1040]

Amigo saludo desde Costa Rica tu curso es maravillo, ando buscando algo similar para mi trabajo pero mi idea es que pregunte cuantas líneas desea ingresar y si dice 3 ejemplo que pida el monto de cada una de las líneas para ese ítem por así decirlo

[@rafaelvelasco2734]

Gracias Sergio, excelente profesor

[@ginover63]

Excelente como siempre Sergio, claro y conciso.

[@conradohernanvillagil2764]

Gracias Sergio.

[@juandedioshernandez5310]

excelente video Sergio, solo un comentario, el final donde le asignamos nombre a la hoja, pudo quedar al principio, de esa manera al registrar los nombre en las celdas ya se hubiera registrado con el nombre asignado

[@edgarpadillahdez8822]

Excelente Video Amigo

[@cristaldisenospanamapanama7515]

Muy agradecido, me ha sido muy util, tienes excelente pedagogia. Pregunta: Hay una manera de planificar la elaboracion de una macro? tu empiezas con las variables, como saber de antemano por donde empezar? De que manera recomiendas iniciar el trabajo, como planificar el trabajo?. Muchas gracias Sergio!!

[@SergioAlejandroCampos]

Es una pregunta muy interesante. El tema de la variables es siemple, deben de ir al inicio. Con respecto a la estructura de la macro, primero debes definir qué quieres que haga la macro, pensando los pasos en lenguaje normal, luego definir qué instrucciones usarás.

[@glorca2000]

Sergio: El bucle For Next sirve para ir realizando la misma acción en varias hojas? No me corre la siguiente macro: Sub AjustarEspacios() Dim i As Integer For i = 3 To 7 Worksheets(i).Range("Q5").Select Range(Selection, Selection.End(xlToRight)).Select With Selection .HorizontalAlignment = xlGeneral .VerticalAlignment = xlBottom .WrapText = False .Orientation = 90 .AddIndent = False .IndentLevel = 0 .ShrinkToFit = False .ReadingOrder = xlContext .MergeCells = False End With Rows("5:5").EntireRow.AutoFit Rows("5:5").RowHeight = 72.75 Next i End Sub

[@maurogajardo7538]

Muy bueno. Tengo una consulta, se puede utilizar un intervalo discontinuo, como por ejemplo que i valga 1, después 2, después por ejemplo salte a 5? Algo así como For i (1,2,5). Es que tengo una macro que hay celdas que las quiero saltar.

[@The_Barto_]

Pregunta no declaraste la variable nuevonombre y resp cómo variant??

[@diegon1370]

Hola Sergio, lo que no entendí es la definición de la variable "nuevo nombre, resp", debido a que siempre vimos que luego de la variable a definir viene la palabra as, y luego el tipo de variable. Saludos y gracias.

[@wesber80]

Hola alejandro, Dios te bendiga... Gracias por estos grandes conocimientos... Quería preguntarte si puedes hacer alguna explicación(video) de bucles anidados con el for - next y su lógica, sería excelente ya que en KZbin hay pocos que expliquen esto.

[@SergioAlejandroCampos]

Bucles anidados! Buen tema. Anotado.

[@andrespipipipe]

yo hice el codigo un poco mas sencillo, pero todo gracias a tus videos anteriores Sub forr() Dim i As Byte Dim si_no As Byte Sheets.Add Before:=Sheets(1) For i = 1 To Sheets.Count Sheets(1).Cells(i, 1) = Sheets(i).Name Next i si_no = MsgBox(" Desea cambiar el nombre de la hoja?", vbYesNo, "Modificar nombre") Select Case si_no Case 6 Sheets(1).Name = Application.InputBox("Ingrese el nuevo nombre", "Hagale pues mijo", , , , , , 2) Case 7 Sheets(1).Name = "Indice" End Select End Sub

[@carlosariza334]

Hola omo todos tus videos muy buenos mucahs gracias. pero tengo una duda en este capitulo 23 para q se creo la variable NUEVONOMBRE y tambien por que no se le asigna ningun tipo de dato a la variable NUEVONOMBRE y a la variable RESP...Gracias....y como siempre sigo aprendiendo contigo

[@christianaguilarrojas1353]

Grande Sergio!

[@d3vlin13]

Me gustaría ver un vídeo donde expliques mas a fondo la función .Dialogs

[@oOGonzaOo7]

Hola Sergio, muchas gracias por la información. Pero tengo una consulta. Cuando repito los mismos pasos que has hecho tú, mi contador empieza a contar desde cero y no desde uno. ¿Qué debo de hacer allí?

[@signifer6742]

Sergio, una pregunta sobre la propiedad Dialogs de Excel. Quizá se va a tratar más adelante. Aunque, mi duda es una simple curiosidad. Cuando usamos esta linea de comando Application.Dialogs(xlDialogWorkbookName).Show El cuadro de diálogo ya tiene como título cambiar el nombre de la hoja. hablamos de un objeto de la colección WorkSheets. Sin embargo el cuadro preestablecido es xlDialogWorkbookName y veo que no existe xlDialogWorkSheetsName. Se refiere a workbook, pero sabe que estamos trabajando con el nombre de una hoja. Me llamó la atención Te felicito por tu manera de enseñar. Haces que resulte fácil entender lo que explicas Saludos

[@mr.ridicules5850]

¿Cómo el cuadro de diálogo propio de Excel sabe que le quiero cambiar el nombre solamente a la primera hoja? Saludos, excelente video Greetings,

[@edgarpadillahdez8822]

Amigo haces otro video que hables de word

Exacto, hay otro que es Go Sub, tampoco ese. Desde que existe el encapsulamiento o el llamado a otras Macros.

[@yomero327]

Hola, tengo una duda, si tengo una columna con 3 celdas, por ejemplo "A1=0, A2=5 & A3=2" ; puedo utilizar estos bucles para que, el valor de la celda A3 pase a la celda A1?.....o inclusive a la celda A2 en caso de que fuera esta celda la que no tiene un valor. Gracias señores

[@harlesepc5906]

Por fa quien me saca de dudas, es que no entendi algo, cuando Sergio ejecuta la macro para saber la cantidad de hojas aparece el valor numero 8, osea que habian 8 hojas en el archivo, entonces cuando el crea una nueva hoja aparece como nombre hoja13, dando entender como si inicialmente habian 12 hojas, si en realidad habian solo 8, porque salio hoja numero 13 ? No deberia aperece hoja No 9. ?

[@antrax1969]

Tengo un formulario con 9 cajas de texto, quiero meter un ciclo for to next...pero me rechaza el arreglo....for i = 0 to 9....if txtnumero(i).texto= "" then....txtnumero(i).texto="0"....endif...next i......me está marcado el error en el txtnumero(i).....diciendo que no se ha definido sub o function....como puedo resolverlo?

[@santosemilianohinojosacaui7898]

Requiero concatenar varias celdas de la columna "B" de acuerdo a la columna "A" dónde tengo datos que me indican que es el inicio y el fin de las celdas que quiero concatenar. No eh buscado como hacerlo. Eh visto muchos tutoriales pero ninguno hace algo así. Si pueden ayudarme se los agradecería

[@SergioAlejandroCampos]

Qué tienes en la columna A?

[@santosemilianohinojosacaui7898]

@@SergioAlejandroCampos tengo fechas en la columna "A", y por cada una hay conceptos en una columna que quiero agrupar o concatenar

[@SergioAlejandroCampos]

Busca mi video de Agrupar con Power Query

[@santosemilianohinojosacaui7898]

@@SergioAlejandroCampos ya ví los vídeos pero no lograrán lo que busco. Mira estoy trabajando con estados de cuenta mismos que convierto a excel con un programa. El caso que los depósitos y retiros están todos bien por celdas, incluso las fechas. Ahora el tema aquí es que los conceptos están en una columna que varía el rango de acuerdo a la transacción que se realice y necesito agregar concatenado ese rango en la fila de la fecha y el movimiento. Para que mi estado de cuenta tenga una mejor presentación y para filtros sea útil y fácil el análisis. Lo quiero de esta manera: Columna a fila 1 01/01/2023 Columna B fila 1 conceptos agrupados Columna C y D fila 1 depósito o retiros Y así sucesivamente. Se un poco de macros pero por más que intento ejecutar los bucles for no obtengo el resultado. Lo que pienso es obtener el número de fila de la fecha del primer movimiento y la fila vacía antes del segundo movimiento y escribirlas en las columnas j y k dónde conociendo esos datos puedo concatenar la información de acuerdo a las filas encontradas

[@vacosauriomandaloriano]

¿Cual es la diferencia entre "For Each" y "For"? ¿Es necesario poner despues de "Next" la variable i o esta se puede no escribir?, ya que cuando uso este bucle, después de "Next" no le pongo la i, pero la macro funciona bien. Saludos

[@tesla1278]

Ambos bloques son bucles, Como la mayor parte del trabajo de programación con Excel es trabajar con Colecciones (también con propiedades de objetos) For Each se creo para recorrer colecciones enteras sin necesidad de saber de manera explicita cuantos elementos tiene la colección a recorrer, es decir, dejas de preocuparte por ese valor. No es necesario escribir la variable de control, pero se recomienda que si se haga por cuestiones de buenas practicas.

[@SergioAlejandroCampos]

Excelente respuesta Alfredo.

[@vacosauriomandaloriano]

Muchas gracias por su respuesta. Saludos ✌🖖

[@MrPerrokalato]

Hola Sergio .... En casos usó SET y WITH ?

[@SergioAlejandroCampos]

Hola. Set para pasar toda una referencia de un objeto a una variable y WITH para evitar escribir toda la referencia de un objeto y ahorrar código. En videos pasamos lo explicamos al fondo, has podido verlos?

[@MrPerrokalato]

Vaya creo que no ... Revisaré uhmn

[@MrPerrokalato]

Lo necesito para mantener un área uniforme para poder imprimir varias áreas ya sea en papel o PDF

[@tesla1278]

@@SergioAlejandroCampossi me lo permites Sergio, un comentario complementario. Como la mayor parte del trabajo con Excel es trabajar con colecciones y propiedades de los objetos, With End With se creo cuando tienes que manipular varias propiedades de un mismo objeto. Con esto escribes menos código, el rendimiento de tu procedimientos se incrementa en velocidad, ya que Excel no tiene que estar resolviendo referencia al objeto (que seria la misma referencia) y tu código se ve mas limpio y fácil de mantener y/o entender.

[@rrrraaaacccc80]

👍💯

[@manolofalcaoruiuz]

y la programación estructurada del 1:32

[@eduardoalvarez7929]

Hola! Alguien me puede ayudar? Tengo un cilco For Next en el que quiero insetar una funcion Vlookup El problema es que no encuentro como definir el rango de busqueda ya que este debe ir variando en la medida que el ciclo next avanza, es decir Para el primer ciclo la función debe buscar el valor en la hoja 1 Para el ciclo 5 lo debe buscar en la hoja 5 y asi sucesivamente El detalle es que no encuentro como estructurar la instruccion para que reconozca la variable dentro de la instrucción Vlookup Hasta ahora lo he logrado hacer pero con un valor fijo... La instrucción es del tipo ActiveCell.FormulaR1C1 = _ "=VLOOKUP(""PRECIO UNITARIO:"",'Partida 1'!R10C6:R150C7,2,0)" La idea es insertar la formula buscar para que localice un valor dentro de un rango definido y debería ir variando el valor de la partida en la medidad que avanza el ciclo for next. Gracias

[@yonymedina148]

muy buenos dias. mis saludo equipo de excelInfo. mis agadecimientos por tuda sus ayudas y recomendaciones.. enbase a eso, tengo informacion y preguntas que me podrias ayudar,, dime como seria la mejor manera de comunicarme con uds.. mil grcias

[@manuelgonzalez-yz4pf]

👍👍👍

[@37no37]

Señor Sergio, Usted lo hace muy bien, pero por favor no invite al Señor Rojas, el habla como si regañara a su audiencia, estamos muy bien con Usted. Gracias.

[@SergioAlejandroCampos]

Gracias Jeyner, aunque es cuestión de estilos. Aquí seguimos dándole.

[@luisgil6248]

hola amigo como esta disculpa y como puedo aplicar el bucle for en etste comando UF = Sheets("DATOS").Range("B" & Rows.Count).End(xlUp).Row: Fila =WorksheetFunction.Match(Sheets("Tabla3").Range("B11"), Sheets("DATOS").Range("B1:B" & UF), 0) Sheets("DATOS").Range("J" & Fila) = Sheets("Tabla3").Range("E11") Sheets("DATOS").Range("E" & Fila) = Sheets("Tabla3").Range("D11")

Ciclo for es para cobardes, NTC. De hecho yo prefiero ese ciclo.