Buenas tardes, Mi duda surgió cuando me panteé cómo saber si un archivo excel está abierto antes de abrirlo a través de código VBA. Encontré varias maneras de saberlo pero ninguna de ellas diferencia si el archivo en cuestión está abierto por el mismo usuario que pretende abrirlo o si por el contrario está abierto por otro usuario de la red. Sin embargo se me ocurrió que tal vez si encontraba una manera de saber qué usuarios tenían abierto dicho archivo, me ayudaría a discernirlo. Y para ello encontré el siguiente código: Sub Numero_Usuarios() Dim users As Variant users = ThisWorkbook.UserStatus MsgBox UBound(users, 1) End Sub[/CODE] Y aunque …

Buenas tardes Nuevamente solicitando su ayuda. Tengo un archivo llamado reporte de equipos inoperativos, en el cual me muestra que equipos están detenidos en una Obra determinada y a que línea pertenecen. lo que quisiera es que de ese mismo reporte, cada vez que lo actualice me acumule los datos de cada equipo en las otras pestañas (Pesada, Transporte, Menores y Plantas) al darle click en un botón ( Ingresar Datos) en la pestaña ( actualización de datos). y que me lo organice en la pestaña que le corresponde y lo acumule por ubicación. cabe recalcar que como esos datos de actualizan diariamente, en las pestañas (Pesada, Transporte, Menores y Plantas), solo tiene que …

Hola buenos dias, TENGO LA SIGUIENTE MACRO: Sub ValuacionJJG1() ' ' ValuacionJJG1 Macro ' 'Replace "VALUACION (23)" with the name of the sheet to be copied. ActiveWorkbook.Sheets("VALUACION (23)").Copy _ after:=ActiveWorkbook.Sheets("VALUACION (23)") ' End Sub Duda, quisiera modificarla de tal manera que la proxima vez que la utilice en vez de copiar VALUACION 23 copie la valuacion 24 con datos ya modificados y asi sucesivamente. Espero que me ayuden, y les sea interesante el tema. Gracias de antemano.

Hola, buenos días Tengo una situación que requiero resolver y por más vueltas que le he dado, no llego a cómo solventarla, más o menos sería así: Tengo un listado de cédulas y empresas, con el nombre de al menos un representante, el puesto y uno, dos o ningún número telefónico de cada uno. Ahora, ocupo realizar un ordenamiento similar pero dónde el campo cédula se convierta en clave única (es decir, no se repita) y se copien los valores del segundo, tercero, cuarto etc. registro en un horizontal (así hasta 7 posibles casos, que sería lo más que tengo disponible). ¿Existirá alguna macro que pueda realizar esto? ¿alguna idea? Les quedaré eternamente agradecido cualqui…

Buenas tardes Les pido de favor me ayuden con este asunto. Tengo un formulario de busqueda de datos de proveedores que devuelve los datos del proveedor de acuerdo al dato seleccionado. El problema es que cuando se ingresa un dato que no consta en la base de datos sale error en ejecución. Hay alguna manera de escribir el dato sin que salga este error? o que al salir el error se ejecute una macro que ingrese el nuevo proveedor?. Les agradezco por su atención. Adjunto ejemplo. BUSQ.zip

Buenas tardes apreciad@s colaboradores/ras, Tengo varios archivos, uno de cada curso, donde lleno y guardo la ficha con datos personales de los participantes. Ahora se queriendo integrar todos esos datos en una base de datos para lo cual quisiera extraer algunos datos que están en la misma ubicación en las diferentes hojas del libro. Es decir por cada curso hay un Libro de Excel donde cada hoja del libro tiene el apellido del participante. En cada curso puede haber 2 o más participantes. En el Excel que adjunto esta marcados los campos de los cuales extraer los datos y donde deberían ubicarse en la tabla resumen. Agradezco muchísimo su colaboración y tiempo y estaré at…

Estimados que tal: Necesito su apoyo para poder "acomodar" un excel. Hace unos dias publiqué un tema de como hacer que un listbox Control Activex se llene segun la fecha de hoy, y debo dar las gracias al usuario Macro Antonio por haberme ayudado. Sin embargo, necesito que alguien me apoye modificando el excel que el me brindó. Su excel en la Hoja1 esta la tabla y el listbox, lo que quiero es que solo el listbox esté en la Hoja2, y la tabla en la Hoja1. Adjunto su excel. Gracias! Llenar Listbox.xls

OK, la duda es la siguiente, tengo libro que contiene 5 columnas de datos, la primera columna "A" es el ID y la ultima "E" es el Estado del documento, que por defecto esta en Disponible, como puedo hacer para que al momento de ingresar el ID en un textbox y hacer la búsqueda me diga si el documento esta o no esta disponible; en caso de estar disponible solicitar con un botón un préstamo y que la disponibilidad cambie a No disponible... Pd. No subo archivo porque realmente no tengo nada respecto al tema que estoy tratandoles.

Hola amigos del foro Aqui con una consulta. Como puedo hacer para restringir para que no me haga suma en una misma celda. Es decir si hago +1+1+1+1+1 o =1+1+1+1 que me diga que este tipo de calculo no esta permitido. Espero no confundirlos y se los agradesco muchos. Estve intentando con este código pero no me funcionó Private Sub Worksheet_SelectionChange(ByVal Target As Range) Const rango = "A1:A10" Dim celda As Range For Each celda In Range(rango) If IsNumeric(celda) = False Then If celda.Value = "" Then GoTo continuar Else: MsgBox "No es número. Inténtelo de nuevo" celda.Select End If End If continuar: Next celda End Sub[/CODE]

que tal buen dia, bueno queria saber si me pueden ayudar con la siguiente macro, lo que quiero que haga es que a determinada fecha se cree un archivo con un nombre especifico a una ruta especifica y cuando se quiera acceder a ese archivo cheque primero si no existe el archivo creado y si existe se elimine el archivo que se esta utilizando y si llegaran a tener otro archivo como el borrado y cambien la fecha se elimine igual porque seguira el archivo guardado...AQUI LES DEJO LA MACRO QUE ESTOY MODIFICANDO TIENE UN ERROR ES QUE SI YA SE GUARDO UN ARCHIVO Y LE CAMBIO LA FECHA NO APARECE EL MENSAJE Y SE SUPONE QUE SE DEBE DE APARECER EL MENSAJE Private Sub Workbook_Open() …

Buenas tardes a todos, necesito una ayuda de ustedes, tengo un archivo el cual esta compuesto por varios sub-modulos, los cuales tienen 20 filas cada uno, necesito lo siguiente: 1. Una macro que me copie en otro archivo los datos de las Columnas C,D,G,H,I, y K de los rangos (53:77) y (82:106) 2. La condición es que no copie las filas en blanco, que solamente hasta donde se digitó información. Agradecería mucho la ayuda de ustedes. Planilla Diaria-Prueba.rar

Saludos amigos del foro, como se podría encontrar el numero de diferencias que hay en los datos entre una columna y otra? En la columna Test constaran los aciertos o los fallos con respecto a la col Ref, en este caso me gustaría encontrar el numero de fallos o diferencias y se pueda ver en la celda F6 Teniendo este dato ya podría calcular el porcentaje de acierto o fallo y mostrarlo en otras celdas Subo el archivo para que lo vean Gracias de antemano Numero de Diferencias.xlsm

Buen día!! Recurro a Uds. para solucionar estos inconvenientes!! 1.- Coloqué un código en el evento "Workbook_Open para que al abrir el archivo me presente visualmente en las hojas las líneas punteadas que indican los límites de impresión (no la vista preliminar de impresión) pero me lo aplica sólo a la hoja activa. Cómo corregirlo?? 2.- Al activar la macro mediante el botón de comando "HojaNueva2016" me copia la hoja pero me bota un error y al correrla paso a paso me bota otro error. 3.- En ocasiones me presenta la vista preliminar en el código de la Hoja 1 y tengo que pulsar la tecla "ESC" para que el código continúe. Al incluir la instrucción "SendKeys {ESC}" me indic…

Hola estimados foreros, recurro nuevamente a uds porque sé que pueden hacer "magia" con la programación de códigos y que me pueden ayudar con lo que necesito... procedo a explicar...cuando abran el libro que adjunto éste se abrirá en una hoja llamada "Base" que es donde están todos los datos que fueron exportados desde otro software y pegados en esta hoja ("Base") y que a partir de estos datos se crearán algunos cálculos con estadísticas básicas al presionar el botón "Procesar Datos"... al finalizar todo este proceso de cálculos... quedará visible una hoja llamada "Estadística_Básica" que es la que uso como "reporte" ahí verán un gráfico que debería quedar igual al gráfi…

Buenos días compañeros. Hay alguna forma de conectar excel con Solid works y extraer solo las cotas que se le hacen al dibujo? Agradecería mucho sus respuestas.

Tengo una consulta que no se si se puede solucionar con vba de excel. En este formulario de usuario y contraseña quisiera saber como se tendría que hacer para recordar el usuario y contraseña con la que se entra en una aplicación. Espero podais ayudarme. Gracias de antemano Login.xlsm

Buenas tardes. Necesito ayuda. Necesito que en el momento que activo una celda se ejecute una macro Lo unico que he encontrado es una forma de ejecutarlo cuando das doble Click. pero estoy buscando la forma de activar cuando activas la macro cuando habilitas para escribir o le das doble click. Adjunto el ejemplo con doble click Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean) If Not Application.Intersect(Target, Range("D4:D100")) Is Nothing Then Cancel = True Call ENTRADA1 End If Gracias de ante mano y un saludo.

Hola de nuevo. Ya he terminado mi proyecto, con vuestra ayuda. Pero ahora veo que uno de los procesos es muy lento. Cuando le doy a un botón ejecuta esta macro con 7 bucles, uno por semana, que recorre cada vez que lo hace 7.000 filas. Y que cada mes añadirá otras más de 2.000 filas más. Así que cada vez que ejecute la macro se me va a emplear mucho tiempo. Yo creo que con un solo bucle lo puede hacer, porque pienso que debe haber una lógica matemática que lo haga, pero yo no soy capaz de saber cómo. U otra manera que no sea con bucles... Pego el código por si alguien de vosotros podría ayudarme. Ya veis que repito el código cada día de la semana y que los textbox so…

Estimados amigos. Me surge una duda, existe una forma de saber si se ha deseleccionado un Item de un ListBox ¿? Es decir, si tengo el primer item de un ListBox seleccionado, y lo destildo, hay manera de registrar esta acción para poder ejecutar una macro ¿? Agradecido de antemano por vuestra ayuda.

Buenos dias quisiera que me ayuden en un pequeño proyecto quiero que en un textbox al digitar 25 automaticamente se pongra el "ºC" quedando "25ºC" y digitando otro valor como 46 automáticamente se ponga el "%HR" quedando "46%HR" claro separado por un "/" tambien que se ponga automaticamente, no se si me hice entender finalmente quedaría digitando 25 y 45 asi en el un textbox "25ºC / 46%HR". Muchas gracias por su ayuda

Hello everyone from Maurizio My problem is this . I'm trying but failing to want to create some sort of Calendar Slo that my problem with the vba is this: in a userform I inserted a Textbox and Seven Labels, of which 6 are classified as (Cella1,Cella2,Cella3) etc...! And I want them to stay that way. While a label the name has remained unchanged and is called (Label3) Now what I would like to get from vba code, and that every time I start the userform the Labels classified as (Cella1 etc ...! the number "26" is reported which corresponds to the number of the month of December which was (Monday ) and gradually all the other ends to reach (1) of the foll…

Buenas tardes, entro a la zona de macros porque imagino que será la solución a mi problema. Tengo un archivo con listas "encadenadas", dependiendo del lo que elija en la columna 1 me salen las opciones para la columna 2 y, de igual modo, dependiendo de esta última las opciones de la columna 3. Me gustaría que al borrar, o cambiar, el contenido de la columna 1: se borraran los datos de las columnas 2 y 3. Igualmente, que al borrar o cambiar el contenido del desplegable de la columna 2, se borrara el contenido de la columna 3. Ayer conseguí hacerlo (y no lo he guardado 🙈) para una fila, pero si quiero que sirva para todas ellas... no doy con la solución.…

Buenas tardes a todos y a cada uno de ustedes deseándoles un feliz inicio de año 2024 , acudo a ustedes por que necesito de su ayuda para automatizar el proceso de copiado y pegado de datos es decir Tengo un archivo de nombre "plantilla" que quiero llenar con los datos del archivo "Nomina Fiscal Quin 01" Me gustaría meter en un array/matriz los encabezados del archivo Planilla hoja ( lista raya) fila 8 y realizar una búsqueda en el archivo "Nomina Fiscal Quin 01", la búsqueda se realizara en la fila 8 , solo que no contiene las mismas columnas que el archivo Planilla por lo que pretendo realizar la búsqueda por medio de la macro, y una vez hallado una fila hacia ab…

Saludos amigos espero estén bien Estoy intentando hacer un formulario que me convierta unidades de masa sin embargo en el mejor de los casos solo he podido lograr la conversión de una unidad a la vez en los TextBox 1, 3, 5, 7, 9, 11 y 13 y cuando lo logro el resultado que se copia en la celda no se corresponde con el obtenido originalmente en el Textbox del Formulario (frmconv) ejemplo al convertir 1900 Kg a Lb el resultado en el TextBox1 =4188,78298142 sin embargo al guardar el resultado lo que se copia en la Celda "F11" es 418.878.298.142,00, adicionalmente el resultado de la conversión no se visualiza inmediatamente por lo que debo de hacer click en los TextB…

Buenos días @LeandroA espero estes bien Tengo un caso idéntico al planteado en la siguiente pregunta: Sin embargo, a diferencia de quien planteo originalmente la pregunta al correr el código no obtengo ningún resultado podrían ayudarme a resolver este inconveniente y que al hacer click en el Botón Guardar (CommandButton3) del Formulario RCS (frmrcs) el archivo pdf quede configurado con orientación vertical, márgenes superior, inferior, derecho e izquierdo = 1 y en página tamaño carta. Si acaso influye uso Microsoft Excel LTSC MSO (versión 2209 Compilación16.0.1.15629.20200) de 64 bits Mucho le sabre agradecer la ayuda que me pueda dar RCS PRUEBA …