Que tal a todos, Nuevamente necesitando del expertis de alguien para finalizar mi proyecto. Se trata que somos un grupo de 10 personas en una oficina que necesitamos realizar encuestas a los clientes. Lo que necesito es que cada quien, tenga el archivo que yo hice,y que los resultados de cada uno sean enviados a mi maquina a otro libro que lo consolidara todo. Investigando un poco y estudiando logre hacer un archivo pero el problema que tengo es que no me guarda los resultados en el libro que tengo en mi maquina. Se los comparto. La contraseña del VB es "123". Gracias por su ayuda. Aseguramiento de Calidad_Nuevo - copia.zip

hola amigos, a cabo de crear un control de facturas en excel con unas macros ,todo parece estar bien,solo al momento de estar creando mi factura (en la hoja facturacion, oprimir ctrl+m para facturar, empezar a registar unos productos, despues dejar en blanco toda la factura para poder dar clic en el boton agregar/cobrar ) al momento de cobrar en total de factura me aparece puros ceros (0) le doy cobrar(boton de abajo) y me sale un mensaje se ha producido el error "13" en tiempo de ejecución: No coinciden los tipos. por favor colaboremos con la solución a este problema. gracias CONTROL FACTURA new 1.rar

Buen día Les Saludo, les quería comentar lo que necesito necesito una hoja de excel que tenga una plantilla de una solicitud de documentos, este documento con su propio folio, que al momento de llenarse cree una base de datos con los requisitos que tiene el formulario, y que tenga un boton de impresion y que al darle click, guarde una copia con un numero de correlativo que sigue después de guardado el ultimo Perdón Por no haber subido el dato ahora bien agregando al tema, les comento que ya tengo el cuadro como me solicitaron, pero en si ya no doy para lo ultimo que me falta, me quede estancado en la hoja de "formulario" si lleno mas de dos materias de las celdas D…

Hola a todos, tenía un tiempo ausente pero ya ando por aquí tengo un libro que funciona como punto de venta, este fue proporcionado por un colega a través de su canal de YouTube todo en Excel, a pesar de que le he hecho las modificaciones para adecuarla a mis necesidades y comodidad en la parte del reporte no puedo hacerlo por rango de fecha solo puedo seleccionar una única fecha y necesito hacerlo por rango de fecha, otra cosa es que cuando ya esté generado el reporte en la parte del resumen me muestre el margen de ganancia. De ante mano les agradezco mucho por su colaboración. Por aquí les dejo el archivo para su revisión Punto de Venta.xlsm

Estimados tengo problema para copiar de un ingreso de datos que hago por un useform, el cual ingresa informacion a una hoja (hoja1), posterior a eso dentro del mismo CommandButton1_Click() necesito que me copie alguna información de las ya ingresada a unas celdas de otra hoja para hacer un pequeño informe para poder imprimir y adjuntar en pdf el cual funciona, pero no me copia los datos que necesito estimados les agradeceria mucho su ayuda.- Inventario.rar Inventario.rar

Saludos a toda la comunidad! Resolviendo una consulta que me hicieron hace un tiempo https://www.ayudaexcel.com/foro/threads/disponibilidad-de-dias.36442/ Tuve la necesidad de ejecutar un mismo procedimiento de manera repetida, desde varios controles (optionbutton, listbox, DTPicker), etc. Debido a esto, me ha surgido una duda: ¿ Es posible ejecutar un mismo procedimiento desde varios controles ? y si es así ¿ Cómo se puede conseguir ? Nota: Realicé el cometido en Excel 2010. Subo el archivo con lo realizado para que se entienda mejor. Bendiciones a todos! Dias Disponibles.zip

Tengo un Excel con una hoja e información en 12 columnas, y quiero con una macro que me filtre información y me lo meta en las distintas hojas que inicialmente tengo vacías. Toda la info está en la hoja1, y quiero desglosar la información en las 6 hojas vacías. PO Material Material Description Quantity Mat. Doc. Sales Ord. MvT Pstng Date S Plnt Reference SLoc 5200020999 1AB375380005 ALU XFP S-64-2B/10GBE BASE-E -40/+85 20 5009108038 101 01/04/2014 EG03 MG02 101 LIBRE -> filtra columna G todo lo que sea “101”, de lo “101”, todo lo que la columna J sea “EG04” y “EG09”, y del resto saca lo que la columna S esté vacía. Es decir, lo “101” con J “EG04” y “EG09 complet…

Buenos dias, Mi problema es que tengo un formato con diferentes macros pero me sucede que quiero que determinadas celdas que están combinadas Asi: B35:d47 luego E35:G47 luego H35:J47 si ingreso un texto que me exceda ese tamaño se ajuste automaticamente. [TABLE=width: 847] [TR] [TD=colspan: 3][/TD] [TD=colspan: 3] [/TD] [TD=colspan: 3] [/TD] [/TR] [TR] [/TR] [TR] [/TR] [TR] [/TR] [TR] [/TR] [TR] [/TR] [TR] [/TR] [TR] [/TR] [TR] [/TR] [TR] [/TR] [TR] [/TR] [TR] [/TR] [TR] [/TR] [/TABLE]

Hola muy buenos días, por favor me podrían apoyar de como CARGAR un listado a un COMBOBOX, la condicional es la siguiente: Si la columna B tiene X dato, que se cargue lo que tengo en la columna A, Gracias de antemano por tu apoyo!

hola a todos, un poco chock con este problema, a ver: tengo un contador en el evento onchange de un textbox que cuenta del 1-13 caracteres digitados, pero quiero que si el usuario retrocede por un error, el contador disminuya el o los retroceso y al volver el usuario a escribir comience a incrementar nuevamente. osea como si el evento onchange contara todo menos el pulso de la tecla retroceso. La verdad quisiera decirle que tengo un ejemplo mejor que esta explicación pero no, no he encontrado nada en ningún foro que me ayude y espero que aquí si, gracias…

Saludos, tengo un problema con una Macro, me gustaría saber que error tengo que cuando quiero activar el valor en la celda me genera error. En la hoja de Mayo tengo una macro, que al darle doble clips me coloca automáticamente un Valor, (9:00). Ahora estoy tratando de activar estos valores y me genera un error.

Buenas Saludo, soy nuevo en el foro y quisiera si es posible que me ayudaran con lo siguiente Tengo un archivo en el cual hay que llenar ciertas información mes a mes y estas informaciones estan en rangos de filas por mes. Mi pregunta es posible con una macro que las filas que no correspondan a una condicion dada en una celda (mes) sean ocultas y que solo permita digitar en aquellas que correspondan ese mes o que yo previamente determine para modificar datos. Gracias

Buenas a todos de nuevo. Necesito ayuda con esto. Subo un archivo donde necesitaría que al hacer doble click sobre las celdas donde hay un formato condicional que al poner 1 se marca un check, pues que si hay un 1 se ponga 0 y al volver a hacer doble click borre el 1. Así no tengo que estar escribiendo constantemente o borrando. No encuentro como hacerlo. ¿podéis ayudarme? Gracias de antemano. Nuevo Checklist.xlsm

Buenos días tengo un archivo que relleno una solicitud , me guarda los datos y luego me manda un pdf con la solicitud rellenar. No se por que de repente no me adjunta dicho archivo. Les adjunto el archivo, espero puedan ayudarme. Pruebas_Solicitudes id5500_2019 - copia.xlsm

Hola amigos de la comunidad AyudaExcel, Tengo el siguiente problema: "Quiero que al abrir varios libros de Excel haya un evento que recorra todas las hojas de cada libro y las aplique un formato estándar para todas igual." Para ello he desarrollado la siguiente macro, pero me da problemas: Private Sub Workbook_Open() Application.ScreenUpdating = False Dim libro As Workbook Dim hoja As Worksheet For Each libro In Workbooks Set libro = ActiveWorkbook.Name For Each hoja In Worksheets Set hoja = ActiveWorksheet.Name With Sheets(hoja).Select With Cells ' Tamaño de las celdas... .…

QUE TAL ESTOY TRATANDO DE ANALIZAR UNAS MACROS DE AUTOFILTRO QUE COLGARON EN ESTA PAGINA PERO NO LOGRO ADAPTARLAS AMI BASE DEDATOS QUISIERA SABER SI UEDEN AYUDARME LO Q QUIERO HACER UNA BUSQUEDA POR CLIENTE ( RUC ) Y MUESTRE CLIENTE, EL COD ARTICULO, ARTICULO MES EN QUE SE VENDIO TRATE DFE ADAPTAR A LOS AUTOFILTROS PERO NO ME SALE ESPERO AYUDA DE USTEDES EXPERTOS GRACIAS ADJUNTO EL ARCHIVO ESPERO SU AYUDA GRACIAS AUTOFILTROS.zip

estoy tratando de realizar un filtro pero me he estancado en ejecutar el codigo de macro 3 y macro 4 que se tienen que ejecutar en la celda dn3 alguien me puede colaborar en solucionar ese pequeño problema para proceder con el codigo de filtro que ya esta hecho pruebafiltro.xlsm

Estimada(o) Junto con saludar y deseando que todos esten bien junto a los suyos pasa a exponer mi consulta (sencilla quizas pero no logro dar con la solución) Tengo un libro (caso ejemplo en adjunto) con algunas hojas, quiero copiar desde la Hoja1, cada columna o rango completo de celdas; a la Hoja2, a partir de una celda que yo decida como en el ejemplo (me refiero a que no necesariamente la misma ubicación que tiene en Hoja1). Worksheets("Cubo").Columns(colu).Copy Destination:=Worksheets(Mid(cractual, 1, 18)).Columns(columnacr) este codigo me funciona pero me copia la columna completa, pero lo que esté en cractual en la misma columna (celdas a…

Buenos días. Soy un poco nuevo en este tema de los macros y programación y en el foro también, espero puedan ayudarme con este archivo. Lo que pretendo es que en la hoja "calendario" me muestre en las casillas correspondientes al día, el texto que agregue en la hoja "1" como un comentario, actualmente el código solo hace que muestre lo que se encuentra en la celda "C5" de la hoja 1 y en la celda activa de la hoja "calendario" como prueba, entonces para que me agregue el comentario tengo que seleccionar primeramente la celda a la cual corresponde el día y la idea es que tenga que evitar esto y pueda modificarlo desde la hoja "1" y así sucesivamente en los demás meses (se…

Hola tengo la siguiente macro, pero solo lo hace en la primera celda, pero la info la tengo en varias, como puedo hacer que lo haga en las demas??? gracias!! Sub crearCita() Dim objectOutlook As Object Dim objectCita As Object Set objectOutlook = CreateObject("Outlook.Application") Set objectCita = objectOutlook.CreateItem(olAppointmentItem) With objectCita .Subject = Cells(2, 2).Value .Body = Cells(2, 2).Value .Start = Cells(2, 3).Value .End = Cells(2, 4).Value .RequiredAttendees = Cells(2, 5).Value .ReminderMinutesBeforeStart = Cells(2, 6).Value .ReminderSet = True .Display (True) ' .Sen…

buenas compañeritos del foro veran tengo un incoveniente con un codigo, el textbox recibe un numero decimal el problema es que solo me reconoce el numero cuando uso la coma y no el punto, quisiera saber si puedo validar que reconozca el numero cuando uso coma o cuando uso punto If BSUP >= 0.1 And BSUP <= 0.9999 Then HUERTO = "X" Else: HUERTO = "" End If si escribo 0.5612 no trabaja el codigo pero si escribo 0,5612 ahi si trabaja. gracias de antemano a la persona de buen corazon que me pueda ayudar. saludos desde ecuador

Hola, espero me podáis ayudar. Adjunto un Excel con dos hojas, llamadas Ventas y Resumen. En Ventas debo introducir varios datos relativos a una venta: Código Producto, Cantidad y Precio Udad. El resto de datos (IVA, Total y Fecha) se rellenan automaticamente una vez introduzco los tres datos anteriormente indicados. A la hoja Resumen quiero traspasar algunos datos que tengan su origen en la hoja Ventas. Para ello he insertado un botón (Grabar) que llama a tres macros: una para traspasar los datos y pegarlos en la última fila vacía (macro CopiarPegar); otra para limpiar celdas de la hoja Ventas y que quede preparada para volver a meter datos de más ventas (macro Limpia…

Estimados, hace poco estaba trabajando con adecuar un calendario en mi hoja excel mediante macros y vi un tema muy interesante, lo pueden ver en la sigte dirección: Pendiente - Como adaptar calendario? | Ayuda Excel Pues si lo revisaron, en cualquier celda que se posen se mostrará un icono que cuando le haces click se abre un calendario y al clikear una fecha se imprime en la celda seleccionada, intente copiar la idea pero por ejemplo tengo dos campos "fecha de nacimiento" y "Nombres", pues solamente quiero que esta macro se muestre en la columna o campo fecha, intente modificando dentro de la macro/hoja1 lo siguiente: Private Sub Worksheet_SelectionChange(ByVal Target…

Hola, tengo un excel donde voy ingresando datos y automaticamente me ordena y me oculta las filas si el valor de la columna b=0, el problema que tengo es que no las desoculta cuando el valor es igual o mayor a 1. El código que tengo es el siguiente: Private Sub Worksheet_Change(ByVal Target As Range) Application.ScreenUpdating = False If Range("c7").Value = "4 FRUTAS ES" Then Rows("28").EntireRow.Hidden = False ' Si pone None desoculta Else Rows("28").EntireRow.Hidden = True Copia de Septiembre 2016 (2).xls

Hola a todos, gracias de nuevo por ayudarme. Tengo una macro que me crea una carpeta según el nombre de una celda en éste caso D1: Dim Nom_Carpeta As String Nom_Carpeta = Range("D1").Value MkDir "C:\HPRPACIENTES\" & Nom_Carpeta Lo que quiero es crear una macro que me permita mover esa carpeta a otro lugar. En resumen tendría que poder mover la carpeta (cuyo nombre es igual a D1) a otro lugar. Gracias y espero que puedan ayudarme