Soy algo mayor y quiero aprender....nesecito,desde un formulario que ya se como hacerlo....introducir datos en diferentes columnas pero en registros diferentes ,solo quiero aprender ,donde exista un ejemplo o literatura de esto especifico. Solo deseo ,saludos a todos, los que pueden aportar a este foro y que de paso ,es una fuente inagotable de conocimiento pues e leido y aprendido mucho, pero tengo que vencer este reto . Mis mas sinceros saludos desde Las Playa De Palm Beach Eddy

Hola buenas a todos, me gustaría saber si me pueden ayudar con esta idea ya que no controlo mucho de macros. Mi intención sería la creación de un "Calendario de Ausencias y retrasos" (adjunto prototipo abajo) en el cual tenemos en la primera columna: o un código o un nombre del alumno (añadí las dos pues no se si hay diferencia) y en la primera fila los meses ( debajo de los cuales están los días, laborales). Encima del calendario iría una "cajita" con los apartado Alumno, Fecha y 2 "botones" (casillas con "Ausencia" y "Retraso" escrito"). La idea sería que al escribir el nombre del Alumno (o el Código, como prefieran ustedes) junto con la fecha, Excel localizase la c…

Encontrar duplicado de una misma columna y consultar valor de una diferente Buenas colgegas he escrito en parte de mi macro el siguiente código para que encuentre duplicados de una misma columna y los pinte de verde: Dim celda As LongDim celdaMax As LongWith ControlesRemoto celdaMax = .UsedRange.Rows.Count For celda = 2 To celdaMax If Application.WorksheetFunction.CountIf(.Columns(1), .Cells(celda, 1).Value) > 1 Then .Cells(celda, 1).Interior.ColorIndex = 4 Else .Cells(celda, 1).Interior.ColorIndex = x1ColorIndexNone End If Next celdaEnd With[/PHP] ahora la cuestión que me tiene loco hace unos días es que quiero que al…

Hola!!!!!!!!! Saludos a todos. Bueno mi duda es que, primeramente tengo un userform el cual tengo que llenar de datos dentro de los combobox y textbox. Y para colocar el nombre de cada dato que se tiene que llenar puse label's. Ahora lo que quiero es que al hacer click el cada label me vote un cuadro de ayuda diferente (help) donde yo pueda poner la información necesaria de ayuda que se requiere para colocar ese dato. Espero me puedan entender la verdad no tengo ni la menor idea de como hacer eso, ni tampoco si se puede, por esa razon es que no adjunto ningun archivo ok. Agradezco a todos los que puedan ayudarme. Private Sub CommandButton1_Click() If TextBox1.tex…

Hola todos agradezco de antemano cualquier gestión / ayuda tengo dos pestañas BBDD listado exportado de la ERP donde pueden cambiar los importes USUARIO listado histórico de BDD El código tiene que detectar por la columna del nº factura ( columna J ) y cuando detecte el mismo nº de factura que actualice los importes de acuerdo a la exportación ( BBDD ).....que mal me explico. Lo siento. Sub CORREGIRIMPORTES2() Dim i, j As Integer j = 3 ' DONDE EMPIEZA A ESCRIBIR For i = 3 To 10000 ' DONDE EMPIEZA A BUSCAR …

Generar una hoja nueva con contenido de otras hojas en ella. Edito todo el post: Por fin he logrado introducir dos fechas y que cuente los dias entre una y otra atendiendo a los colores. Ahora necesito colocar en otra hoja un boton para generar una hoja nueva, esta hoja tiene que crear con diversos datos, entre ellos, una copia del archivo adjunto. A ver si me podeis ayudar, un saludo. Libro1.xlsm.zip

Hola! amigos del foro quisiera solicitarles la colaboración con lo siguiente: Estoy intentado crear un formulario para capturar el registro de tiempos , este debe ser asociado a un evento inicio y un evento final, ósea como si apilara los datos hacia la derecha, en este formulario el usuario solamente pasa su id por un lector de código de barras o bien digita su numero de ID, selecciona la actividad y guarda el registro, mediante un botón. Los problemas que no logró solucionar: 1. El usuario en el primer evento realiza el registro en una hora determinada y selecciona la actividad a realizar, guarda el registro. hasta aqui creo tenerlo bien. Entiéndase sería …

Hola a todos al final hay parte dos. En esta segunda parte necesito saber el nombre de las imágenes y almacenarlo en los textBoxs que he creado, evidentemene en el evento Click. -¿Como?: Primero evaluamos que estén todos vacíos y si es así al hacer Click en la primera imagen se pondrá en el textBox1 el nombre de la imagen y siguiendo este hasta completar los cinco textBoxes. -¿Qué pasa si cambiamos de imagen?: Pues borramos el nombre de la imagen en el textBox correspondiente y almacenamos en él el nombre de la nueva imagen seleccionada. He probado con el ciclo For Each pero no sé cómo hacerlo cuando tengo que hacer los cambios. He gra…

Hola amigos de Ayuda Excel Por acá otra vez solicitando su colaboración El código para eliminar filas cuando lo ejecuto y confirmo la eliminación en la segunda pregunta, aparece el mensaje indicando que la operación se hizo satisfactoriamente, pero luego me sale en el mensaje de operación cancelada, pero efectivamente eliminó la fila. Me podrán ayudar, me imagino que no está en la linea correcta. Lo he movido pero no logro solución. Gracias ELIMINAR FILA.xlsm

Que tal amigos del foro, detallo mi consulta: Tengo un rango por ejemplo B5:d20 el cual quiero que en ninguna otra celda se pueda referenciar hacia este rango. Por ejemplo si estoy en la celda E30 se pueda referenciar a =A10, pero no se pueda referenciarse hacia =B5 o =E12 ya que estas dos últimas están en el rango que se ha establecido como celdas a no referenciar, espero me puedan ayudar, gracias.

Hola que tal, saludos a todos los foreros de Excel. Solicito otra vez vuestra colaboración y ayuda para resolver otra cuestión que se me ha vuelto a presentar en una hoja de calculo de Excel . 1ºAYUDA En mi libro de Excel y desde la hoja1, he creado una hoja de calculo con cuatro columnas para desglosar la Base imponible., el I.V.A, y la suma del total factura ,voy a exponer un ejemplo para una mejor comprensión de lo expuesto. . En la columna B, he seleccionado el rango de las celdas de la B1:B10 para aplicar la cantidad X que quiero desglosar en las siguientes otras columnas: En la columna D, he seleccionado el rango de las celdas de la D1:D10 para aplicar el desgl…

Hola, saludos a todos En donde trabajo adquirieron una actualización de un sistema de contabilidad, el cual ya no arroja los datos de unos reportes utilizados que hacía en la versión anterior, por lo tanto descubrí que el sistema enlaza con Excel en una "matriz" pero los datos que arroja son todos en “bruto” y necesitamos Darle un formato, anexo el archivo con dos pestañas una en la forma en que la matriz me da la info y en la otra en la forma en que lo requiero, desconozco en su mayoría la programación VBA y ya estoy entendiendo una que otra función (prometo estudiar VBA), pero estoy atorado en esto y nomas no doy una, espero me puedan ayudar, gracias duda.zip

Estimados buenas tardes Necesito que a través de este archivo "buscar faltantes", su macro sea modificada y busque de las misma forma los duplicados de cualquier rango de la planilla y los arroje en otra hoja en la celda que uno desee. Necesito que sea de la misma forma del archivo adjunto Favor quedo atenta a sus comentarios. Les agradeceré cualquier tipo de ayuda Numeracion consecutiva2 -NVR (faltantes).rar

Buenas Tengo la necesidad de obtener un listado de pares de celdas relacionadas en cada una de las filas de distintas hojas de Excel. Lo explico mejor en el ejemplo pero en definitiva tengo una gran base de datos con instituciones que publican artículos conjuntamente y necesito cuantificar quienes se relacionan con quien y cuantas veces lo hacen. Aunque el ejemplo está resumido, se trata de gran cantidad de datos con decenas de columnas (artículos con muchos colaboradores) y miles de filas (miles de artículos), así como un gran numero de instituciones implicadas. Espero me puedan ayudar. Muchas gracias. Lista pares de celdas.rar

HOLA, RESULTA QUE NO SOY MUY APLICADO A LAS MACROS. PERO TENGO ESTA QUE ME ESTABA FUNCIONANDO BASTANTE BIEN. EL PROBLEMA ES QUE AL MOMENTO DE INGRESAR UNA CADENA DE TEXTO CON UN NUMERO COMO PRIMER CARACTER NO FUNCIONA. Private Sub TextBox1_KeyDown(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer) If KeyCode = vbKeyReturn Then memo = TextBox1 ActiveSheet.Range("A1:F5000").AutoFilter Field:=2, Criteria1:="=*" & [memo] & "*" _ , Operator:=xlAnd End If ActiveWindow.SmallScroll Down:=-63 End Sub ESTE ES EL LINK DE LA PLANILLA EN CUESTION Dropbox - PRUEBA1.xlsm AGRADECERIA CUALQUIER APORTE!!

Hola, tengo un problema con mi macro, tengo una lista de datos y por cada dato genero la copia de una hoja modelo, el problema es cuando necesito agregar mas datos y vuelvo a ejecutar la macro, me genera otra hoja pero no con el nombre del ultimo dato agregado, si me pueden ayudar lo agradezco. Saludos Sub Generarhoja() Dim HojaOrigen As Worksheet, HojaNueva As Worksheet Set HojaOrigen = Sheets("UF_Dolar") Dim ultfla As Long ultfila = Range("A" & Rows.Count).End(xlUp).Row u = ultfila - 1 'para recorrer los registros del listado For i = 1 To u 'desactivamos la actualización/refresco de pantalla Application.ScreenUpdating = False 'duplicamos la Hoja 'modelo'…

Hola, tengo hecha una macro la cual tiene 6 botones en una hoja de excel, y lo que necesito hacer es que cuando abra dicho documento me salga uno panel con los 6 botones y no la hoja de excel.​

Buenos día amigos, Estoy armando un excel para que mediante un formulario simple en hoja de excel copie los datos a otra hoja según la funcion de busqueda que otorga el excel (CONTROL+B). Lo que requiero es que copie segun la fecha buscada en la otra hoja de excel, pense usar la grabadora de macro pero no me resulta. Adjunto un pequeño ejemplo. Por favor toda ayuda o idea es muy buena. Saludos NUEVO REPORTE FINAL.zip

Buenas tardes, comento tengo un mini sistema desarrollado en el cual formate mi maquina y ahora me tira un error de compilacion..y hace como 4 años que hice este programa y no me acuerdo como solucionar este error.. el cartel dice Compile error: Variable not defined..y me selecciona una variable picker.width=72.. que estimo que es un datepicker que abre usado pero no se como agregar ese componente o libreria si alguien puede guiarme. muchas gracias

Hola, quiero guardar los registros que llegan a la celda C5, estos son entregados mediante una BD que se actualiza diariamente. La idea es guardarlos en la Hoja 2 agregando una fecha, no se me ocurre como hacerlo, por ende recurro a ustedes. Guardar registros .xls

Estimados amigos del foro me gstaria que me ayudaran a resolver este tema, el mismo que muchos buscan tener resuelto este caso en la mayoria de sus aplicaciones. Una aplicacion excel que abra automaticamente un userform, se oculte excel de manera independiente a otros abiertos, en el userform exista un modo de mostrar al excel y volver al userform ocultándolo. Al cerrar el archivo se vuelva todo normal al excel con previo guardado He intentado algunas cosas pero se presentan errores al probar diferentes modos Espero me puedan colaborar y ademas lo puedan colocar en aportes, ya que es útil para todos Gracias anticipadas subo el archivo para que lo…

Hola necesito ******* un macro para realizar lo siguiente tengo un libro excel con los siguientes libros BASE: Donde tengo los datos de los equipos MANTTO: Los equipos con sus numeros de mantenimiento y fechas respectivas FORM: Aca necesito que al momento de seleccionar un equipo segun al numero de manttos (B2:B7) me inserte hojas segun al numero de mantenimiento con los siguientes datos Si mantto=3 Hoja1: equipo, marca, serie, mantto1,fecha1; Hoja2: equipo, marca, serie, mantto2,fecha2; Hoja3: equipo, marca, serie, mantto3,fecha3; agradezco mucha su ayuda insertar hojas.xls

Hola amigos, Lo que necesito es muy sencillo pero soy novato y no tengo ni idea. En la hoja inicio hay un botón que es un formulario, quiero que cuando se rellene, demos al botón Agregar y los datos se pongan en la Hoja Base de Datos. Tengo un campo que está apartado que es de Seleccionar, no sé como agregar para seleccionarlos, me gustaría que me lo pusierais en plan ejemplo y que aparezca en la columna AA. Muchas gracias y perdonad mi ignorancia en este mundo. Un Saludo Hoja Inscripción Esc.xls

hola estoy haciendo un formulario para modificar datos, con esta rutina me muestra los datos en el formulario, funciona muy bien Private Sub UserForm_Initialize() With ComCod .ColumnHeads = True .ColumnCount = 2 .ListWidth = 130 .ColumnWidths = "30;100" .RowSource = Range("A6:B" & Range("A" & Rows.Count).End(xlUp).Row).Address End With ComEstEmp.AddItem "Activo" ComEstEmp.AddItem "Inactivo" ComEstEmp.AddItem "Despedido" ComEstEmp.AddItem "Renuncio" End Sub Private Sub ComCod_change() Dim rango As Range Set rango = Range("A:A").Find(What:=ComCod, _ LookAt:=xlWhole, LookIn:=xlValues) TextNomb = Range("B" & rango.Row) Tex…

cordial saludo, quisiera que me ayudaran con el siguinte caso, tengo un archivo en donde extraigo los datos del programa de la empresa que trabajo, pero esta consulta sql me los agrupa y no me los muestra de forma individual. Private Sub UserForm_Activate() Dim Db As New ADODB.Connection Dim Rs As New ADODB.Recordset Dim SQL As String Dim i As Integer Call InicializarVariables Db.Open CONSTRING For i = 0 To 365 Me.cmb_Fini.AddItem Format(CDate(CAL_FECHA) - i, "YYYY/MM/DD") Me.cmb_FFin.AddItem Format(CDate(CAL_FECHA) - i, "YYYY/MM/DD") Next i Me.cmb_Fini.ListIndex = 180 Me.cmb_FFin.ListIndex = 0 SQL = …