Excel Avanzado – Capitulo 7

Curso de Excel Avanzado - Capítulo 7

BÚSQUEDA DE DATOS Y MÁS

Aprende a insertar datos desde un UserForm, buscar datos de excel en visual basic, modificar datos de excel desde un formulario, estilos de texto en los formularios, entre otros temas que manejaremos en este capítulo lleno de contenido donde de paso seguiremos trabajando con las cajas de texto y otros controles de VBA.

Este es quizás uno de los capítulos más importantes y tal vez quedó un poco extenso, sin embargo como mencione trabajaremos bastantes temas muy recurrentes cuando se trata de macros en excel, asi que mirenlo con calma y les recomiendo descargar el material de apoyo para comparar los códigos ya que es muy común cometer errores en este ejercicio.


DESCARGAR MATERIAL DE APOYO
Descarga el archivo que vemos en el vídeo desde los siguientes enlaces

Descargar desde Mega Descargar desde MediaFire

Descarga Directa

Mega | MediaFire | Descarga Directa

Capitulo Anterior Lista de Capitulos Capitulo Siguiente


25 Comentarios

  1. Silvestre Pacheco

    Saludos Dostin, excelente forma como cada video complementa el anterior. En este video #7 pude aprender como insertar datos al final de la hoja de datos y no al principio, este era precisamente una de las dudas que tenía, hasta este video, y que me resulta útil para el proyecto que estoy llevando a cabo

    Muchas gracias

    1. Jefferson Lozano

      Tengo esa misma duda, pero no supe ¿cúal es el código? Me podrías decir Silvestre

  2. miguel paez

    Don Dostin Muy agradecido con sus Tutoriales eh y hemos aprendido mucho de usted, quería pedirle el favor si se puede de regalarme el proyecto que explico en el capitulo 7 de un hospital, no es para nada malo es que tengo que hacer un proyecto muy parecido para empresa donde trabajo y poder comprar los codigos con su proyecto sería increible, si puede Mi Dios le pague, sino le agradezco mucho por la enseñaza y que tenga un muy buen día y resto de año, Saludos Dostin Hurtado.

      1. liz

        si puedes también compartirlo. quiero hacerlo con ese archivo por que la verdad no tengo ninguno así. gracias mi correo es [email protected]

    1. Matias Morales

      Hola, queria saber si me podrias enviar el excel del hospital para practicar diferentes metodos de ingresar la información si alguien lo tiene por favor seria tan amable de enviarlo a mi correo [email protected]

  3. Alejandro Quispe

    Hola cuando copia el primer código, me sale error en fila libre. Sabras por que podría estar saliendome mal. Y eso que lo que copiado tal y como esta pero me selección de amarillo la parte del filalibre en la parte del AfterUpdate(). Gracias de antemano.

    1. Alejandro Quispe

      Ya resolvi mi duda. Gracias

    2. andres

      como lo hiciste hermano no puede

  4. Marcos

    Estimado, ante manos agradecer por tu excelente trabajo, créeme que gracias a tus vídeos he realizado varios ajustes en mis planillas excel, no obstante, hay una problemática que aún no puedo resolver.
    En este mismo caso del vídeo, ¿Cómo puedo buscar en una Base de datos con celdas combinadas? es posible?

    Muchas gracias y saludos.

  5. César Silva

    Excelente video, de verdad gracias por tomarte el tiempo de explicar, felicitaciones amigo eres ejemplo a seguir, estoy aprendiendo gracias a esto, sigue así, saludos…

  6. Facundo

    Hola Dustin serias tan amable de enviar el archivo de las planillas de hospitales?

    Me seria de gran ayuda para completar otros proyectos, muchas gracias.

    [email protected]

    Excelente dedicacion y explicacion, sigue asi!

  7. Mayra Alejandra

    Hola Dostin,

    Muchas gracias por compartir conocimientos, estoy feliz de aprender de esta forma siento que he avanzado mucho, estoy sorprendida de todo lo que se puede realizar en excel y lo estoy colocando en práctica.
    Me gustaria saber si al terminar el curso hay posibilidad de obtener certificado de su parte, quedo atenta.

  8. Humberto

    No logro imaginar cómo ganan y continúan ayudando personas que como tú, altruistas y profesionales, entregan tanto a nosotros, sedientos de esta información valiosa y al mismo tiempo incapaces de pagar el gran valor de lo que nos regalas.
    Gracias a tu entrega hoy planifico mi futuro con muchísimas más herramientas.
    Gustosamente contribuiré con tus proyectos en cuanto recoja mis frutos.
    Desde hoy seré un fiel seguidor de tus instrucciones. No imaginaba tampoco el abanico de ofertas que tienes, es inmenso.

  9. Yang O'Brien

    Un cordial saludo Dostin y te agradezco por los videos me an ayudado poco a poco a entender mejor Excel, me alegra que aun hay personas interesadas por compartir los conocimientos adquiridos y hacerlo de manera gratuita hoy en día la población a nivel mundial quiere ganar con el conocimiento una de las causas por las cuales existen muchas personas faltas de conocimiento, me agrada tu manera Tan práctica y sencilla de explicar cada video apenas voy en este capítulo pero voy entendiendo cada tema que das un saludo esperando que tengas una excelente semana

  10. Jesús mercado Caballero

    EXCELENTE TRABAJO DOSTIN!! CADA VEZ ESTOY APRENDIENDO MAS Y ES GRACIAS A TUS VÍDEOS. ESPERO QUE SIGAS CON ESTE GRAN PROYECTO YA QUÉ ES UNA FUENTE DE CONOCIMIENTO PARA MUCHOS JÓVENES.

    ERES UN CRACK ES EXCEL!!!

  11. Renzo Neyra

    lo maximo !

  12. nestor fernando

    hola profe, muchas gracias por enseñarnos de esa manera tan práctica y con esa excelente pedagogía, para el ejemplo que nos presenta en esta ocasión quisiera acomodarlo con un cuadro de texto en el formulario que me permita ingresar nuevos registros en la última celda disponible de la fila, de esa manera puedo aumentar nuevos valores a un mismo registro, es muy util para cuando se necesita utilizar en un servicio técnico y a medida que se va progresando en la reparación se le van poniendo repuestos. muchas gracias por su respuesta

  13. Andrea Rodriguez T.

    Hola Dostin

    Muchas gracias , por compartir con todos el conocimiento que tienes y hacerlo de la manera mas sencilla, pratica y economica .

  14. PABLO ANDRES RENTERIA

    muy bueno sus videos
    dostin porque no comparte ese trabajo, serviría un monto para uno guiarse y aprender mucho mas
    por favor si lo puede compartir se lo agradeceríamos todos sus seguidrores

  15. Daniela Dueñas

    Excelente vídeo me gusta como explicas todo paso a paso, y muy claro, gracias Dustin por tu tiempo dedicado y cada día aprendo más con tus tutoriales, muchas gracias.

  16. Miguel Ángel

    Estimado Dostin, está genial tus cursos pues son fáciles de seguir y de comprensión, lo cual considero que es muy importante en un profesor, tras esto, sólo necesito una aclaración ya que esta programación contempla una base de datos que parte de información, pero si esa información no existe y lo que deseo es insertar, buscar o actualizar?? Lo digo, porque si borras los datos de la «base de datos» con este ejercicio no permite nueva creación pues parte de la filalibre que se supone que tiene datos…
    No se si me he explicado bien, pero lo que quiero es, sin dato alguno crearlo y agregarlo, además del resto de opciones.

  17. Andres Rafael

    Hola Dostin
    Grandioso el vídeo
    Sin embargo tengo un problema
    Me aparece el mensaje «Se ha producido el error ‘9’ en tiempo de ejecución: Subíndice fuera del intervalo»
    Sabes cuál puede ser la solución?
    Gracias

  18. Maria Belen Lauret

    Hola Dostin! yo quiero que a partir de un código me traiga varios resultados de una misma columna. Para ser mas especifica quiero poner un producto y que me traiga la formula (materias primas) y cantidades.. Sera que lo puedo hacer?
    Son excelentes todos tus cursos, te deseo el mayor de los éxitos ! GRACIAS !!

  19. Marilen

    Hola Dostin
    Por favor ayuda , copié textual el código pero me da un error dice que no consigue el rango , esto fue lo que copié, donde puede estar el error.

    Public filalibre As Integer
    Public control As Integer
    Public ubica As String

    Private Sub CommandButton1_Click()
    Sheets(«sheet5»).Select
    If control > 0 Then
    ´actualizar datos
    Range(ubica).Value = TextBox1
    Range(ubica).Offset(0, 1).Value = TextBox2
    Range(ubica).Offset(0, 2).Value = Val(TextBox3)
    control = 0

    Else
    ´crear nuevos
    Cells(filalibre, 1).Value = TextBox1
    Cells(filalibre, 2).Value = TextBox2
    Cells(filalibre, 3).Value = Val(TextBox3)
    End If
    TextBox1 = Empty
    TextBox2 = Empty
    TextBox3 = Empty
    TextBox1.SetFocus

    End If

    End Sub

    Private Sub CommandButton2_Click()
    TextBox1 = Empty
    TextBox2 = Empty
    TextBox3 = Empty
    TextBox1.SetFocus

    End Sub

    Private Sub CommandButton3_Click()
    Unload UserForm1

    End Sub

    Private Sub TextBox1_AfterUpdate()
    Sheets(«sheet5»).Select
    filalibre = Range(«A2»).End(xlDown).Offset(1, 0).Row
    control = 0
    dato = TextBox1
    rango = «A2:A » & filalibre
    Set midato = ActiveSheet.Range(rango).Find(dato, lookin:=x1values, lookat:=x1whole)

    If (midato) Is Nothing Then
    MsgBox «no se encontraron los datos cree uno nuevo»
    Else
    ubica = midato.Address(False, False)
    TextBox2.Value = Range(ubica).Offset(0, 1).Value
    TextBox3.Value = Range(ubica).Offset(0, 2).Value
    control = 1
    MsgBox «datos cargados con exito»
    End If
    midato = Nothing
    End Sub

Responder a Andres Rafael Cancelar la respuesta

Tu dirección de correo electrónico no será publicada. Los campos obligatorios están marcados con *

¿Conoces el Paquete de Excel?

¡Apoya este proyecto! y recibe como agradecimiento todo el curso de excel con videos complementarios, ¡sin publicidad y offline!