buen día tengan, eh aqui yo con los problemas de horas y fechas, pues ahora con la problemática que tengo que resolver que un textbox solo permita un horario determinado, es decir en un textbox al inicializar el formulario o a traves de un boton necesito determinar que solo acepte en horario de 24 horas desde las 09:00 horas hasta las 23:59 horas; es decir, si es menor a las 09:00 horas y mayor a las 23:59 horas me marque algun mensaje de error o en otras palabras que si la hora que esta en el textbox esta entre el rango de las 00:00 a las 08:59 horas me marque como hora invalida....¿como lo logro?, alguien que me pueda ayudar porfavor. determinar horario de horas xD.x…

Buenas tardes, tengo un problema en m codigo: Private Sub Buscar() With Sheets("Primaria") Me.ListTabla.RowSource = "" If CbxMeses1 = "" And CbxDocentes1 = "" Then ListTabla.List = Sheets("Primaria").ListObjects("Primaria").DataBodyRange.Value Exit Sub End If For X = 2 To .Range("A" & Rows.Count).End(xlUp).Row ok = False If CbxMeses1.ListIndex = -1 Then If CbxMeses1 = "" Then ok = True End If Else Mes = Split(Range("E" & X).Text, "/")(0) If CStr(CbxMeses1.ListIndex + 3) = Mes Then ok = True End If End If …

Buenos días: Tengo el siguinte código: Sub NombreHoja() ActiveSheet.Name = Range("B1").Value End Sub Bueno pone el nombre a la hoja de calculo según el valor de la celda, mi pregunta es de que si hay otra hoja con el mismo nombre me de un aviso para cambiar de nombre o en su caso asignarle por defecto un carater numérico para diferenciarse de la otra hoja que tenga el mismo nombre. Saludos cordiales Jesús

Hola, Tengo una dificultad con un libro llamado Presupuesto de obras, el cual tiene barias hojas llamadas APU, donde se describen el Análisis de precios Unitarios de cada Item o Actividad, en este aparecen cantidades de materiales por unidad, la idea es que mediante una función o macro, calcule los valores de las celdas Cantidad/rend X cantidad del item y luego muestre el resultado total en la tabla Materiales, mas detalles en el Libro anexo en la actualidad, en la tabla materiales hace el proseso pero al verificar la operacion manual no da coincide con el resultado del macro, si por fabor me pueden ayudar a corregirlo. gracias Presupuesto de Obra 2.zip

Hola amigos, Tengo un reto. En el archivo adjunto tengo un archivo con varias pestañas. La pestaña LEAVE SOURCE tiene dos tablas, estas deberían esta en blanco al abrir el archivo, excepto los Headers o titulos de las tablas. Existe un botón que le solicita un password al empleado, solo asi el podra ver su información. Hice manualmente una simulación de como se vería el resultado si el Empleado 2 ingresara al sistema. El resultado esta en la hoja LEAVE TARGET. NOTA: no deseo que se abra otra hoja, sino que en la misma hoja LEAVE SOURCE se filtre y muestre la información solicitada por el empleado (segun su password) Alguna idea con el codigo? …

[sOLUCIONADO] Al abrir libro de excel, en un cuadro de texto, el usuario elija entre dos opciones Hola, Me gustaría hacer lo siguiente con un archivo de excel: Cuando se abra el archivo, antes de que abra las hojas aparezca un cuadro de texto con dos opciones ("proveedores" y "clientes") y dependiendo de la opción que elija el usuario se abran los formatos que corresponden. Pensaba poner un cuadro con botones como el que se usa cuando te pregunta excel al cerrar "¿Desea gaurdar lo cambios?" Alguien tiene alguna idea si se puede hacer esto y cómo??? Espero que me haya explicado bien Muchas gracias por sus ideas y su ayuda

Buenas, adjunto un fichero de ejemplo donde tengo en la columna A el id. Lo que hago es filtrar por Id = 1 y exporto a csv, luego por id = 2 y exporto a csv, etc. ¿Hay alguna forma de automatizar esta descarga con macro independientemente del nº de Ids distintos que haya? Gracias! Ej_Exportar.xlsm

Hola a todos, espero que me puedan ayudar con este tema, quiero realizar un reporte de la siguiente condicion si es menor de 40 entonces que pase a la hoja Programación, ejemplo: 1 .- si motor o electrico o hidraulico o calibracion o MANTO5000 o reparacion < 40 entonces deben pasar todos los equipos que cumplan esa condición a la hoja programacion, asi como el ejemplo puesto en esa hoja. todo esto en el Comando Consulta 2.- en comando Registar abrira un frm este carga en 1er combo solo los equipos programados, en este frm esta casi listo, lo que no puedo realizar, es que al guardar un registro este debe actualizar el horometro para el siguiente mantenimeinto, …

Saludos cordiales: Tengo un archivo con dos hojas, en la hoja uno hay dos listas desplegables dependientes en las celdas A1 y A2 (A2 depende de A1), los datos de las listas se encuentran en la hoja dos (columnas A y B ), la idea es crear una macro para que recorra cada unas opciones de las listas y que imprima en PDF la hoja uno, adicionalmente que guarde el archivo nombrándolo con los datos de las celdas A2 , A1 de la hoja uno, y que guarde en subcarpetas cada que cambie la celda A1 de la hoja uno todos los datos relacionados a este nombre (celda A2). Hoja uno A 1 Amazonas 2 Leticia Hoja d…

Buenos dias amigos me pueden ayudar a descubrir por que se vuelve loco el bucador universal y ademas tiene un problema que cuando busca la informacion y uno la va a modificar se devuelve para la primera fila muchas gracias CONTROL DE TRABAJOS DIARIOS.rar

Hola a todos en el foro, hace bastante tiempo me dieron esta macro aquí en el foro, la cual funciona bastante bien dentro de la plantilla que utilizo, pero, me gustaría hacer una pequeña modificación a la forma en la cual trabaja. La macro copia filas completas a nuevas hojas, basado en un criterio de búsqueda (Forma 1 o Forma 2) , el pequeño problema, es que si presiono el botón más de una vez, se copian los datos dos veces en la nueva hoja (quedan repetidos), lo cual es un problema para luego analizarlos. estoy usando excel 2007, en windows xp, adjunto un archivo comprimido con el fichero de muestra, la macro es la siguiente: Sub CopyForm1() Application.ScreenUpda…

Hola, Tengo que crear Frame con OptionButton dentro, como no se la cantidad de Frame que tengo que crear, lo configure con el bucle For "i", el problema es que, al querer crearlos no me deja, me tira un error. este es el codigo: [FONT=Courier New]For n = 1 To i : t = t + 1 : g = g + 1 With Me.Controls.Add("Forms.Frame.1") .Name = "Name" & t: .Name = t .Top = 82.5 + ((n - 1) * 60): .Height = 49.5 .Left = 12: .Width = 246 .Add ("Forms.OptionButton.1") .Name = "Value" & g: .Value = False .Top = 18: .Height = 17.25 .Left = 12: .Width = 57 End With[/FONT] next[/CODE…

Buenas tardes, Estoy haciendo un programa y pretendo importar los datos de distintas hojas de un archivo excel a otro pero sin que se me abra el archivo. Tengo este código que he sacado grabando una macro, pero cuando lo pego a mi codigo y ejecuto no consigo que importe los datos With Application.FileDialog(msoFileDialogFilePicker) .Title = "Seleccionar arxiu 'Estudi'" .AllowMultiSelect = False .InitialFileName = "\*Estudio_CD*" result = .Show If (result <> 0) Then RutaLBT = Trim(.SelectedItems.Item(1)) End If End With RutaArrel = Left(RutaLBT, Len(RutaLBT) - 14) M…

Tengo la siguiente macro, y cuando quiero copiar los datos, no sé las filas que habrá.. he estimado 55 filas, pero si son menos, me inserta datos vacíos.. he incluido que me diga el número de filas, para conocer el número exacto. Como puedo poner el rango sin conocer la última fila, y que inserte las filas que tengan datos. Sub BorrarDatos() 'primero borro los datos de la hoja Sheets("macro").Range("A2:B55").ClearContents Sheets("macro").Range("D4:F55").ClearContents Sheets("macro").Range("I4:L55").ClearContents 'copio datos de la hoja datos, es la hoja que he tenido que sale del programa milena, tengo que copiar Sheets("datos").Range("A2:B55"…

Hola Amigos... el tema es el siguiente: deseo crear una tabla en Excel, con los datos sacados de un archivo txt.. específicamente necesito.. * en el Excel colocar el nombre del archivo en una celda... * que se busque un texto especifico dentro del TXT... cuando lo encuentre devuelva a Excel en alguna celda lo que contiene el TXT en una posición específica (por ejemplo a 5 filas mas abajo y 2 columnas a la derecha mas abajo del texto encontrado... espero se pueda... Saludos Por ejemplo, Para el archivo adjunto, quiero que busque "3-Phase Short-Circuit" y me devuelva el valor de Ib (7,38). archivo.txt

Estimados Foristas: Espero puedan ayudarme con este problema, tengo un userform donde se carga segun un codigo que se introduce en el textbox1 los restantes textbox; y adicionalmente de acuerdo al codigo se recoge en el cuadro de image1 una grafica generada. El problema que tengo es que no puedo pasar el contenido de los textbox a una plantilla de word donde ya esta predefinido los campos donde deben entrar el contenido de los textbox. Alguien pudiera decirme que es mas sencillo copiar de las celdas a la plantilla, pero el problema es que antes de realizar eso debo verificar los textbox conjuntamente la imangen, una especie de revisión y aprobación para ge…

Buen día, estoy realizando un programa para controlar un pequeño inventario, y utilizo userforms para ingresar y registrar datos. Manejo un inventario de 100 materiales aproximadamente y los enumeré desde el 001 en adelante..... el detalle que se me presenta es al ingresar algún código para registrar un movimiento de material, utilizo un textbox, y al ingresar cualquier número, me antepone 2 ceros antes del número, todo esto dentro del textbox. Por ejemplo quiero ingresar el 047 y coloca 0047. Como puedo evitar que coloque 2 ceros delante del número que quiero agregar?

Buen día a todas las personas que forman parte de esta gran comunidad. Vengo a solicitar de su invaluable ayuda y conocimiento con la siguiente duda, estoy extrayendo tablas desde PDF a Excel usando macros para Power Query: With ActiveSheet.ListObjects.Add(SourceType:=0, Source:= _ "OLEDB;Provider=Microsoft.Mashup.OleDb.1;Data Source=$Workbook$;Location=""Page002 (2)"";Extended Properties=""""" _ , Destination:=Range("$A$1")).QueryTable Deseo saber si existe un método para saber cuantos objetos tiene el PDF a extraer, para así poder sustituir el valor de Location:""Page002 (2)"" Cualquier ayuda es bien recibida y con un agrad…

Necesito de vuestra ayuda para realizar una macro que permita ingresar la edad de una persona a través de un inputbox y escriba en la celda A1 de una hora si es mayor de edad o no. Considerar que en este caso sería Select case edad>=18 y los casos serian true y fase. Soy novato en programar con VB. No adjunte un archivo, ya que no se como empezar el codigo en VB Ojala me puedan ayudar saludos meggido

Hola amigos, paso a explicarles un tema que me surgió con mi software comercial. El sistema tiene un reconocimientos de códigos nuevos al actualizar una lista de precio. Al actualizar me pregunta el sistema si deseo generar un excel con los artículos nuevos. Al guardarlo, veo que me genera la misma planilla de importación que uso habitualmente pero la columna descripción no. Quiero saber como puedo tomar esa descripción desde el archivo original. Adjunto archivos de ejemplo EXPORTA_SISTEMA.xlsx libroOriginal.xlsx

Hola, bueno mi duda es que necesito hacer una macro que al "extender los datos de un bloque" se seleccione hasta el final de la fila de mi planilla (si se entiende mejor, es cuando Seleccionamos el BLOQUE y nos aparece la cruz (+) para cuando apretamos los datos se copian en toda la columna hasta el final de la fila). La macro parece sencilla, el Problema es que la planilla no es siempre la misma, por ejemplo: la macro de "extender" la grabé para que llegue hasta la FILA 1301, pero cuando uso otra planilla ("n" numero de distintas planillas) esta por ejemplo tiene hasta la fila 1500, entoces la MACRO solo ejecuta hasta la 1301 y el restante queda VACIO, parecido ocurre c…

Excel 2010 se pone lentisimo al ejecutar macro Buenos dias, amigos. He creado una macro en Excel 2003 para imprimir en PDF tomando como nombre del archivo el valor de una celda (es un correlativo), la cual funcionaba maravillosamente, sin embargo, acá en el trabajo hicieron unos cambios y le instalaron a mi PC el Office 2010 y ahora en el nuevo excel (2010) trato de correr esta macro y se tarda muchisimo, incluso el programa deja de responder y despues de 10 a 15 min es que funciona la macro, quisiera saber por qué es esto y que me den alguna sugerencia o recomendación para resolver este problema. Nota: La macro con problemas es la que se ejecuta al presionar el boton …

Nuevamente aca por lo siguiente, hace unos dias resolvi como pasar los datos de una hoja (Ingreso) a la hoja que coincide con el dato seleccionado en "D5" (codigo de equipo que es el mismo de la pestaña donde deben ir los datos) usando como referencia el turno "D6" (turno dia o noche) y la fecha "D7". Para ello les envio planilla donde macro3 tiene el proceso que les indico. El problema que me he encontrado es que al tratar de modificar un dato borra todo el registro anterior. Me dicen que la idea es hacer lo mismo de la Hoja "Ingreso" pero con un formulario que permita agregar, buscar y editar usando siempre como claves el codigo del equipo (pestaña de destino), turno si…

Muy buen día. Hola a los amigos les pido ayuda a resolver una macro, tengo un archivo, la columna C valores iguales sume de la columna E y F el resultado se coloque en la celda N5, P5. Que al ejecutar botón se calcule la suma total y los días de extraer y adjunto el archivo.. Les agradezco su gentileza. Infomacion M1.xlsm

hola que tal aqui con otra duda he creado un boton el cual ejecuta una macro pero ese boton no quiero que este en la hoja si no que se quede como un boton del menu que esta arriba, no se como hacerlo ojala pudieran ayudarme