En este te aprenderás como realizar un documento en Excel que te permita registrar a tus pacientes. ✉✉Contacto: nutricion.en.excel@gmail.com www.facebook.c.... / nutricion_excel
Amigo muchísimas gracias por tu video sobre el registro de pacientes en excel, me ayudo mucho en mi trabajo de mi carrera de Administración. La única diferencia no mas es que la versión de mi excel es con punto y coma, de ahí todo excelente sin ningún error. Dios te bendiga bro, gracias 😁
¡Muy bueno, amigo! Me gustaría observar el método de cómo podrías plantear ahora una opción para cita de seguimiento nutricional. Siempre se aprende cosas muy valiosas de ti, y de ellas las aplico en mi conocimiento. Muchas gracias.
HOLA BUENAS NOCHES, INTERESANTE LOS VIDEOS, MUY BUENA EXPLICACION, SIN EMBARGO LO INTENTE PERO ME DA UN ERROR EN ESTA LINEA: BD.Cells(Fila_paciente, Col_paciente).Value = .Range(BD.Cells(1, Col_paciente).Value).Value ME SALE RUN -TIME ERROR 424 OBJECT REQUIRED. SUPONGO QUE ALGO HICE MAL...😅
Hola Lonardo Lo mejor sería buscar en internet el error que te aparece y buscar una solución Puede ser cualquier cosa De igual forma te comparto el link de mi tienda virtual, saludos y éxito nutricionexcel.com/tienda/
Hola. Gracias por compartir. Solo que…. Ya me había quedado. Pero la volví a abrir el archivo al día siguiente y me apareció una alarma que dice: no se puede ejecutar macro. puede que la macro no esté disponible en este libro o que se hayan deshabilitado todas las macros. Ayuda ☹️
Solamente lo cierra y lo vuelve a abrir En la parte superior le aparecerá un mensaje amarillo de habilitar macro o conteido. Solo tiene que dar click en habilitar y listo Saludos
hola amigo , buen video , consulta .. como hago si quiero poner el formato de receta y/o expediente que estamos en una óptica y usamos expedientes físicos y me gustaría hacer esos mismos pero en la compu ,que ya luego es jy tardado encontrar sus datos graduación , etc etc
Si claro Aquí tengo este video donde puede descargar gratis el Excel Solo sería adaptarlo a los datos que necesita ru-vid.com/video/%D0%B2%D0%B8%D0%B4%D0%B5%D0%BE--RX7qLHXjGQ.htmlsi=Y4Wvh7VMPyVAULh0
Gracias por el video esta bastante claro, solo que en mi caso me manda un error "faltan registros" si dejaba una casilla sin rellenar pero tiene infornacion solo que al guardar manda la ventana de error, segui al pie de la letra el tutorial pero no se que sucedió
Hola, primero para agradecerte y felicitarte por tus videos están muy interesantes y aplicativos. Me sirvió mucho. Por otro lado quisiera saber si sabes de algunos trabajos de investigación (publicaciones) donde hayan usado excel y visual basic como tú para la creación de base de datos.
Es muy probable que Excel se haya usado en investigación, por lo general esto no se declara en la metodología. Sin embargo para la realización de análisis estadístico se usa frecuentemente SPSS. Esto va de acuerdo al análisis que realizará y este tipo de software es el que más se utiliza
Genial! Pero tengo un tema, cuando le doy grabar borra la información pero también el formato de las celdas de captura de datos. Inclusive de algunas celdas, le puse tomar datos de lista para agilizar y borra esa validación, como puedo evitar que borre formato y la validación de datos? Gracias!
En vba tienes que poner las celdas que quiere borrar su contenido Para eso poner Range("las celdas").clearcontents De igual forma puede adquirir una tabla de registros de pacientes en la tienda virtual nutricionexcel.com/producto/historia-clinica-completa-en-excel/
a mi me sale Se ha producido el error '1004' en tiempo de ejecución. Error en el método 'Range' de objeto_Worksheet' y me marca esta parte del código: bd.Cells(Fila_paciente, Col_paciente).Value = .Range(bd.Cells(1, Col_paciente).Value).Value me podrias ayudar xfa
En la primera fila dentro de la bd tiene la ubicación de los datos que va a extraer? También revise si el rango de datos de col_paciente dentro de la bd no estén vacías (fila 1 también)
Muy buen vídeo. Tengo una pregunta podría crearse una macro que guardase parte de los datos en dos hojas de excel diferentes. Ejemplo: una que guarde todos los datos y otra que guarse todos los datos con además un código para identificar a cada paciente. un saludo
Si se puede Para el código sería solamente poner un contador Dónde en casa registro sume 1 Te comparto este tutorial actualizado ru-vid.com/video/%D0%B2%D0%B8%D0%B4%D0%B5%D0%BE-jI5bXWx0RfA.html
Hola amigo, buenas noches. Quiero hacer lo contrario, tengo mi base de datos concentrada de mis 30 alumnos, pero necesito a su vez, pasar esta información a una hoja individual por niño para anexarlo a su expediente fisico, intente enlazar las hojas pero es muy tardado y termine haciendo este proceso de forma manual, sera que pueda automatizarlo asi como tu video, pero a la inversa? No se si me di a entender. De antemano, muchas gracias.
En este video explico cómo mostrar los datos de la persona seleccionada ru-vid.com/video/%D0%B2%D0%B8%D0%B4%D0%B5%D0%BE--RX7qLHXjGQ.htmlsi=LQEuSZNRyFib4REx
Hola, gracias por el video , es bastante claro, quisiera preguntarte como se haria para realizar un macro pero con eleccion multirple, por ejemplo si se usan varios medicamentos en un tratamiento dentro de una historia clinica, como se haria esto en una macro y con que comandos?
@@nutex Yo utilizo Formularios (userform) con lista desplegable (ListBox) seleccionable con textbox mediante digitación de una breve cadena de caracteres.
@@noeliamarcelaperez9566 tiene que agregar más columnas Y en la parte superior poner la ubicación de la celda Para seguidamente dentro del fot en vba agregar esas columnas extras
Hola amigo, una disculpa, pero al colocar la coma y el espacio (Usuario 1, Usuario 2), le doy aceptar pero cuando intento ver la lista me sale una lista con ambos juntos en la opcion en lugar de las dos opciones por separado
Hola, si quisiera agregar un apartado de "expediente" donde al hacer click me redireccione al expediente del paciente como seria? gracias por la ayuda!
Hola lucy Tengo una serie de videos donde realizó algo de lo que pides Checa este video Saludos ru-vid.com/video/%D0%B2%D0%B8%D0%B4%D0%B5%D0%BE-mxP8YDAsbzE.html
hola amigo, admiro tu destreza! Quizas me puedas ayudar, yo soy medico, y lo q necesito es q al poner el nombre del paciente se cargue de forma automatica su numero d documento en la celda q le sigue… se podra hacer?
Lo hice exactamente como dice el video, y me marca un error en la instrucci'on: File_Paciente = bd.Range("B99999").End(xlUp).Row + 1 'SITUARNOS EN LA FILA PARA REGISTO Error 424 Object required... Alguna idea?
Hola Aprecio tu comentario Puedes visitar un video reciente que subí donde explico de manera más sencilla el cómo crearlo, además el archivo es de descarga gratis ru-vid.com/video/%D0%B2%D0%B8%D0%B4%D0%B5%D0%BE-MtYbaG52G0o.htmlsi=GvZ5zz-DdEizXcFk
Buenas , hermano tengo un problema gigante , mi familia ha abierto un albergue de personas en estado de calle y necesitamos saber cómo podemos hacer un registro que diga el ingreso de la persona y también cuando se retiran del centro … Me encantaría poder recibir ayuda
Gracias por el comentario Podría implementar lo explicado en el siguiente video ru-vid.com/video/%D0%B2%D0%B8%D0%B4%D0%B5%D0%BE-0XCXjr8Luqc.htmlsi=Ve4A-Fa6ap9JY_Tr
@@nutex la dinámica solo se enfoca en las seldas no el tipo de etiqueta verdad? Porque mis etiquetas van a cambiar por ejemplo , N°de hospitalizaciones N° de registro etc , eso no influye?
Hola! Me sale error 438... depurar... y en el cuadro me resalta en amarillo "Application.ScreenUpdation = True"... aunque sí me deja registrar (tarda en hacerlo, o es normal?)
Hola! Tengo un problema. Al copia la parte de fila_paciente = bd.range(“b999999”).End.(xlUp).Row + 1 … Me sale un error con respecto al b99999 y dice “se esperaba: separador de lista o )” Que tengo que hacer para solucionarlo? Muchas gracias
hola bro este es mi codigo que si funciono : Dim Fila_Pacientes As Long, Col_pacientes As Long Dim HojaRegistro As Worksheet Dim HojaListado As Worksheet Sub guardar_datos() Application.ScreenUpdating = False ' Asignar la hoja de Registro a la variable Set HojaRegistro = ThisWorkbook.Sheets("REGISTRO") Set HojaListado = ThisWorkbook.Sheets("LISTADO") With HojaRegistro If .Range("F8").Value = Empty Or .Range("F11").Value = Empty Or .Range("F14").Value = Empty Then MsgBox "Falta ingresar los datos relativos", , "NutEx" Exit Sub Else 'Encontrar la última fila utilizada en la columna B de la hoja "LISTADO" Fila_Listado = HojaListado.Cells(HojaListado.Rows.Count, "B").End(xlUp).Row + 1 ' Definir las celdas específicas que se copiarán Dim celdasACopiar As Variant celdasACopiar = Array("F8", "F11", "F14", "M28", "F17", "F20", "F23", "G26", "G29", "N9", "N13", "O16", "N19", "M22") ' Iniciar desde la columna B en la hoja "LISTADO" Col_Listado = 1 ' Copiar valores desde la hoja "REGISTRO" a la hoja "LISTADO" For Each celda In celdasACopiar Col_Listado = Col_Listado + 1 ' Imprimir información en la ventana de inmediato Debug.Print "Copia de " & celda & ": " & .Range(celda).Value HojaListado.Cells(Fila_Listado, Col_Listado).Value = .Range(celda).Value Next celda End If End With End Sub
@@nutex Esta igual pero sigue el error : esto es lo que tengo : Else Fila_Paciente = BD.Range("A99999").End(xlUp).Row + 1 'SITUARNOS EN LA FILA PARA REGISTRO FOR Col_Paciente = 1 TO 8 BD.Cells(Fila_Paciente, Col_Paciente).Value = Range(BD.Cells(1, Col_Paciente).Value).Value Next Col_Paciente End If End With
Hola aprecio su comentario Está plantilla no la tengo para descargar Sin embargo tengo una mejor y actualizada que si está para su descarga gratuita En el enlace del siguiente video lo encontrará Apreciaría si dejaras un mensaje y te suscribes Saludos ru-vid.com/video/%D0%B2%D0%B8%D0%B4%D0%B5%D0%BE-uVO6g1qopEA.htmlsi=Dy2KbbZ_1OznqGFc
Hola Si te aparece un mensaje rojo tiene que dar clic derecho al icono del documento, ir a propiedades y en la parte final vas a ver una casilla de desbloquear Lo seleccionas, luego aceptar y listo
@@lunam.b.8258 te aparece el mensaje rojo? la otra es que al abrir el archivo te puede aparecer un mensaje de habilitar macro o contenido Selecciona habilitar o enable y listo
@@nutex si, me salió el mensaje rojo... Pero no sé qué pasó y ya pude ejecutarlo nuevamente, pero no sabría decir cuál fué la solución. Muchas gracias por su ayuda!
Seleccione depurar Le marcará la línea donde se encuentra el error Te comparto ese otro video donde puedes descargar la tabla y adaptarlo a tus necesidades ru-vid.com/video/%D0%B2%D0%B8%D0%B4%D0%B5%D0%BE-uVO6g1qopEA.htmlsi=6d6_sLM3ZdOzObOF
Hola, intente hacer este trabajo pero, no logre ejecutarlo, ya que me tira un error, he visto el video varias veces, y lo hago exactamente pero no logro ejecutar la acción del Macro. justo en esta linea: BD.Cells(fila_paciente, Col_paciente).Value = .Range(BD.Cells(1, Col_paciente).Value).Value siempre me dice que hay un error y que especifique, pero la verdad no se como hacerlo ya que soy principiante, si pueden darme un consejo y ayudarme por favor, se los agradecería mucho.
Dos posibles errores de eso puede ser que: 1. La ubicación de la celda dentro de la base de datos no se encuentre en la fila 2. Alguna celda del rango de celdas que pone después de for se encuentra vacía (el rango donde se encuentra la ubicación de la celda dentro de la bd)
@@nutex Buenas tardes, me pasa exactamente igual, en una me coloco el error 1004 error en worksheet y en otro el error 424 se requiere un objeto en esa misma parte bd del macro, alguna ayuda por favor.
el error 1004 se soluciono al colocar en la misma celda que usted coloco la 1 (antes habia colocado la 2) cuando lo hice asi me salto el error 424 y me señalaba en depurar esa misma linea de BD.
bd.Cells(Fila_paciente, Col_paciente).Value = .Range(bd.Cells(1, Col_paciente).Value).Value la pongo exactamente igual pero me sigue apareciendo depuración :(
@@DavidHernandez-hy5tk corrobora que todas las celdas de la primera fila donde se van a almacenar los datos no estén vacías Es decir dónde pusiste la ubicación de las celdas Avísame si es eso
Puedes ser complicado aprender Excel Pero conforme trabajas con Excel es más fácil realizar tus tablas De igual forma te comparto el siguiente tutorial de registro de pacientes que tiene descarga gratuita para que lo adapte a sus necesidades ru-vid.com/video/%D0%B2%D0%B8%D0%B4%D0%B5%D0%BE--RX7qLHXjGQ.htmlsi=jYCuJK2ce39EaTdO
Hola muchas gracias por el video, al igual que a varios me aparece la franja amarilla al comienzo cuando se agregó el comando Sub guardar_datos (), espero la ayuda