buenas compañeritos del foro tengo una duda sobre tabulacion que me gustaria ustedes me ayudaran a despejar. estoy haciendo un formulario que genera una base de datos, pero los datos en la base no me sirven para imprimir, lo que deseo hacer es que los registros ingresados en dicha fila se copien por decir a otra fila donde esta ultima fila este enlazada a 4 hojas que es donde tienen que dispersarse los datos del registro. 1.-generar la base de datos a partir del formulario ya lo tengo hecho. 2.-que la el registro que estoy ingresando/modificando se copie a otra fila no lo tengo hecho 3.- el informe de 4 hojas lo tengo enlazado solo esperando la informacion de la fila …

Hola a todos. Mi problema es el siguiente: Tengo en access una tabla en donde se registran incidentes de un auto especifico, hasta ahi todo bien, posteriormente puede que haya otro auto con el mismo incidente pero para esto no tengo que agregar otro registro sino solo asociar el id del auto con el incidente que antes ya habia sido registrado. Alguna idea que me puedan dar? Les agradezco su atencion.

Saludos estimados masters, deseo ayuda para cuando esten abiertos varios archivos y todos contienen una hoja llamada SEG luego de abrirlos mediante alguna instruccion o macro se seleccione la Hoja SEG Gracias

hola amigos de excel tengo una inquietud, he diseñado un menú estándar en la una hoja que la denomine menú, esta desde el rango A1:M40, confomarda por 15 botones, dos imagenes y texto, me gustaria saber como hago para que la hoja de menu se adapte a cualquier pantalla de pc ya que se sabe que todas las pantallas no son iguales saludos, espero me puedan colaborar

Buenas Noches. Quisiera que me ayuden con una interrogante, la cual consiste en esta formula: Private Sub Worksheet_SelectionChange(ByVal Target As Range) With Target If .HasFormula Then .ShowPrecedents Else ActiveSheet.ClearArrows End If End With End Sub Lo que quisiera si es posible colocar en una hoja de excel, es decir cada vez que ejecute el MICROSOFT EXCEL esta formula siempre aparezca en dicha hoja, o si habrá alguna macro que permita realizarlo. Desde ya nuevamente agradezco su gentil colaboración.

Buen dia Tengo un archivo de excel que se genera con un atabla dinamica lo que pretendo con el siguiente codigo es enviar el libro activo pero como valores, solo que no lo consigo por que me marca un Error: Error en el metodo"SaveAS" de objeto_"Workbook" Sub WorksheetLoop2() Dim Current As Worksheet For Each Current In Worksheets Dim attBook$ attBook = Environ("temp") & "\" & Current.[A4].Value & ".xlsx" Current.Copy Cells.Select Selection.Copy Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _ :=False, Transpose:=False…

Buenas compañeros, Estoy elaborando una macro para contar el numero de celdas que cumplen varios criterios en una misma columna, pero solo se me ocurre sumar varios Countifs(). Seguro habrá alguna forma mas eficiente de hacerlo. Por ejemplo para la siguiente tabla: Me gustaria contar las filas que cumplen los siguientes criterios: Columna A: Numero="100" Columna B: Semana="8" Columna : Perdida= "AB" y "AC" Como dije antes estoy haciendolo usando sumas de countifs: Perdidas = Application.WorksheetFunction.CountIfs(Range("A2:A" & ufila), "100", Range("B2:B" & ufila), "8", Range("C2:C" & ufila), "AB") + Application…

Hola a todos!! Les comento mi problema y espero que me puedan ayudar. Tengo la tabla2 la cual representa los pedidos que realizo, esta tiene un codigo y su respectivo SKU (Tipo de Producto). Y la Tabla1 que representa las ventas, con sus cantidades y SKU. Lo que necesito hacer es que a medida que vayan cayendo las ventas se asigne automaticamente el codigo del pedido a la venta, y una vez que se venda todo el pedido, se le asigne el siguiente pedido con su respectivo codigo y asi sucecivamente. Les dejo el excel. Libro de prueba (1).xlsx

hola estimados foreros, ojalá puedan ayudarme por favor, necesito una macro para obtener la serie_inicio y la serie_final de registros que están duplicados (Columna A), les adjunto archivo de ejemplo con los datos y que lleva en columna D, E el cómo debería quedar la solución final. Desde ya, les agradezco cualquier ayuda foreros. ayudaexcel_series.xlsx

Por favor el código abajo descrito , necesite que funcione con tablas Sub REP_FUNC() 'BUSQUEDA POR CEDULA Set h1 = Sheets("DATA") Set h2 = Sheets("REP-FUNC") u2 = h2.Range("F" & Rows.Count).End(xlUp).Row If u2 < 2 Then u2 = 2 'linea de inicio h2.Range("F" & u2 & ":N" & u2).ClearContents 'h2.Range("F" & u2 & ":K" & u2).ClearContents j = 2 celda = "A1" 'CELDA DE LA CONSULTA Set r = h1.Columns("E") 'COLUMNA DE CONSULTA DATA Set b = r.Find(h2.Range(celda), lookat:=xlWhole) If Not b Is Nothing Then ncell = b.Address Do h1.Range(h1.Cel…

Hola amigos, nuevamente por aquí, quisera saber si es posible almacenar en una variable datos para luego hacer un registro en otra hoja, les explico. tengo mi archivo Inf_Tec_registro varios, en el tengo tres hojas (data tgm, informe, Registro), con los conocimiento aquieridos en este foro, he logrado hacer un informe el cual me registra los datos llenados, a la vez me crea una copia del informe al hacer registar, el detalle de todo esto es que en la hoja informe, ingreso serie por serie para registar cada evento y aveces los eventos son repetidos para varias series, quisiera sabes si puedo ir almacenando los datos de serie, Nº posicion, fabricante, juego, propietario, p…

Buenas noches, gusto de comunicarme con ustedes. Molesto vuestra atención para merecer vuestra ayuda al requerir hacer un seguimiento de ventas diarias. En el archivo adjunto en la hoja "Observaciones" se encuentra detallado lo que se requiere Se trata de calcular el acumulado según los criterios indicados y hacer los reportes independientes en hojas apartes algo así como: que es un post de éste foro de más o menos marzo del 2011 PD.: si no es la forma de indicar el post, les gradeceré disculparme, no encontraba otra manera de hacerlo Gracias, y saludos Cuadro control de vntas.zip

Hola amigos que tal, aquí con una pequeña y rápida duda. Tengo un formulario con el cual busco insertar dos fechas (inicio y fin). Sin embargo hay dos problemas con los que me he encontrado y no sé cómo solucionarlos. Problema 1) Cuando pongo la fecha (ya sea inicio o final) en el formulario al momento de capturarse en la hoja1 el formato es "mm/dd/aa" y me gustaría que fuera "dd/mm/aa" pero no logro hacerlo. Problema 2) Me gustaría crear una condición para que en caso de que el usuario no escriba un formato de fecha válio, se arroje un mensaje de error que diga "Por favor escribir un formato de fecha válio", cosa que tampoco he logrado hacer a causa del problema #1 …

Espero ser lo mas claro posible: Trato de hacer que excel busque el valor de c de manera automática. Pero no se que función utilizar. He buscado ayuda en mi escuela pero me dicen que solo se puede realizar con el programador de excel visual basic. El valor de c puede ir de 0 hasta d pero como programo la celda para no tener que buscar el valor manualmente. El valor de c es el correcto cuando C=T Agradeceria mucho su ayuda con este trabajo. EC1.rar

Buenas tardes, tengo una aplicación que he intentado descargar de cosas para poderla subir en otra pregunta (no pude por ser demasiado grande) se me ha ocurrido intentar pasarla por el zip, pero ahora al abrir el archivo me da el error 13 no coinciden los tipos al clicar en "depurar" me marca en amarillo "Usf_Gastos.Show" vaya que no lo puede abrir, y lo que no se es como puedo hacer una búsqueda de donde esta el error, seguro que he borrado algo que era necesario y ahora no lo encuentra pero no se como verlo. El zip pesa 480 Kb asi que no lo puedo subir, lo siento Gracias de antemano por vuestro tiempo

Buenos días estimados amigos necesito de su apoyo incondicional para este caso. resulta que tengo una hoja con 900 columnas aprox. De esa hoja quiero eliminar todas las columnas (a partir de la columna 3) que en la fila 2 no contenga el texto "Chiclayo" lo intento hacer de esta manera: pero no resulta Dim COL As Integer COL = 2 Do While Cells(3, COL) <> "" If Cells(2, COL).Value <> "*" & Chiclayo & "*" Then Cells(3, COL).EntireRow.Delete COL = COL - 1 End If COL = COL + 1 Loop Espero me puedan ayudar Muchas gracias de Antemano *…

Buenos días, Creo que este es un tema estrella pero no he encontrado ningún tema cerrado que tenga que ver con mi problema. Tengo un archivo excel, al que tienen acceso distintos usuarios. Cada uno entra con un usuario y contraseña. Dentro de cada usuario hay personalizada una vista, con columnas ocultas, bordes marcados, filtros, etc. todo esto está hecho con macro además de tener formatos condicionales y algunas fórmulas. La idea es que se pueda editar por varios usuarios simultáneamente. He probado a compartir archivo en red y todo eso pero me da problemas y no mantiene la personalización... No se si habría alguna solución a este problema o alguna alternati…

Consulta... Se puede crear un combobox o lista en una celda, donde al seleccionar uno de los datos, automaticamente muestre una segunda lista ? Ejemplo: Una lista de competencias, dentro tiene Clasificacion, Organizacion, etc... Al seleccionar Clasificacion, muestra los subcontenidos: Control, Punteo, Orden, etc. Seleccionar Orden y sea la opcion definitiva.

Hola a todos, soy nuevo en esto de las macros y no se como atender esta situación. Tengo una macro que básicamente copia la información que digita un usuario en una de sus hojas, abre un archivo que se encuentra en la red de la empresa, pega la información en este archivo, guarda los cambios y cierra el archivo. La macro funciona perfecto, el problema que tengo, es que desde hace un tiempo aumento el numero de usuarios que utiliza la macro (son de distintas áreas), por lo que en ocasiones, varios usuarios ejecutan la macro al mismo tiempo y tratan de abrir, escribir y grabar en el archivo que esta creado en la red, y la macro se cae. Se que esto se debe a que el archiv…

Hola ben día: Me podria ayuar a localiza el error en la siguinte sintaxis ya que por mas que la intent buscar no la encuentro, lo que esta en negrito es dondeme aparece el error Private Sub Worksheet_Change(ByVal Target As Range) If Target.Column < 6 Then Cells(Target.Row, 6).Value = Now End If End Sub ----------------------------------------------------------------------------- Private Sub Workbook_Open() Worksheets("09-00 AM").Protect "aBc", 1, 1, 1, 1 End Sub ------------------------------------------------------------------------------ Private Sub Worksheet_SelectionChange(ByVal Target As Range) If Target.Count > 1 Then ActiveCell.Select Wit…

Hola buenas noches a tod@s Estoy realizando un excel con macros para la entrada de paquetes de mi empresa. El funcionamiento es el siguiente: En la hoja "Entradas_Palau" , fila 7, introduzco los datos de entrada del paquete nuevo, en la celda "J7" una vez he introducido todos los datos, se ejecuta la macro y me copia los datos en la fila 10 automáticamente. Lo que quiero conseguir es que si por ejemplo escribo (Hangar) en la celda "H7", al finalizar al entrada del producto, aparte de copiarme la entrada en la fila 10, me la copie en la hoja "Arrastre_Hangar" y me inserte una fila nueva para que no se solapen nuevas entradas con la palabra "Hangar". …

Buenos dias, No soy capaz que funcione la macro, os explicco: Mi objetvo es: Macro 1: Conseguir que inserte una fila nueva cada cambio de celda de la columna a sea diferente. Despues de muchos dias y copiando ejemplos de la web conseguido Macro 2: Paso 1: que realice sumatorio de la columna J hasta espacio blanco y mantenga formula en la celda,( le llamare en este post obj1 y al range para su obtencion Range1). Despues de muchos dias y copiando ejemplos de la web conseguido Paso 2:que realice sumaproducto de la columna J * la columna K hasta espacio blanco y mantenga …

Hola, a todos buenas tardes ... Tengo un libro con una pequeña base de datos a la cual le hago consultas y me arroja los valores como veis en la imagen En otra hoja del libro tengo una tabla con el número de entregas que comienzan con el código seguido de 90 celdas en una misma fila Lo que quiero es usar una macro para al seleccionar la celda por ejemplo C9 se haga una busqueda en la tabla y me devuelva la fila de 90 celdas en filas de 9 por lo que pasaria a tener 10 filas de 9 y quiero que vaya dentro del marco negro que se ve en la foto y he estado buscando por todas partes y es que ni me acerco a lo que busco paso foto de la ot…

Buenas tardes a tod@s, He rebuscado y rebuscado, y probado una y más cosas, pero no soy capaz de solucionar este problema. Creado formulario con unas dimensiones de 960x702 en un monitor de 1280x1024 me encuentro con el problema que cuando lo ejecuto en otra máquina (p.e.: portatil con pantalla de 1024x768) el formulario no se muestra completo. He encontrado algunos códigos que deberían tomar la resolución del monitor dónde se ejecuta y redimensionar el formulario (cosa que algunos si hacen) y los controles de este (cosa que no he conseguido casi con ninguno de ellos, aunque con resultados extraños). He tratado de implementar una solución del usuario A…

Buenas, Tengo una macro que es bastante larga en función del número de registros que se traten cada vez y con Application.StatusBar, por ejemplo: Application.StatusBar = "Realizando cálculos..." etc. Voy comentando el progreso de la macro hasta el final. El caso es que si tienes de tema de office el blanco, el texto sale en negro y el fondo verde, así que no se puede percibir bien el mensaje. Para poder verlo en condiciones, hay que cambiar el tema de office a negro, gris o multicolor. Estuve buscando para añadir alguna barra de progreso, pero no supe cómo hacerlo sin desactivar Application.ScreenUpdating ¿Se os ocurre alguna alternativa? G…