Maestro Sergio, si usted supiera que antes de esta contingencia yo solo usaba el excel para sumar columnas, que mi profesión es de arquitecta y que tengo 56 años, tal vez pensaría que la pase tejiendo ( si lo he hecho ) pero como voluntaria para un herbario tuve la necesidad de aprender como automatizar una ficha y no tiene idea de cuanto he aprendido con sus tutoriales, le agradezco que comparta su tiempo y sus conocimientos para que personas como yo podamos aprender algo tan interesante y tan útil, es usted un gran maestro, muchas muchas gracias
Buenas Sergio, Seguimos acumulando conocimiento. If "No te ha quedado claro" Then "Repetimos el Video" Else "Ver el video nº 18" EndIf 😉 Gracias por tu tiempo. Saludos desde España.
Hola Andrés, esto no está chido, está “chingón”… Ojala todos los profesores de las escuelas públicas-privadas tuvieran esta forma de enseñar y la manera de explicar de ustedes. Sergio los vídeos tienen una excelente dinámica, vídeos cortos pero que aportan el conocimiento suficiente del tema, en verdad satisfecho con todas las clases anteriores
Genial!. Una pregunta tengo una macro, que antes de ver este video, tiene varios if con end if que hasta ahora estan funcionando bien. Reemplazar Estos if independientes por Else If y cerrarlos con un End If, optimiza la macro o solo le da un toque más profesional?
Buen día Sergio en la hoja de cálculo (de este video) a la izquierda se muestra una barra que oculta o muestra filas, de que forma se activa y/o desactiva esta barra? Te agradezco de antemano tú ayuda. Excelentes tutoriales Felicidades. Desde Guadalajara México. Saludos
Hola Sergio queria saber porque cuando defines la variable "Numero1", utilizas el objeto Application.Sheets y no solamente los objetos Range.value a como hiciste con la variable Cantidad y descuento?. O el uso de estos objetos son indiferente cuando se refiere a que estas trabajando únicamente en la hoja activa?
Hola Sergio! Muchas gracias por la dedicación de cada video. En mi caso VB No me esta modificando los colores de las celdas. Probé con msgbox y funciona el If. Tendré que instalar algún complemento o hay algún paso que me habré salteado? Muchísimas gracias desde Argentina
Sergio, muy buen vídeo, y el curso genial!! Solo una consulta: Cuál es la diferencia cuándo declaramos variables en usar Set o no usarlo? Es necesario bajo que condición? O da igual? Gracias, buen día!!
Hola Camilo, "Set" es un llamado a variables de tipo objeto que pueden ser rangos, arreglos, hojas de trabajo, archivos, navegadores de internet, etc. Saludos.
Hola Sergio, me encantan tus videos. He tenido una duda que no he podido resolver, como se aplicaría la estructura if.. Then else.. En una tabla insertada en excel? ¿Es posible o no?
Hola Sergio, primero gracias por compartir tu conocimiento con nosotros los simples mortales jaja. Una duda, en esta parte del código : If Número1 >= 10 Then Range("B6").Interior.Color = VBA.vbGreen ¿Porque no es válido poner lo siguiente: If Número1 >= 10 Then Numero1.Interior.Color = VBA.vbGreen Es decir, si ya tengo declarada la variable y que esta referenciada a un rango en específico, ¿por qué especificar el rango de nuevo?
Me parece que es porque la variable "Número1" no está declarada como objeto, sino que es igual al valor de la celda, si lo hubiera declarado como objeto entonces podría modificar las propiedades con la variable, en el capítulo 15 puedes corroborarlo. Para declararlo como objeto debía comenzar con Dim Número1 as Range
Hola Sergio, gracias por tu contenido, estoy aprendiendo mucho. Pero tengo una pregunta: Por qué debo definir después del End If el descuento y por qué debo hacer lo en ese orden, es decir primero Range ("x").value = Descuento y no Descuento = Range("x").Value ? Probé ambas cosas. Y solo funciona como tú lo hiciste. gracias de antemano
Que interesante... yo creo que es porque si la declaramos al inicio como: Descuento = Range("x").Value esta variable no tiene ningún valor asociado, mas bien ya cuenta con un valor pero después de realizar el procedimiento; por eso en el ejemplo define: primero el rango (x) tiene valor x y es igual a descuento. Si no es así por favor que alguien nos explique jeje.
Sergio Buen dia, una pregunta: esto:( Range("C17").Value = descuento) es igual a esto (descuento = Range("C17").Value )??. segun el ultimo ejercicio del video si lo defino como descuento = Range("C17").Value no me actualiza la casilla de descuento. gracias
Si no me equivoco: en el 1er caso le dices dónde quieres el resultado de descuento y en el 2º caso, la celda "resultado" tiene que tener un valor desde el principio y ese valor lo utilizarás durante a macro. Esto va muy bien cuando quieres poner la variable en el excel y no en vba Aviso, soy novato de vba,, pero creo haberlo utilizado recientente.
Hola Sergio, porque en este capitulo usas esta instrucción numero1 = Application.Sheets("if then else").Range("B6") y en capítulos anteriores lo indicas así ------> numero1 = ThisWorkbook.Sheets("if then else").Range("B6") lo probé con msgbox y el resultado es el mismo, cuando usar una o la otra , Gracias
Me alegra que lo notes. En el capítulo de referencias vimos que para llamar a una hoja puede ser de manera diferentes. La propiedad Sheets es tanto de Application como de Thisworkbook, y hacen referencia a la colección hojas. La diferencia radica es que con Application.Sheets tomamos las hojas del archivo activo, y con Thisworkbook.sheets son las hojas del archivo donde la macro está alojada.
Buenas Sergio... muchas gracias por la enseñanza es de gran ayuda... tengo una consulta ojala me pueda ayudar.. la voy a resumir en un archivo excel tengo hoja1 hoja2 lo que quiero hacer es de la hoja 1 comparar columnas B y C con las columnas de la Hoja2 B y C. si son iguales me debe traer el valor de hoja2 Columna D a Hola1 Columna D. (Esto es posible?.. es decir en comparaciones todo lo que e visto se basa con valores exactos, debido a la informacion que manejo me seria mas facil comparar columnas completas mas no un valor especifico)... ojala me pueda alguien asesorar... muchas gracias nuevamente
Hola, queria saber si me puedes ayuda, estoy sumando muchos números que se optnene al seleccionar botones, de esta manera TextBox3.Text = Val(Label23) + (Label52) + (Label51) + (Label24) + (Label25), son unos 50 opciones que dan un valor, si las sumo asi, y se me olvida de apretar un boton por ende no da un valor, me depura esa suma, existe la manera de decir, si no se puede sumar todos los nuemero que de un mesanje de error? y asi no depure.
y sine la condicion tenga que comparar cadenas como lo hago+
4 года назад
Yo sinceramente lo que sé de Macros no lo aprendí de vídeos, pero veo que eres muy pausado al explicar y eso les sirve de ayuda a las personas que comienzan a programar las macros.
Una pregunta ¿Por que a la variable cantidad no le pones SET ? o ya se sobre entiende. Pdt: Ya me vi la clases pasadas pero no logro entender por que no lo pones. Muchas gracias de antemano.
Que pasa si mi celda esta vacia, If mi celda esta vacia Then rellenar Else colocar un valor.......me sale error, no se como evaluar una celda vacia con macros, si me podes dar una mano por favor. Gracias.
Compañeros buenas tardes y disculpen la molestia, me podrian indicar la combinación de comandos que uso el profe para seleccionar todos los datos en una hoja con información ? Si no mal recuerdo es algo como alt+barra de espacio :c
@@RiseATBomb Hola estimado si no mal recuerdo fue en el video 11 al 16 que dijo esa combinación el profe, pero si yo encuentro la combinación con gusto te la escribo para que también la tengas :)
Pero si los datos se encuentran en una hoja, y el resultado tuviera que reflejarlo en otra, eso siempre es un detalle, que no siempre explican, lo hacen todo en una hoja, pero esa es la pregunta como sería, bueno el video pero me deja solo esa duda...saludos
Sergio, Muchas gracias. Te Comparto mi código : Sub DescuentoPorVolumen() Dim Cantidad As Byte Cantidad = Application.Sheets("Hoja2").Range("B14").Value Dim Descuento As Double Descuento = 0 'Descuento1 = Application.Sheets("Hoja2").Range("C9").Value 'Descuento2 = Application.Sheets("Hoja2").Range("C10").Value 'Descuento3 = Application.Sheets("Hoja2").Range("C11").Value If Cantidad < 10 Then Descuento = Application.Sheets("Hoja2").Range("C9").Value ElseIf Cantidad >= 20 Then Descuento = Application.Sheets("Hoja2").Range("C11").Value Else Descuento = Application.Sheets("Hoja2").Range("C10").Value End If Application.Sheets("Hoja2").Range("D14").Value = Descuento End Sub
Daniel según veo parece que en el ElseIf Cantidad >= 20 Then, dejas sin comparar el rango de 10 a 20, porque tu instrucción según parece hace comparación de cantidad mayor o igual a 20... saludos daniel desde México
Hola Sergio creo que voy tomando mas el hilo en esta 2da vuelta, gracias Sub comisiones() Dim ws_cant As Byte Dim ws_dcto1 As Double Dim ws_dcto2 As Double Dim ws_dcto3 As Double Dim ws_dcto As Double ws_dcto1 = ThisWorkbook.Sheets(1).Range("B11").Value ws_dcto2 = ThisWorkbook.Sheets(1).Range("B12").Value ws_dcto3 = ThisWorkbook.Sheets(1).Range("B13").Value ws_cant = ThisWorkbook.Sheets(1).Range("A17").Value If ws_cant < 10 Then ws_dcto = ws_dcto1 ElseIf ws_cant < 20 Then ws_dcto = ws_dcto2 Else ws_dcto = ws_dcto3 End If ThisWorkbook.Sheets(1).Range("C17") = ws_dcto End Sub
Los conceptos y explicaciones son las misamas que se han venido impartiendo debes procurar poner ejemplos practicos te sugiero cada video plantear alguna aplicacion sencilla hasa llegar a algo complejo se hace aburrido seguir asi tus clases
Sergio, muy buen vídeo, y el curso genial!! Solo una consulta: Cuál es la diferencia cuándo declaramos variables en usar Set o no usarlo? Es necesario bajo que condición? O da igual? Gracias, buen día!!
Hola, por lo que he entendido, en este caso no utilizamos Set porque nuestras variables no las hemos del tipo "Woorkbook, Sheet o Range", sino que están como Byte (en este caso).