Para evitar datos duplicados tendríamos que agregar estas condicionales al código explicado en el video. Porque si tenemos dos apellidos igual va sumar igual a dos y lo va tomar como repetido por lo tanto poner este código. If uno > 1 Then uno = 1 End If If dos > 1 Then dos = 1 End If ::::::::::: EL CÓDIGO FINAL QUEDARÍA ASÍ::::::::::: ABAJO Private Sub BT_AGREGAR_Click() nombrev = Me.txt_nombre.Value apellidov = Me.txt_apellido.Value If nombrev = "" Or apellidov = "" Then MsgBox ("Ingrese Nombre y apellido") Exit Sub End If uno = WorksheetFunction.CountIf(Range("C:C"), nombrev) dos = WorksheetFunction.CountIf(Range("D:D"), apellidov) If uno > 1 Then uno = 1 End If If dos > 1 Then dos = 1 End If MsgBox ("Primero: " & uno & "segundo :" & dos) sumando = uno + dos If sumando = 2 Then MsgBox ("El registro ya existe") Else If Me.txt_nombre.Value "" Then Range("B4").EntireRow.Insert End If
Range("B4").Value = txt_codigo.Value Range("C4").Value = Me.txt_nombre.Value Range("D4").Value = Me.txt_apellido.Value Range("E4").Value = Me.txt_sexo.Value Range("F4").Value = Me.txt_edad.Value txt_codigo.Value = Range("B2").Value Me.txt_nombre.Value = Empty Me.txt_apellido.Value = Empty Me.txt_sexo.Value = Empty Me.txt_edad.Value = Empty Me.LISTA.RowSource = "CLIENTES" Me.LISTA.ColumnCount = 5 End If End Sub
El problema aún continua cuando se quiere registrar un cliente con nombre y apellido de clientes diferentes. Ejemplo: si tenemos clientes Juan Lázaro y Carlos Pérez y queremos registrar Juan Pérez no nos deja registrar
@@juancarlos-zh2uc Este es el código que yo hice y es justo para evitar esos errores: Private Sub BT_AGREGAR_Click() If Me.txt_nombre.Value = Empty Or Me.txt_apellido.Value = Empty Or Me.txt_sexo.Value = Empty Or Me.box_edad.Value = Empty Then MsgBox ("Rellene todos los campos") Else nombrev = UCase(Me.txt_nombre.Value) apellidov = UCase(Me.txt_apellido.Value) repeticiones = WorksheetFunction.CountIfs(Range("C:C"), nombrev, Range("D:D"), apellidov) If repeticiones > 0 Then MsgBox ("El registro ya existe") Else
Range("B4").EntireRow.Insert Range("B4").Value = Me.txt_codigo.Value + 1 - 1 Range("C4").Value = Me.txt_nombre.Value Range("D4").Value = Me.txt_apellido.Value Range("E4").Value = Me.txt_sexo.Value Range("F4").Value = Me.box_edad.Value txt_codigo.Value = Range("A1").Value Me.txt_nombre.Value = Empty Me.txt_apellido.Value = Empty Me.txt_sexo.Value = Empty Me.box_edad.Value = Empty Me.LISTA.RowSource = "CLIENTES" Me.LISTA.ColumnCount = 5 End If End If End Sub
@@juancarlos-zh2uc yo intente con esto y parece funciono, fijate: Private Sub BotonAgregar_Click() nombrev = Me.CampoNombre.Value apellidov = Me.CampoApellido.Value
If nombrev = "" Or apellidov = "" Then MsgBox ("Ingrese Nombre y apellido")
Excelente clases de macros (completo en tus 4 videos), he revisado varios videos tratando de aprender a usar formularios y la verdad eres de los poquitos maestros que explican paso a paso y enseñan a usar cada comando.. Gracias .
Muchas gracias, excelente aporte, estos 4 videos para crear formularios han sido de los mejores que he podido encontrar en internet. Gracias por compartir este conocimiento.
Lo mejor que he visto hasta el momento, ameno , práctico y muy didactico. Despues de varios cursos online me ha sido muy clarificador y me ha solucionado cantidad de dudas.MUCHAS GRACIAS por compartir de forma altruista todos tus conocimientos.
Gracias por esta saga de vídeos referentes a elaborar un formulario con casi todas sus opciones Tío Tech. Ya elabore mi propio formulario de ingreso de productos de una bodega, con detalles de proveedor, fecha de compra, precio, margen, etc. Bendiciones broer 🙂
Hola tio tech...voy muy bien haciendo mi proyecto gracias a tus ejemplo..ahora bien..tengo 4 tablas...la original en la hoja 1..que anda muy bienn..pero tengo un listado de precios (3 campos.4 con el codigo) en esta no me funciona el boton editar ni el buscar..me marca error en numerodedatos ..y demas y pongo el mismo codigo..gracias por la forma se enseñar.
Muy buenas a todos, sobre todo a usted maestro Tio Tech. Yo soy nuevo y autodidacta , no tengo ni idea de programación y con usted estoy aprendiendo. ¿Me podría decir por favor la solución al encabezado del cuadro de lista del minuto 43:35 del video.? ¿Podría explicarme que código que tengo que poner a un botón que tengo como copiar_nombre en el mismo formulario , para que me copie el texto que hay dentro del textbox llamado txt_nombre? Muchas gracias. Gracias a personas como usted muchos aprendemos.
Hola Tio Tech, muy bueno tus videos. Una consulta, porfavor podrias hacer otro video para explicar el punto 8, 9 y 10. Además, los encabezados que no salían cuando le dabas buscar. Muchas gracias.
Buenas tardes, noches o días a todos de este canal y al TIO TECH. Muy agradecido con su aporte y profesionalismo. He visto los 4 videos de este ejercicio y aún está pendiente un error que se mostró. Además, yo también tengo uno (ID = LISTA.List(LISTA.ListIndex, 0) me sale en amarillo, pero no me dice que error es el que tengo. Tengo un proyecto que traslade a su planteamiento y quiera por favor de la manera más atenta y respetuosa me ayudara a resolver el error.
y muchas gracias a, prendí mucho es primera ves que programo, aunque sea transcribiendo todo lo que indicas en los vídeos, son super buenos y explicas muy bien se te entiende todo a la perfección
Buena tarde, agradezco y te felicito por estos videos que nos enseñan mucho. Una intervención con respecto a los registros repetidos: cuando haces la pregunta de sumando=2; no es efectivo porque la variable puede ser = 2, es decir dos clientes se pueden llamar igual pero con apellidos diferentes. la pregunta óptima es: que la variable sea mayor que 1 y que la variable dos sea mayor a 1, entonces si podemos asegurar que el registro o cliente es una duplicidad. Mil bendiciones por tus enseñanzas.
Y muy buenos sus tutoriales, muchas gracias por compartir tus conocimientos, Dios le multiplique por sus buenas obras y puedas seguir aportandonos más de tu sabiduría
Eres excelente tío tech, he aprendido muchísimo tenía varias dudas pero me han quedado claras que Dios te bendiga saludos desde León Guanajuato, México muy bien 👏👏👏👌👌👏👏👏👍
Hola Tío, gracias por tus tutoriales, eres un crack del Excel, amigo yo hice un inventario de 5 almacenes en un libro gracias a tus tutoriales a punta de macros, agradecería que hicieras un tutorial con esas condiciones de stocks de varios almacenes en un libro. Gracias sensei por su atención. Bendiciones.
Muy interesante el video. Estoy haciendo un proyecto para el fin de carrera. Que es basicamente tengo un formulario principal CON TRES OPCIONES DE BUSQUEDA; 1) hago la primera busqueda por el nombre del cliente(inicialmente tengo una hoja con una tabla fija donde tengo los datos identificativos del cliente, en el formulario me tiene que copiar y pegar los datos que me interesan que esten en los textbox que quiera yo de este formulario y le asigno un numero de registro en un textbox junto fecha de entrada en otro textbox; guardo junto todos estos en una hoja de baso de datos que se creará apartir de este formulario pulsando button REGISTER_X. 2)hago segunda busqueda por el numero de registro(que ya se creo una la primera hoja de base de datos despúes de pulsar button REGISTER_X; me tiene que copiar y pegar los datos que me interesan en unos textbox del formulario; añado más datos de forma manual en otros textbox creados y pulso el button REGISTER_Y 3)hago la tercera busqueda por el numero de PO(que ya se creo una la primera hoja de base de datos despúes de pulsar button REGISTER_X; me tiene que copiar y pegar los datos que me interesan en unos textbox del formulario; añado más datos de forma manual en otros textbox creados y pulso el button REGISTER_Z y se creará la tercera hoja de bases de datos de nuevo. la dificultad que he encontrado es llamar la hoja de base de datos que se crea de forma dinamica; copiar la celdas que interesan y pegarlas en en los textbox del formulario variando cada por tipo de busqueda. a ver si me pueden echar una mano.
Te felicito por tus videos. Cuando busco algún tema, siempre encuentro alguno tuyo, y me han sidu muy utililes para mi trabajo en la Industria donde trabajo.
Impresionante forma de buscar tio tech de lo mejor que he visto, una lastima que no me salgan los encabezados ni me salgan mas de 10 columnas en el resultado de la busqueda. Saludos
Buenas noches, buenísimos todos tus vídeos de este tema, de verdad me ayudaste mucho en lo que necesitaba. ¡Buen trabajo, sigue asi!. Dios te bendiga :D
Bastante ilustrativo los videos. Cambié la forma de ingreso de datos, después de la ultima fila hacia abajo, ultimo = ActiveSheet.Cells(Rows.Count, "B").End(xlUp).Row + 1 Range("B" & ultimo).EntireRow.Insert Range("B" & ultimo).Value = txtItem.Value Range("C" & ultimo).Value = txtNombre.Value Range("D" & ultimo).Value = txtDni.Value Range("E" & ultimo).Value = txtTelefono.Value Range("F" & ultimo).Value = txtEntregado.Value Range("G" & ultimo).Value = txtFalta.Value txtItem.Value = Range("B2").Value MsgBox ("DATOS REGISTRADOS") Cuando deseo eliminar el último dato de la lista me sale error '1004' NO SE PUEDE OBTENER LA PROPIEDAD VLookup de la clase WorksheetFunction. Agradezco de antemano tu ayuda en este pequeño error.
Muy bueno el video!!! El mejor canal, super detallado...Un crack ! Logro resolver el problema que limpia los cabezales cuando se busca? Poniendo Labels no sirve en el caso de que la lista tenga scroll horizontal, lo ideal seria que los cabezales se mantengan
Excelente todo los vídeos, aprendí mucho!. estoy haciendo un formulario para nomina, y quiero aplicar un criterio. Cuando coloque el código de los conceptos (Sueldo, días Libres, Feriados y domingo, Horas extras diurna y nocturna) y las de deducción (IVSS, L.P.H., P.F, Impuesto) me la reconozca y aplique dependiendo la ocasión la formula de cada uno, en mi formulario!
Hola Tio Tech, lo primero felicitarte pues sigo todos tus tutoriales y son los mejores,lo explicas muy bien. Mi consulta es que he hecho tu formulario para una base de datos de 460.000 entradas y al darle al boton de modificar solo me deja modificar el nombre el resto de columnas no,resulta que la columna nombre es la siguiente de la columna codigo el resto no me deja modificar. muchas gracias Un saludo
Hola Tío Tech, primero antes que nada magnifico trabajo y que gran conocimiento tienes sobre excel, eso es de respetar, por otra parte amigo, ya tengo listo mi formulario como lo muestras en tus 3 videos para realizarlo y sin ningún problema, lo modifique a lo que necesito solo de tu amable ayuda sobre esto: 1. Quiero agregar un 3ª criterio de búsqueda, 2. Necesito que mi botón de "Agregar" se capture en la ultima fila, por que necesito que vaya de 1,2,3,4,5,... así sucesivamente, te agradecería mucho tu apoyo. Amigo
Hola Tio Tech, muy bueno tus clases, se aprende bastante. lo que te pediría por favor agregues 3 combo box dependientes uno de cada uno a este mismo formulario que diseñaste. no encuentro tutoriales referente a combo box dependientes. Antemano muy agradecido.
Buenas tardes profe, Saludos desde Costa Rica, todo lo que explicas en este audio,lo puedo aplicar al control de inventario, y yo le puedo en lugar de nombre apellidos, y reemplazarlos por fecha, ubicación de donde sale el material, el proyecto a donde sale los materiales, y el encargado del proyecto, El de control de inventario lo hice dos veces el primero me tiraba error Y el segundo me quedo perfecto gracias a esos tutoriales suyos,
Hola tio tech..hice lo misno que explicas, pero mis campos son codigo;fexha;hora y otros..utulice tambien con combos y funciona perfecto..mi problema es con el campo fecha y hora..la fecha me la pone en numeros y la hora en decimal.probe con poner formato, pero parece que no lo hago bien y cuando busco el cliente me pone la hora en 00:00 en el listo..ayuda por favor.
Excelente video para programar un formulario me sirvió bastante ya lo estoy usando y esta muy bien pero como no soy tan bueno como ud me salen dos errores q no puedo solucionar uno de ellos es que en mi base de datos tengo registrado precios con dos números decimales los cuales están separados con el punto decimal y al buscarlo en en el formulario y seleccionarlo el punto se convierte en coma y así lo manda a otra hoja Excel
Buenas noches. Dios le bendiga TioTech 🙏🙌🤝 De ante mano le agradezco por su dedicación y profesionalismo con el que nos enseña. Muy buenos videos Tengo una pregunta: ¿se pueden hacer programas de escritorio con los formularios hechos en VisualBasic? He notado que cuando uno ejecuta los formularios, es muy frecuente que presenten errores y es molesto ya que se debe volver a abrir el formulario para seguir trabajando. No se si quizás al convertirlo en un .exe se pueda mejorar el funcionamiento Muchas gracias de antemano TioTech
Excelente ayuda, Gracias a tu gran aporte, cree un formulario donde agrego clientes a mi base de datos, estos clientes son de Netflix, amazon, disney, spotify, youtube, etc, donde me filtra los que ya se van a vencer y les agregue un boton donde les envio un aviso desde VBA a WhatsApp directamente. Uff todos los creditos a ud Tio Tech.
Estimado Tío Tech, preguntas: Necesito más de 11 columnas para el Listbox, como saltar de una celda a otra al dar enter y para ser un poco más llamativo el formulario poner imagenes en todo el proyecto, NO se nada de VBA y este es un proyecto personal, ya he visto videos de más de 10 columnas pero no se en donde se ponen los códigos. Gracias por tu apoyo y una sugerencia No hagas tus videos con pocos datos, se que el tiempo es oro, pero necesitamos de tus conocimientos.
Hola, lo primero encantado con los videos, muchísimas gracias. Tengo una duda que decías resolver a parte del video: ¿Como resolver el error de que al pulsar buscar se borren los encabezados de la lista?
Tio Tech eres muy bueno explicando, pero te falto incluir en tu video, si queremos incluir una fotografia a cada registro como lo hacemos... gracias... y un saludo desde Venezuela, Estado Zulia - Maracaibo.
Hola que tal? Antes de nada enhorabuena por el trabajo que realizas, es realmente interesante y además realizas un gran trabajo didáctico. Bueno al lio, he hecho una base de datos con excel y me quedan unas cosillas para darle el Ok definitivo, te comento lo que creo que me falta para terminarla: - Al realizar busquedas perdemos los encabezados de columnas, que era algo que sucedía en el video de respuestas a dudas - He puesto dos selectores para buscar por nombre y grupo y buscar por nombre funciona con el boton de busqueda y por grupo al introducir texto en el cuadro de texto de busqueda - Cuando hago un registro no se refresca la lista de registros en el formulario, tengo que cerrarlo y volver a entrar (el formulario) Por otro lado, mis registros van acompañados de cinco fotos cada uno y cada foto está relacionada con el código y el problema es las imágenes son repetitivas, o sea, me gustaría saber si hay alguna forma de que una misma imagen pueda estar en dos registros o más al mismo tiempo. Te pido mil disculpas por el pedazo mensaje, un abrazo y muchas gracias
Hola Buenas tardes a todos!... Demasiado bueno el tutorial y la pedagogía Tío Tech, he seguido sus instrucciones al pie de la letra y todo marcha muy bien, gracias por eso... Lo que necesitaría saber es como hacer una búsqueda por mas de tres criterios con el botón de opción, agradezco de antemano su ayuda o la de alguno de los aqui presentes.
Buen dia, si quisiera buscar por nombre y apellido como tendria que tener el codigo y tambien en LISTA como puede mantenerse el encabezado al buscar porfavor
Excelente todo los vídeos, aprendí mucho!. Estaba buscando entro los comentario y no vi ninguno que hablara de como buscar en un listbox sin que los encabezados de columna no se borren. agradecería tu respuesta. gracias por todo!
Buenas tardes desde España , Barcelona, has podido resolver el problema de los Head del cuadro de lista que desaparecen cuando le damos a buscar?, gracias por tus vídeos y trabajo de nuevo!!!
podrias hacer un video acerca de diseño de userform ya que aprendimos con tus videos como crear uno dinamico con macros y demas lo unico que queda seria aprender a hacerlos mas bonitos si pudieras hacerlo te agradeceria ya que en internet no hay videos muy buenos o personas que lo expliquen como tu
Excelente video, tengo una duda, como hago para que en la lista filtrada se actualicen los cambios realizados, ya que al presionar modificar se ven reflejados los cambios en el archivo mas no en el list Box, Gracias
Excelentes videos todos. Me han servido de muchísima ayuda. Quisiera saber si se puede abrir el formulario y usarlo (no editarlo) sin tener que abrir excel, es decir, crear un icono directo y se abra exclusivamente el formulario. Gracias
Muy buen video, excelente, muchas gracias por compartir tus conocimientos.. Una cosa. Cuando borro toda la. Información desde el formulario, y agrego un nuevo codigo.. Sale error y se sale del formulario... Sera que es posible ayudarme como configuro para que funcione al 100% Muchas gracias y mil bendicciones
Muy buenos tus videos tio tech , te hago una pregunta. Tenes algun video donde explique como utilizar listas desplegables tanto en el modo insertar como en el editar? Ya que use mucho la base de este video pero muchos campos que necesito serian mejor con listas desplegables
Muy interesante video se aprende un monto, creo que falta el boton Salir ( para salir del formulario), una vez que tenga ya todo mi formulario listo como hago para que ya sea un programa ejecutable es decir para instalarlo en varias pc's
Estimado Tio Tech, Pudiste dar con la solución al realizar la consulta desde las cajas de texto no se eliminen los encabezados? o en todo caso vuelvan aparecer?
Hola, saludos. he mirado todos los videos y gracias por que son gran utilidad, tengo una inquietud, como hago para que del cuadro del combobox me ayude como buscador. por ejemplo tengo un listado de nombres, en una sola casilla de excel tengo Juan Rosero, en la siguiente tengo Luis Rosero Cruz y si escribo el nombre me sale un resultado pero si comienzo por el apellido ya no me genera el resultado.
Ud es un trome, se agradece la enseñanza y su valioso tiempo; Tengo unas preguntas: ¿Tengo una casilla para fechas, pero solo aparecen numeros?, igual forma ¿como configuro las cantidades en monedas?, en espera de su respuesta
Hola. Me podrías decir cual es la forma para poder alinear el contenido de un TextBox o un Label, verticalmente? Muchas gracias Por cierto... TE FELICITO POR LA MANERA DE EXPLICAR !!!!!!!! EXCELENTES TUS TUTORIALES !!!!!
Hola Tio Tech, la verdad un genio para explicar la creación de este formulario que me fue de mucha utilidad. Podrías poner el código para seleccionar SI/NO por OptionButton? Lo necesito para mi formulario, es más fácil que ingresar un combobox. Muchas gracias
Hola Luis, buenas tardes. Muchas gracias por el esfuerzo de tu realización. Qué pena que haya quedado inconcluso..!! Veo además, que no estás respondiendo los mensajes. ¿Has abandonado la página? Muchas Gracias
Mi hermano te agradezco el tutorial, logré ponerlo a funcionar después de varios días de darle duro jajaja. Si podrías decirnos cómo hacer que todos los datos ingresados se conviertan a mayúsculas te lo agradeceré o si alguien sabe qué pase el dato. Y si hay alguna manera de que los cuadros de texto cuando uno edita si hay fechas que no se vean como el código de fecha. Mil gracias.
Hola Tio, excelente sus tutoriales, yo tengo un problema al generar la busqueda ya que al darle buscar no me trae nada, y creo que es por que tengo una tabla con 22 columnas, me podria ayudar. gracias
Tengo 14 columnas y no devuelve la búsqueda, queda la tabla en blanco con los campos de los encabezados también en blanco. Private Sub BT_BUSQUEDA_Click() NODATOS = Hoja1.Range("A" & Rows.Count).End(xlUp).Row LISTA = Clear LISTA.RowSource = Clear
r = 0
For FILA = 18 To NODATOS NOMBRE = ActiveSheet.Cells(FILA, 4).Value If UCase(NOMBRE) Like "*" & UCase(Me.BUSQUEDA.Value) & "*" Then
@@LionWolfGame LO INTESTASTE HACER PONIENDO "Me.LISTA.additem" ? y en vez de poner "ActiveSheet.Cells", poner el nombre de la hoja " = Hoja2.Cells (FILA, 2) yo trabajo con mas de 10 celdas, y el codigo me funciona bien
buen dia ,quiero felicitar primero que todo al canal y a su instructor , ojala la gente usara estos canales para cosas productivas como estas, tengo un formulario que diseñe gracias a esta pagina donde puedo, con el botón agregar , ir agregando registros a una base de datos, pero necesito que el ultimo datos agregado se agregue como un hipervínculo , y me muestre este hipervínculo en una lista de formulario que ya me esta en el formulario, y poderlo abrir al darle clic, y me muestre el archivo pdf, agradecería mucho me ayudaran con eso.
Hoia Tio Tech excelente aporte, como siempre con cosas nuevas en cada aporte. Tio Tech, quisiera plantearle otra cuestion para ver si es posible que me pueda ayudar, teengo un abarrote pero solo quiero llevar el control de los creditos, donde pueda ingresar, cobrar, y borrar la deuda cuando me paguen el total del credito y si no pagan el total poder abonar a la cuenta del cliente, de antemano gracias
Hola Tío Tech te doy las gracias por los videos ha sido increible, tengo una consulta, tengo un botón de buscar siguiendo tus instrucciones, pero al momento de utilizarlo me salen duplicados en la búsqueda
Miguel buenas , eh seguido los 4 videos del formulario VBA, muy bueno, quedo pendiente explicarnos como hacer para agregarle imágenes al formularios, gracias
Buenas noches, tengo una consulta, despues de realizar una busqueda no puedo editar o modificar el valor seleccioando; asi como no puedo eliminar el valor seleccionado luego de realizar el filtro con mi boton busqueda. Se te agradeceria mucho. Excelente video
Buenos dias primero felicitarte nuevamente por tus videos Me quede con la duda del punto 4 de la lista de dudas , como hacer para que sirva el enter en lugar del boton buscar. Has hallado la respuesta? Muchas gracias
Felicitaciones por cada video que haces me gustaría que explicaras como insertar imágenes por cada nombre registrado y cuando hagas la búsqueda la muestre. Me quede en esa pregunta que te habían hecho y no pudistes explicar porque estabas cansado ..Pero igual te felicito.
tengo una pregunta tu formulario se podria agregar un campo para un hipervinculo para cada persona por ejemplo que me direcciones aun archvo en word o pdf sobre informacion extra de cada persona saludos me gusta muchos tus videos
Cómo darle FORMATO de FECHA a un TextBox y que tambien la celda lo reconozca con formato de fecha. Me pasa que le doy formato de fecha al TextBox pero en la celda del excel no. Esta escrita la fecha bien, pero por ejemplo lo filtro y no lo toma como si tuviese el formato de fecha.
Le agregue CDate y me jala en formato de fecha espero te sirva Me.fecha1 = CDate(Application.WorksheetFunction.VLookup(CDbl(codi), Sheets("BD").Range("E:N"), 3, 0))
Para evitar datos duplicados tendríamos que agregar estas condicionales al código explicado en el video. Porque si tenemos dos apellidos igual va sumar igual a dos y lo va tomar como repetido por lo tanto poner este código.
If uno > 1 Then
uno = 1
End If
If dos > 1 Then
dos = 1
End If
::::::::::: EL CÓDIGO FINAL QUEDARÍA ASÍ::::::::::: ABAJO
Private Sub BT_AGREGAR_Click()
nombrev = Me.txt_nombre.Value
apellidov = Me.txt_apellido.Value
If nombrev = "" Or apellidov = "" Then
MsgBox ("Ingrese Nombre y apellido")
Exit Sub
End If
uno = WorksheetFunction.CountIf(Range("C:C"), nombrev)
dos = WorksheetFunction.CountIf(Range("D:D"), apellidov)
If uno > 1 Then
uno = 1
End If
If dos > 1 Then
dos = 1
End If
MsgBox ("Primero: " & uno & "segundo :" & dos)
sumando = uno + dos
If sumando = 2 Then
MsgBox ("El registro ya existe")
Else
If Me.txt_nombre.Value "" Then
Range("B4").EntireRow.Insert
End If
Range("B4").Value = txt_codigo.Value
Range("C4").Value = Me.txt_nombre.Value
Range("D4").Value = Me.txt_apellido.Value
Range("E4").Value = Me.txt_sexo.Value
Range("F4").Value = Me.txt_edad.Value
txt_codigo.Value = Range("B2").Value
Me.txt_nombre.Value = Empty
Me.txt_apellido.Value = Empty
Me.txt_sexo.Value = Empty
Me.txt_edad.Value = Empty
Me.LISTA.RowSource = "CLIENTES"
Me.LISTA.ColumnCount = 5
End If
End Sub
Me maté analizando ese error
El problema aún continua cuando se quiere registrar un cliente con nombre y apellido de clientes diferentes. Ejemplo: si tenemos clientes Juan Lázaro y Carlos Pérez y queremos registrar Juan Pérez no nos deja registrar
Por cierto estoy aprendiendo mucho con tus vídeos, son muy didácticos
@@juancarlos-zh2uc Este es el código que yo hice y es justo para evitar esos errores:
Private Sub BT_AGREGAR_Click()
If Me.txt_nombre.Value = Empty Or Me.txt_apellido.Value = Empty Or Me.txt_sexo.Value = Empty Or Me.box_edad.Value = Empty Then
MsgBox ("Rellene todos los campos")
Else
nombrev = UCase(Me.txt_nombre.Value)
apellidov = UCase(Me.txt_apellido.Value)
repeticiones = WorksheetFunction.CountIfs(Range("C:C"), nombrev, Range("D:D"), apellidov)
If repeticiones > 0 Then
MsgBox ("El registro ya existe")
Else
Range("B4").EntireRow.Insert
Range("B4").Value = Me.txt_codigo.Value + 1 - 1
Range("C4").Value = Me.txt_nombre.Value
Range("D4").Value = Me.txt_apellido.Value
Range("E4").Value = Me.txt_sexo.Value
Range("F4").Value = Me.box_edad.Value
txt_codigo.Value = Range("A1").Value
Me.txt_nombre.Value = Empty
Me.txt_apellido.Value = Empty
Me.txt_sexo.Value = Empty
Me.box_edad.Value = Empty
Me.LISTA.RowSource = "CLIENTES"
Me.LISTA.ColumnCount = 5
End If
End If
End Sub
@@juancarlos-zh2uc yo intente con esto y parece funciono, fijate:
Private Sub BotonAgregar_Click()
nombrev = Me.CampoNombre.Value
apellidov = Me.CampoApellido.Value
If nombrev = "" Or apellidov = "" Then
MsgBox ("Ingrese Nombre y apellido")
Exit Sub
Else
numerodedatos = ActiveSheet.Range("B" & Rows.Count).End(xlUp).Row
For fila = 4 To numerodedatos
nombre = ActiveSheet.Cells(fila, 3).Value
apellido = ActiveSheet.Cells(fila, 4).Value
If UCase(nombre) = UCase(nombrev) And UCase(apellido) = UCase(apellidov) Then
MsgBox ("El registro ya existe")
Exit Sub
End If
Next
If Me.CampoNombre.Value "" Then
Range("B4").EntireRow.Insert
End If
Range("B4").Value = CampoCodigo.Value
Range("C4").Value = Me.CampoNombre.Value
Range("D4").Value = Me.CampoApellido.Value
Range("E4").Value = Me.CampoSexo.Value
Range("F4").Value = Me.CampoEdad.Value
CampoCodigo.Value = Range("A2").Value
Me.CampoNombre.Value = Empty
Me.CampoApellido.Value = Empty
Me.CampoSexo.Value = Empty
Me.CampoEdad.Value = Empty
Me.LISTA.RowSource = "CLIENTES"
Me.LISTA.ColumnCount = 5
Me.CampoNombre.SetFocus
Exit Sub
End If
End Sub
De los mejores tutoriales que he visto. Muy bien explicado paso a paso y sin engaños, acepta sus errores y los corrige en vivo.
Excelente clases de macros (completo en tus 4 videos), he revisado varios videos tratando de aprender a usar formularios y la verdad eres de los poquitos maestros que explican paso a paso y enseñan a usar cada comando.. Gracias .
Muchas gracias, excelente aporte, estos 4 videos para crear formularios han sido de los mejores que he podido encontrar en internet. Gracias por compartir este conocimiento.
Lo mejor que he visto hasta el momento, ameno , práctico y muy didactico. Despues de varios cursos online me ha sido muy clarificador y me ha solucionado cantidad de dudas.MUCHAS GRACIAS por compartir de forma altruista todos tus conocimientos.
Muchas gracias por tus enseñanzas. Me han servido mucho. Las he aplicado y funcionan muy bien.
Gracias por esta saga de vídeos referentes a elaborar un formulario con casi todas sus opciones Tío Tech. Ya elabore mi propio formulario de ingreso de productos de una bodega, con detalles de proveedor, fecha de compra, precio, margen, etc. Bendiciones broer 🙂
Hola tio tech...voy muy bien haciendo mi proyecto gracias a tus ejemplo..ahora bien..tengo 4 tablas...la original en la hoja 1..que anda muy bienn..pero tengo un listado de precios (3 campos.4 con el codigo) en esta no me funciona el boton editar ni el buscar..me marca error en numerodedatos ..y demas y pongo el mismo codigo..gracias por la forma se enseñar.
Excelente tu conjunto de 4 videos. Felicitaciones y gracias 👍
Muy buenas a todos, sobre todo a usted maestro Tio Tech.
Yo soy nuevo y autodidacta , no tengo ni idea de programación y con usted estoy aprendiendo.
¿Me podría decir por favor la solución al encabezado del cuadro de lista del minuto 43:35 del video.?
¿Podría explicarme que código que tengo que poner a un botón que tengo como copiar_nombre en el mismo formulario , para que me copie el texto que hay dentro del textbox llamado txt_nombre?
Muchas gracias.
Gracias a personas como usted muchos aprendemos.
Muchísimas gracias, Miguel, gracias a tus claras explicaciones he progresado lo indecible en mis conocimientos de Excel.
Gracias por tu información ha sido muy valiosa para mis propósitos y necesidades
Muchas gracias TIO TECH, no sabia absolutamente nada de Visual base, sus enseñanzas son lo maximo
Hola Tio Tech, muy bueno tus videos. Una consulta, porfavor podrias hacer otro video para explicar el punto 8, 9 y 10. Además, los encabezados que no salían cuando le dabas buscar. Muchas gracias.
Excelentes videos, voy a utilizar el ejemplo y ponerlo en práctica..felicitaciones y gracias por compartir los conocimientos
Tío tech, casi un millón en tu canal, los buenos trabajos la divina providencia los premia, vamos pa esa meta
Buenas tardes, noches o días a todos de este canal y al TIO TECH. Muy agradecido con su aporte y profesionalismo. He visto los 4 videos de este ejercicio y aún está pendiente un error que se mostró. Además, yo también tengo uno (ID = LISTA.List(LISTA.ListIndex, 0) me sale en amarillo, pero no me dice que error es el que tengo. Tengo un proyecto que traslade a su planteamiento y quiera por favor de la manera más atenta y respetuosa me ayudara a resolver el error.
y muchas gracias a, prendí mucho es primera ves que programo, aunque sea transcribiendo todo lo que indicas en los vídeos, son super buenos y explicas muy bien se te entiende todo a la perfección
Muchas Gracias por tus videos, me han servido de mucho
muchas gracias tio tech son muy buenos tus videos muchos exitos
Muy buen trabajo!!!!!! muchas gracias!!!!!!! 👏👏
Buena tarde, agradezco y te felicito por estos videos que nos enseñan mucho. Una intervención con respecto a los registros repetidos: cuando haces la pregunta de sumando=2; no es efectivo porque la variable puede ser = 2, es decir dos clientes se pueden llamar igual pero con apellidos diferentes. la pregunta óptima es: que la variable sea mayor que 1 y que la variable dos sea mayor a 1, entonces si podemos asegurar que el registro o cliente es una duplicidad. Mil bendiciones por tus enseñanzas.
Como siempre fantastico. Eres mi canal favorito para aprender sobre excel. Sigue asi!!
Y muy buenos sus tutoriales, muchas gracias por compartir tus conocimientos, Dios le multiplique por sus buenas obras y puedas seguir aportandonos más de tu sabiduría
Eres excelente tío tech, he aprendido muchísimo tenía varias dudas pero me han quedado claras que Dios te bendiga saludos desde León Guanajuato, México muy bien 👏👏👏👌👌👏👏👏👍
Maestro lo amo
Felicitaciones por tu trabajo y por brindar tus conocimientos por este medio. Gracias!
Aprendi mucho en las 4 videos ademas de construir un producto profesional y adaptable.. Gracias
Hola Tío, gracias por tus tutoriales, eres un crack del Excel, amigo yo hice un inventario de 5 almacenes en un libro gracias a tus tutoriales a punta de macros, agradecería que hicieras un tutorial con esas condiciones de stocks de varios almacenes en un libro. Gracias sensei por su atención. Bendiciones.
Muy interesante el video. Estoy haciendo un proyecto para el fin de carrera. Que es basicamente tengo un formulario principal CON TRES OPCIONES DE BUSQUEDA;
1) hago la primera busqueda por el nombre del cliente(inicialmente tengo una hoja con una tabla fija donde tengo los datos identificativos del cliente, en el formulario me tiene que copiar y pegar los datos que me interesan que esten en los textbox que quiera yo de este formulario y le asigno un numero de registro en un textbox junto fecha de entrada en otro textbox; guardo junto todos estos en una hoja de baso de datos que se creará apartir de este formulario pulsando button REGISTER_X.
2)hago segunda busqueda por el numero de registro(que ya se creo una la primera hoja de base de datos despúes de pulsar button REGISTER_X; me tiene que copiar y pegar los datos que me interesan en unos textbox del formulario; añado más datos de forma manual en otros textbox creados y pulso el button REGISTER_Y
3)hago la tercera busqueda por el numero de PO(que ya se creo una la primera hoja de base de datos despúes de pulsar button REGISTER_X; me tiene que copiar y pegar los datos que me interesan en unos textbox del formulario; añado más datos de forma manual en otros textbox creados y pulso el button REGISTER_Z y se creará la tercera hoja de bases de datos de nuevo.
la dificultad que he encontrado es llamar la hoja de base de datos que se crea de forma dinamica; copiar la celdas que interesan y pegarlas en en los textbox del formulario variando cada por tipo de busqueda. a ver si me pueden echar una mano.
Muchas gracias por todos los vídeos me sirvió para crear una pequeña base de datos para la escuela.
He aprendido bastante con sus videos, muy claro todo, muchas gracias
Te felicito por tus videos. Cuando busco algún tema, siempre encuentro alguno tuyo, y me han sidu muy utililes para mi trabajo en la Industria donde trabajo.
Impresionante forma de buscar tio tech de lo mejor que he visto, una lastima que no me salgan los encabezados ni me salgan mas de 10 columnas en el resultado de la busqueda. Saludos
Me suscribí después de ver estos videos de los formularios. Muy bueno.
Buenas noches, buenísimos todos tus vídeos de este tema, de verdad me ayudaste mucho en lo que necesitaba. ¡Buen trabajo, sigue asi!. Dios te bendiga :D
Bastante ilustrativo los videos. Cambié la forma de ingreso de datos, después de la ultima fila hacia abajo,
ultimo = ActiveSheet.Cells(Rows.Count, "B").End(xlUp).Row + 1
Range("B" & ultimo).EntireRow.Insert
Range("B" & ultimo).Value = txtItem.Value
Range("C" & ultimo).Value = txtNombre.Value
Range("D" & ultimo).Value = txtDni.Value
Range("E" & ultimo).Value = txtTelefono.Value
Range("F" & ultimo).Value = txtEntregado.Value
Range("G" & ultimo).Value = txtFalta.Value
txtItem.Value = Range("B2").Value
MsgBox ("DATOS REGISTRADOS")
Cuando deseo eliminar el último dato de la lista me sale error '1004' NO SE PUEDE OBTENER LA PROPIEDAD VLookup de la clase WorksheetFunction.
Agradezco de antemano tu ayuda en este pequeño error.
Al comienzo de tu código en el botón eliminar pon ésta linea
LISTA.ListIndex = -1
Muy bueno el video!!! El mejor canal, super detallado...Un crack ! Logro resolver el problema que limpia los cabezales cuando se busca? Poniendo Labels no sirve en el caso de que la lista tenga scroll horizontal, lo ideal seria que los cabezales se mantengan
Muy buenos tutoriales. Se agradece por compartir el conocimiento.
Excelente todo los vídeos, aprendí mucho!. estoy haciendo un formulario para nomina, y quiero aplicar un criterio. Cuando coloque el código de los conceptos (Sueldo, días Libres, Feriados y domingo, Horas extras diurna y nocturna) y las de deducción (IVSS, L.P.H., P.F, Impuesto) me la reconozca y aplique dependiendo la ocasión la formula de cada uno, en mi formulario!
Impecables tus vídeos y tu dedicación!
Hola Tio Tech, lo primero felicitarte pues sigo todos tus tutoriales y son los mejores,lo explicas muy bien.
Mi consulta es que he hecho tu formulario para una base de datos de 460.000 entradas y al darle al boton de modificar solo me deja modificar el nombre el resto de columnas no,resulta que la columna nombre es la siguiente de la columna codigo el resto no me deja modificar.
muchas gracias
Un saludo
Hola Tío Tech, primero antes que nada magnifico trabajo y que gran conocimiento tienes sobre excel, eso es de respetar, por otra parte amigo, ya tengo listo mi formulario como lo muestras en tus 3 videos para realizarlo y sin ningún problema, lo modifique a lo que necesito solo de tu amable ayuda sobre esto: 1. Quiero agregar un 3ª criterio de búsqueda, 2. Necesito que mi botón de "Agregar" se capture en la ultima fila, por que necesito que vaya de 1,2,3,4,5,... así sucesivamente, te agradecería mucho tu apoyo. Amigo
Miguel excelente tus tutoriales y este en especial muy completo👏👏
Hola Tio Tech, muy bueno tus clases, se aprende bastante.
lo que te pediría por favor agregues 3 combo box dependientes uno de cada uno a este mismo formulario que diseñaste. no encuentro tutoriales referente a combo box dependientes.
Antemano muy agradecido.
a parte de un fallo que detecte en el primer video y que logre arreglar, el resto es oro! mil gracias
Excelente los 4 videos, muchas gracias
Buenas tardes profe, Saludos desde Costa Rica, todo lo que explicas en este audio,lo puedo aplicar al control de inventario, y yo le puedo en lugar de nombre apellidos, y reemplazarlos por fecha, ubicación de donde sale el material, el proyecto a donde sale los materiales, y el encargado del proyecto,
El de control de inventario lo hice dos veces el primero me tiraba error
Y el segundo me quedo perfecto gracias a esos tutoriales suyos,
Hola tio tech..hice lo misno que explicas, pero mis campos son codigo;fexha;hora y otros..utulice tambien con combos y funciona perfecto..mi problema es con el campo fecha y hora..la fecha me la pone en numeros y la hora en decimal.probe con poner formato, pero parece que no lo hago bien y cuando busco el cliente me pone la hora en 00:00 en el listo..ayuda por favor.
Excelente video para programar un formulario me sirvió bastante ya lo estoy usando y esta muy bien pero como no soy tan bueno como ud me salen dos errores q no puedo solucionar uno de ellos es que en mi base de datos tengo registrado precios con dos números decimales los cuales están separados con el punto decimal y al buscarlo en en el formulario y seleccionarlo el punto se convierte en coma y así lo manda a otra hoja Excel
Excelente amigo es muy útil, felicitaciones
Muchas gracias por sus videos
Excelente la explicación eres el mejor!!!
También, aplicar Tab Index, para la ordenación de los campos en el formulario. Muchas gracias por este gran videotutorial.
Excelente explicaciones, ser programador no es tan facil y mucho menos enseñar con tantos detalles.
Buenas noches. Dios le bendiga TioTech 🙏🙌🤝
De ante mano le agradezco por su dedicación y profesionalismo con el que nos enseña.
Muy buenos videos
Tengo una pregunta:
¿se pueden hacer programas de escritorio con los formularios hechos en VisualBasic?
He notado que cuando uno ejecuta los formularios, es muy frecuente que presenten errores y es molesto ya que se debe volver a abrir el formulario para seguir trabajando.
No se si quizás al convertirlo en un .exe se pueda mejorar el funcionamiento
Muchas gracias de antemano TioTech
Excelente ayuda, Gracias a tu gran aporte, cree un formulario donde agrego clientes a mi base de datos, estos clientes son de Netflix, amazon, disney, spotify, youtube, etc, donde me filtra los que ya se van a vencer y les agregue un boton donde les envio un aviso desde VBA a WhatsApp directamente. Uff todos los creditos a ud Tio Tech.
Estimado Tío Tech, preguntas: Necesito más de 11 columnas para el Listbox, como saltar de una celda a otra al dar enter y para ser un poco más llamativo el formulario poner imagenes en todo el proyecto, NO se nada de VBA y este es un proyecto personal, ya he visto videos de más de 10 columnas pero no se en donde se ponen los códigos. Gracias por tu apoyo y una sugerencia No hagas tus videos con pocos datos, se que el tiempo es oro, pero necesitamos de tus conocimientos.
Hola, lo primero encantado con los videos, muchísimas gracias. Tengo una duda que decías resolver a parte del video:
¿Como resolver el error de que al pulsar buscar se borren los encabezados de la lista?
hola , excelente trabajo, te agradesco mucho por toda la informacion , se aprende ,realmente, podrias subir el archivo de excel .
Tio Tech eres muy bueno explicando, pero te falto incluir en tu video, si queremos incluir una fotografia a cada registro como lo hacemos... gracias... y un saludo desde Venezuela, Estado Zulia - Maracaibo.
Hola que tal? Antes de nada enhorabuena por el trabajo que realizas, es realmente interesante y además realizas un gran trabajo didáctico. Bueno al lio, he hecho una base de datos con excel y me quedan unas cosillas para darle el Ok definitivo, te comento lo que creo que me falta para terminarla:
- Al realizar busquedas perdemos los encabezados de columnas, que era algo que sucedía en el video de respuestas a dudas
- He puesto dos selectores para buscar por nombre y grupo y buscar por nombre funciona con el boton de busqueda y por grupo al introducir texto en el cuadro de texto de busqueda
- Cuando hago un registro no se refresca la lista de registros en el formulario, tengo que cerrarlo y volver a entrar (el formulario)
Por otro lado, mis registros van acompañados de cinco fotos cada uno y cada foto está relacionada con el código y el problema es las imágenes son repetitivas, o sea, me gustaría saber si hay alguna forma de que una misma imagen pueda estar en dos registros o más al mismo tiempo.
Te pido mil disculpas por el pedazo mensaje, un abrazo y muchas gracias
Hola Buenas tardes a todos!... Demasiado bueno el tutorial y la pedagogía Tío Tech, he seguido sus instrucciones al pie de la letra y todo marcha muy bien, gracias por eso... Lo que necesitaría saber es como hacer una búsqueda por mas de tres criterios con el botón de opción, agradezco de antemano su ayuda o la de alguno de los aqui presentes.
Buen dia, si quisiera buscar por nombre y apellido como tendria que tener el codigo y tambien en LISTA como puede mantenerse el encabezado al buscar porfavor
Excelente todo los vídeos, aprendí mucho!. Estaba buscando entro los comentario y no vi ninguno que hablara de como buscar en un listbox sin que los encabezados de columna no se borren. agradecería tu respuesta. gracias por todo!
Me pasa lo mismo, amigo llegaste a resolver ese error?
Tenemos el mismo problema y lo peor es que eso también le pasa a él pero lo omitió nada más
@@Jeffer. Utilicen mejor labels para evitar ese error
amigo pudiste resolver ese problema ?
Buenas tardes desde España , Barcelona, has podido resolver el problema de los Head del cuadro de lista que desaparecen cuando le damos a buscar?, gracias por tus vídeos y trabajo de nuevo!!!
Lo resolviste ?
Crack, gracias por responder con este video y la recomendación
Muy Buen tutorial gracias man !!!
podrias hacer un video acerca de diseño de userform ya que aprendimos con tus videos como crear uno dinamico con macros y demas lo unico que queda seria aprender a hacerlos mas bonitos
si pudieras hacerlo te agradeceria ya que en internet no hay videos muy buenos o personas que lo expliquen como tu
Hola Tio Tech, excelente tu forma de enseñar, muchas gracias. Te pregunto este formulario se puede descargar y si si como lo puedo hacer
Mucha gracias
Mis saludos, las explicaciones han sido claras y concisas, ahora me gustaría que luego de insertar registros se ordenen segun un criterio
Gracias Tio Tech eres un capicipino
Excelente video, tengo una duda, como hago para que en la lista filtrada se actualicen los cambios realizados, ya que al presionar modificar se ven reflejados los cambios en el archivo mas no en el list Box, Gracias
Excelente vídeo.. ¿Como corregiste el problema de los encabezados del listBox cuando haces una búsqueda?
Excelentes videos todos. Me han servido de muchísima ayuda. Quisiera saber si se puede abrir el formulario y usarlo (no editarlo) sin tener que abrir excel, es decir, crear un icono directo y se abra exclusivamente el formulario. Gracias
Muy buen video, excelente, muchas gracias por compartir tus conocimientos..
Una cosa.
Cuando borro toda la. Información desde el formulario, y agrego un nuevo codigo..
Sale error y se sale del formulario...
Sera que es posible ayudarme como configuro para que funcione al 100%
Muchas gracias y mil bendicciones
Muy buenos tus videos tio tech , te hago una pregunta. Tenes algun video donde explique como utilizar listas desplegables tanto en el modo insertar como en el editar? Ya que use mucho la base de este video pero muchos campos que necesito serian mejor con listas desplegables
Muy interesante video se aprende un monto, creo que falta el boton Salir ( para salir del formulario), una vez que tenga ya todo mi formulario listo como hago para que ya sea un programa ejecutable es decir para instalarlo en varias pc's
Estimado Tio Tech, Pudiste dar con la solución al realizar la consulta desde las cajas de texto no se eliminen los encabezados? o en todo caso vuelvan aparecer?
HOLA que tal, todos estos videos aplican tambien al hacer un control de compra y ventas?'?''
Hola, saludos. he mirado todos los videos y gracias por que son gran utilidad, tengo una inquietud, como hago para que del cuadro del combobox me ayude como buscador. por ejemplo tengo un listado de nombres, en una sola casilla de excel tengo Juan Rosero, en la siguiente tengo Luis Rosero Cruz y si escribo el nombre me sale un resultado pero si comienzo por el apellido ya no me genera el resultado.
Hola Tío Tech. De casualidad tienes alguna solución para los encabezados de listbox a la hora de la búsqueda?
Ud es un trome, se agradece la enseñanza y su valioso tiempo; Tengo unas preguntas: ¿Tengo una casilla para fechas, pero solo aparecen numeros?, igual forma ¿como configuro las cantidades en monedas?, en espera de su respuesta
Hola. Me podrías decir cual es la forma para poder alinear el contenido de un TextBox o un Label, verticalmente? Muchas gracias
Por cierto... TE FELICITO POR LA MANERA DE EXPLICAR !!!!!!!! EXCELENTES TUS TUTORIALES !!!!!
excelentes, muchas gracias
Hola Tio Tech, la verdad un genio para explicar la creación de este formulario que me fue de mucha utilidad. Podrías poner el código para seleccionar SI/NO por OptionButton? Lo necesito para mi formulario, es más fácil que ingresar un combobox. Muchas gracias
Hola tiotech excelente aporte, quería saber como se hace si se eliminan todos los registros y al agregar uno nuevo sale error. slds.
Hola Luis, buenas tardes. Muchas gracias por el esfuerzo de tu realización. Qué pena que haya quedado inconcluso..!! Veo además, que no estás respondiendo los mensajes. ¿Has abandonado la página? Muchas Gracias
Mi hermano te agradezco el tutorial, logré ponerlo a funcionar después de varios días de darle duro jajaja. Si podrías decirnos cómo hacer que todos los datos ingresados se conviertan a mayúsculas te lo agradeceré o si alguien sabe qué pase el dato. Y si hay alguna manera de que los cuadros de texto cuando uno edita si hay fechas que no se vean como el código de fecha. Mil gracias.
Hola Tio, excelente sus tutoriales, yo tengo un problema al generar la busqueda ya que al darle buscar no me trae nada, y creo que es por que tengo una tabla con 22 columnas, me podria ayudar. gracias
Encontraste esa solución ?
Tengo 14 columnas y no devuelve la búsqueda, queda la tabla en blanco con los campos de los encabezados también en blanco.
Private Sub BT_BUSQUEDA_Click()
NODATOS = Hoja1.Range("A" & Rows.Count).End(xlUp).Row
LISTA = Clear
LISTA.RowSource = Clear
r = 0
For FILA = 18 To NODATOS
NOMBRE = ActiveSheet.Cells(FILA, 4).Value
If UCase(NOMBRE) Like "*" & UCase(Me.BUSQUEDA.Value) & "*" Then
LISTA.AddItem
LISTA.List(r, 0) = ActiveSheet.Cells(FILA, 1).Value
LISTA.List(r, 1) = ActiveSheet.Cells(FILA, 2).Value
LISTA.List(r, 2) = ActiveSheet.Cells(FILA, 3).Value
LISTA.List(r, 3) = ActiveSheet.Cells(FILA, 4).Value
LISTA.List(r, 4) = ActiveSheet.Cells(FILA, 5).Value
LISTA.List(r, 5) = ActiveSheet.Cells(FILA, 6).Value
LISTA.List(r, 6) = ActiveSheet.Cells(FILA, 7).Value
LISTA.List(r, 7) = ActiveSheet.Cells(FILA, 8).Value
LISTA.List(r, 8) = ActiveSheet.Cells(FILA, 9).Value
LISTA.List(r, 9) = ActiveSheet.Cells(FILA, 10).Value
LISTA.List(r, 10) = ActiveSheet.Cells(FILA, 11).Value
LISTA.List(r, 11) = ActiveSheet.Cells(FILA, 12).Value
LISTA.List(r, 12) = ActiveSheet.Cells(FILA, 13).Value
LISTA.List(r, 13) = ActiveSheet.Cells(FILA, 14).Value
LISTA.List(r, 14) = ActiveSheet.Cells(FILA, 15).Value
r = r + 1
End If
Next
End Sub
@@LionWolfGame Hola, también tengo el mismo problema pero en el mensaje me sale false. podrían apoyarme
@@LionWolfGame LO INTESTASTE HACER PONIENDO "Me.LISTA.additem" ? y en vez de poner "ActiveSheet.Cells", poner el nombre de la hoja " = Hoja2.Cells (FILA, 2) yo trabajo con mas de 10 celdas, y el codigo me funciona bien
El código es hasta para una tabla con 10 columnas no nomas
buen dia ,quiero felicitar primero que todo al canal y a su instructor , ojala la gente usara estos canales para cosas productivas como estas, tengo un formulario que diseñe gracias a esta pagina donde puedo, con el botón agregar , ir agregando registros a una base de datos, pero necesito que el ultimo datos agregado se agregue como un hipervínculo , y me muestre este hipervínculo en una lista de formulario que ya me esta en el formulario, y poderlo abrir al darle clic, y me muestre el archivo pdf, agradecería mucho me ayudaran con eso.
Hola Tio Tech, por favor dinos si pudiste resolver el problema de los encabezados que desaparecen, saludos.
X2
X3
X4
x5
X6
Hoia Tio Tech excelente aporte, como siempre con cosas nuevas en cada aporte. Tio Tech, quisiera plantearle otra cuestion para ver si es posible que me pueda ayudar, teengo un abarrote pero solo quiero llevar el control de los creditos, donde pueda ingresar, cobrar, y borrar la deuda cuando me paguen el total del credito y si no pagan el total poder abonar a la cuenta del cliente, de antemano gracias
Hola Tío Tech te doy las gracias por los videos ha sido increible, tengo una consulta, tengo un botón de buscar siguiendo tus instrucciones, pero al momento de utilizarlo me salen duplicados en la búsqueda
Miguel buenas , eh seguido los 4 videos del formulario VBA, muy bueno, quedo pendiente explicarnos como hacer para agregarle imágenes al formularios, gracias
muy bue video y buenas ideas
Buenas noches, tengo una consulta, despues de realizar una busqueda no puedo editar o modificar el valor seleccioando; asi como no puedo eliminar el valor seleccionado luego de realizar el filtro con mi boton busqueda. Se te agradeceria mucho. Excelente video
Buenos dias primero felicitarte nuevamente por tus videos
Me quede con la duda del punto 4 de la lista de dudas , como hacer para que sirva el enter en lugar del boton buscar. Has hallado la respuesta?
Muchas gracias
Felicitaciones por cada video que haces me gustaría que explicaras como insertar imágenes por cada nombre registrado y cuando hagas la búsqueda la muestre. Me quede en esa pregunta que te habían hecho y no pudistes explicar porque estabas cansado ..Pero igual te felicito.
tengo una pregunta tu formulario se podria agregar un campo para un hipervinculo para cada persona por ejemplo que me direcciones aun archvo en word o pdf sobre informacion extra de cada persona saludos me gusta muchos tus videos
Cómo darle FORMATO de FECHA a un TextBox y que tambien la celda lo reconozca con formato de fecha. Me pasa que le doy formato de fecha al TextBox pero en la celda del excel no. Esta escrita la fecha bien, pero por ejemplo lo filtro y no lo toma como si tuviese el formato de fecha.
Le agregue CDate y me jala en formato de fecha espero te sirva
Me.fecha1 = CDate(Application.WorksheetFunction.VLookup(CDbl(codi), Sheets("BD").Range("E:N"), 3, 0))
@@aprendamosjuntosperu Muchas gracias! me sirvio muchisimo..
@@aprendamosjuntosperu Hola que tal, no pude lograrlo, me sale un error. Lo copia tal cual lo pusiste y no salio. Gracias y saludos
Tengo esta misma duda me pueden ayudar?
Cdate