Jump to content

CESAR25-03-76

Members
  • Posts

    38
  • Joined

  • Last visited

About CESAR25-03-76

  • Birthday 03/25/1976

Converted

  • Campos
    ,

CESAR25-03-76's Achievements

  1. HOLA MIGOS DE EXCEL SOLO PARA PEDIRLES UN GRAN FAVOR ME PASARON UN ARCHIVO DE UNA BASE DE DATOS EN EXCEL Y UTILIZAN UNA FUNCION: =BUSCARV(([paciente]);(Tabla3[#Todo]);3;0) LO QUE QUISIERA SABER MUY APRTE DE LO Q UE YA SE LO QUE HACE BUSCAR V ES QUE SIGNIFICA PONER ENTRE CORCHETES EL VALOR BUSCADO Y EN LA MATRIZ A BUSCAR #TODO LES AGRADECERIA SU AYUDA
  2. hola amigos espero me puedan ayudar con esta mi consulta si no es mucha molestia sobre como filtrar datos en forma vertical adjunto archivo para mas entendimientoejemplo.rar

  3. Hola amigos tengo un problema con respecto a este archivo que estoy creando con la ayuda de este foro mi pregunta es la siguiente: Lo que quiero es que al momento de grabar un nuevo registro me compare en la hoja base si el registro se esta repitiendo o no y que me arroje un mensaje de alerta dandome a saber que el registro se esta duplicando. Adjunto archivo para que se me entienda mejor lo que quiero ojala se me pueda ayudar para asi ir terminando con este modulo. EJEMPLO.zip
  4. Re: Devolver la ubicacion de una celda con respecto a un determinado valor Gracias amigo gerson pineda me sirvio de mucho tu ayuda solo que tuve que agregarle al final lo siguiente =indice(b$3:m$3,max((b4:m4)*columna(b4:m4))-1) por que como tu me l o planteaste salia un mes mas al que habia reportado y agregandole el -1 salia el mes exacto gracias tambien a la ayuda de principiant de ante mano muy agradecidos por toda su ayuda y espero pronto pode ayudar a este foro
  5. Hola amigos nuevamente con un nuevo tema y ojala me puedan ayudar lo que quiero es que en una columna me deveulve el nombre del ultimo mes que se a informado para este hoja de exel ya que son como cerca de 290 filas para lo cual adjunto un archivo para que se me pueda entender mejor. Agraeciendo su ayodo me despido y saludos para todos Libro1.zip
  6. Re: Grabar libro con el mismo nombre Gracia amigo por tu consejo y es verdad de lo que dices que no tan solo es aprender sino tambien enseñar y eso es a lo que yo quiero llegar. Y espero lograrlo con su ayuda para asi tambien despues poder ayudar en los temas de este foro y le dedicare mas tiempo a este pagina ya que aveces por motivos de trabajo me ausento de ella
  7. Re: Grabar libro con el mismo nombre Gracias amigo(a) fornelasa por tu aporte es l o que necesitaba por ahora y ojala me sigan ayudando en mis temas que de mi parte yo voy a poner todo de mi para aprender cada dia mas con sus ejemplos y asi tambien poder aportar algo a este foro saludos para todos
  8. Grabar un libro con el mismo nombre HOLA AMIGO ESTE ES MI CODIGO: Sub actualiza() On Error Resume Next Sheets("base").Select Range("A1").Select Range(Selection, Selection.End(xlDown)).Select Range(Selection, Selection.End(xlToRight)).Select ChDir "D:\AEDES" 'Application.DisplayAlerts = False Application.ActiveWorkbook.SaveAs Filename:="D:\AEDES\base.dbf", FileFormat:=xlDBF4, ReadOnlyRecommended:=False, CreateBackup:=False Sheets("Ingreso").Select ChDir "D:\AEDES" ActiveWorkbook.SaveAs Filename:="D:\AEDES\progREFE.xls", FileFormat:=xlNormal, Password:="", WriteResPassword:="", ReadOnlyRecommended:=False, CreateBackup:=False ' LUEGO ACTIVA LA HOJA SELECIONADA EN EL RANGO SELECCIONADO Sheets("Ingreso").Select Range("A11").Select End Sub CON ESTE CODIGO GRABA UN LIBRO QUE YA EXISTE AL EJECUTAR LA MACRO EXEL ME ENVIA UN MSJ PIDIENDOME LA CONFIRMACION SI DESEO REEMPLAZARLO O NO O CANCELAR. CUANDO LE DIGO SI ME LO GRABA PERO CUANDO LE DIGO NO O CANCELO ME SALE UN ERROR EN LA LINEA: Application.ActiveWorkbook.SaveAs Filename:="D:\AEDES\base.dbf", FileFormat:=xlDBF4, ReadOnlyRecommended:=False, CreateBackup:=False Y LO QUE DESEO ES QUE AL DARLE NO O CANCELE ME REGRESE A LA HOJA ACTIVA EN ESTE CASO A LA HOJA INGRESO ESPERANDO SEA CLARO EN MI MSJ ME DESPIDO AGRADECIENDOLE YA DE ANTE MANO SU COLABORACION
  9. HOLA AMIGO ESTE ES MI CODIGO: Sub actualiza() On Error Resume Next Sheets("base").Select Range("A1").Select Range(Selection, Selection.End(xlDown)).Select Range(Selection, Selection.End(xlToRight)).Select ChDir "D:\AEDES" 'Application.DisplayAlerts = False Application.ActiveWorkbook.SaveAs Filename:="D:\AEDES\base.dbf", FileFormat:=xlDBF4, ReadOnlyRecommended:=False, CreateBackup:=False Sheets("Ingreso").Select ChDir "D:\AEDES" ActiveWorkbook.SaveAs Filename:="D:\AEDES\progREFE.xls", FileFormat:=xlNormal, Password:="", WriteResPassword:="", ReadOnlyRecommended:=False, CreateBackup:=False ' LUEGO ACTIVA LA HOJA SELECIONADA EN EL RANGO SELECCIONADO Sheets("Ingreso").Select Range("A11").Select End Sub CON ESTE CODIGO GRABA UN LIBRO QUE YA EXISTE AL EJECUTAR LA MACRO EXEL ME ENVIA UN MSJ PIDIENDOME LA CONFIRMACION SI GRABAR O NO O CANCELAR. CUANDO LE DIGO SI ME LO GRABA PERO CUANDO LE DIGO NO O CANCELO ME SALE UN ERROR EN LA LINEA: Application.ActiveWorkbook.SaveAs Filename:="D:\AEDES\base.dbf", FileFormat:=xlDBF4, ReadOnlyRecommended:=False, CreateBackup:=False Y LO QUE DESEO ES QUE AL DARLE NO O CANCELE ME REGRESE A LA HOJA ACTIVA EN ESTE CASO A LA HOJA INGRESO ESPERANDO SEA CLARO EN MI MSJ ME DESPIDO AGRADECIENDOLE YA DE ANTE MANO SU COLABORACION
  10. Hola amigos soy cesar vargas de peru he encontrado esta pagina ace uno o dos años atras y me a parecido muy interesante de la cual estoy aprendiendo poco poco lo que son macros aun pocas son las veces que visito esta pagina por motivos de tiempo aqui estoy dandole para aprender mucho mas y asi poder despues aportar algo de mis conocimientos por ahora ojala sean pacientes conmigo me ayudan en mis temas y me enseñen a como navegar en esta pagina. Esperando su comprension. Me despido atentamente saludando a todos sus miembros de este foro
  11. HOLA AMIGOS TENGO EL SIGUIENTE CODIGO EL CUAL ME ACTUALIZA MIS HOJAS QUE SON COMO MIS BASES PARA LUEGO CREAR UN ARCHIVO CON EXTENSION DBF PARA ABRIRLO CON VISUAL FOXPRO, LO QUE PASA ES QUE AL ABRI EL ARCHIVO QUE ME CREA CON LA EXTENSION DBF EL VISUAL FOXPRO ME ARROJA UN MENSAJE DONDE ME DICE QUE EL ARCHIVO NO ES UNA TABLA Y NO ME PERMITE INGRESAR. OJALA ME PUEDAN AYUDAR Y SOLUCIONAR ESTE PROBLEMA YA QUE LE SOY SINCEROS QUE ESTOY EMPEZANDO EN ESTO Y ESTE CODIGO LO HE CREADO DE VARIOS EJEMPLOS QUE HE ENCONTRADO EN ESTA PAGINA MUY AGRADECIDOS POR SU AYUDA ME DESPIDO CON UN FUERTE ABRAZO. SALUDOS A TODOS Sub actualiza() Sheets("base").Select Range("A1").Select Range(Selection, Selection.End(xlDown)).Select Range(Selection, Selection.End(xlToRight)).Select ChDir "C:\REFERENCIAF1" ActiveWorkbook.SaveAs Filename:="C:\REFERENCIAF1\base_grupoe.dbf", FileFormat:=xlDBF4 = 11, CreateBackup:=False Sheets("basemotivo").Select Range("A1").Select Range(Selection, Selection.End(xlDown)).Select Range(Selection, Selection.End(xlToRight)).Select ActiveWorkbook.SaveAs Filename:="C:\REFERENCIAF1\base-motivo.dbf", FileFormat:=xlDBF4 = 11, CreateBackup:=False Sheets("baseservicios").Select Range("A1").Select Range(Selection, Selection.End(xlDown)).Select Range(Selection, Selection.End(xlToRight)).Select ActiveWorkbook.SaveAs Filename:="C:\REFERENCIAF1\base-servicios.dbf", FileFormat:=xlDBF4 = 11, CreateBackup:=False Sheets("Ingreso").Select ChDir "C:\REFERENCIAF1" ActiveWorkbook.SaveAs Filename:="C:\REFERENCIAF1\progREFE.xls", FileFormat:=xlNormal, Password:="", WriteResPassword:="", ReadOnlyRecommended:=False, CreateBackup:=False ' LUEGO ACTIVA LA HOJA SELECIONADA EN EL RANGO SELECCIONADO Sheets("Ingreso").Select Range("A11").Select End Sub
  12. Respuesta: Buscar nombres repetidos en una lista Muchas gracias amiga por tu ayuda me sirve el archivo pero en si lo que deseo es que en la columna d me aparesca el nombre que esta repetido y reemplaze al mensaje que tu as considerado en tu macro ojala me puedas ayudar y de ante mano mil gracias por todo
  13. Hola amigos lo que deseo en esta oportunidad es lo siguiente: En una columna tengo varios nombres que le corresponden a diferentes profesionales lo que deseo es saber cuales son los nombres que se repiten en dicha columna y que el resultado me lo arroje en otra columna con los nombres que se repiten ojala me puedan ayudar y desde ya muchas gracias por su ayuda y colaboracion a mi consulta adjunto archivo. Libro1.zip
  14. Respuesta: Eliminar ciertos caracteres de una celda Gracias amigo sailepaty me a servido de mucha ayuda tu codigo muy agradecido y mil gracias por tu ayuda desinterezadan espro algun dia seguir aprendiendo mas y poder tambien ayudar para asi sentirme contento en poder tambien ayudar
  15. Hola amigos, nuevamente despues de un buen tiempo esperando me ayuden con mi consulta. Bueno lo que deseo es que mediante una funcion o una macro me elimine ciertos caracteres (palabras) de una celda ya que me envian un reporte y yo no deseo imprimirlo de esa manera por ejemplo en la celda a3 aparece el nomnre de la persona con las siglas de su profesion lo que quiero es que se elimine las siglas de la profesion y solo quede su nombre ya que el formato es una lista de 60 filas aproximadamente. Adjunto archivo para ser un poco mas entendible Libro2.zip
×
×
  • Create New...

Important Information

Privacy Policy