Buenos días, solicito su apoyo para pasar los datos de la columna A y B a txt, con el ancho fijo a una sola columna, con 2 decimales y a partir de la fila 3 Y la columna C enseguida de los datos en txt, igual con ancho fijo. En total de columnas a txt serian 2 Seria asi: COLUMNA A COLUMNA B COLUMNA C ANCHO FIJO 20 ANCHO FIJO 2 COMO DEBE DE QUEDAR EN TXT Costo Costo con 2 decimales …

Muy buenas a todos! En primer lugar daros la enhorabuena por este gran foro que me está sirviendo de gran ayuda y me está ayudando a desarrollar mis conocimientos de Excel. Os escribo porque quiero generar un macro que realice una hoja resumen con datos de otras hojas. A ver si me explico... Tengo un fichero de Excel en el que diariamente voy controlando la ejecución en horas de varios procedimientos. Para cada semana del mes, tengo una hoja en Excel en la que detallo de LUNES a DOMINGO lo que dura cada procedimiento (en horas) cada día. Al final (columna I) totalizo lo que cada procedimiento se ha ejecutado a lo largo de la semana. Tal y como he dicho, tengo una hoja …

buen dia estoy iniciando una empresa de enmarcados, he trabajado intensamente en la elaboracion de la factura y casi la tengo terminada, pero no tengo manera de guardar cada factura de cada cliente que he atendido sino que lo que he hecho es que en el mismo libro he ido guardando varias hojas cambiando el nombre segun lo requiero, otro problemita es que no se como hacer el boton de conteo de dichas facturas para que cada vez que la abra me aparezca el numero que seguiria, muchas gracias

Hola a todos y todas; Estoy intentando ajustar un procedimiento para que desde mi macro "MiPrueba" y desde el botón "btnAbrirFormAddin" de mi formulario "Form1" abrir el formulario "Formulario1" que esta en mi complemento "NombreDelComplemento". Private Sub btnAbrirFormAddin_Click() ' Verificar si está instalado el complemento If AddIns("NombreDelComplemento").Installed = True Then ' Llama al formulario del complemento Application.Run "NombreDelComplemento.xlam!Formulario1.Show" '<--No carga, me da error 1004 Else MsgBox "El complemento no está instalado." End If End Sub La verificación la he probado y funciona pero …

Buen dia, he estado realizando un pequeño reporte en el cual recopilando algunas macros de la web, n este caso lo que quiero es que se realice un reporte de que usuarios hanutilizado el archivo excel en un comienzo me salia "error ambiguo por usar un comando dos veces pero despues al unir las acciones en un solo comando me volvio a salir otro error que es el tema que pongo a su concideracion para que me puedan ayudar que es el de error en tiempo de ejecucion en la formula siguiente que me resalta en amarillo: Sub Iniciar() Set AppObject.AppEvents = Application End Sub [/HTML] en dicha instruccion se detiene las macro y no se ejecuta; el comando que uni para que no me…

Hola Estimados Foristas Nuevamente solicitando su apoyo. He podido adecuar un proyecto que he encontrado en el foro pero, necesito mejorarlo a mi necesidad: 1.- Que el formulario se exporte a PDF 2.- Que el formulario al momento de imprimirlo se ajuste la pagina a A4 o me de una opción para configurar la pagina ya sea horizontal o vertical 3.- En el combobox "empleado" me sale error cuando borro el primer caracter o cuando no encuentra un código buscado, necesito solucionar este inconveniente y a la vez cuando no encuentre el codigo me salga el mensaje (msg box), "codigo no existe" Espero contar con su apoyo como siempre. A la espera de sus atenciones Slds. FELI…

Hola tengo el siguiente archivo con el siguiente problema. En el archivo tengo un userform utilizado por varios usuarios para ingresar datos de atención de clientes, entre los cuales esta varias fechas. Como el archivo se trabaja en red, por motivos de reglamentación de la empresa no se me permite instalar complementos, la única forma de que ingresaran la fecha con menos margen de que se equiboque fue generando combobox, uno para el dia, otro para el mes y el año, cuando lo descargo al excel hago que en una celda concatene estos tres valores y me forme la fecha. 1) ¿Hay alguna otra forma de mas practica de ingresar una fecha? 2) ¿Usando el recurso que utilizo, puedo co…

Hola a todos, traigo una duda que me surgio tratando de jugar un poco con el excel y el autofiltrado. Tengo una tabla con años y marcas de autos, lo que quisiera es que el combobox que esta en el formulario se cargue con los valores de la columna MARCA siempre que se haga click en el, no cuando se abre el formulario. Y principalmente mi duda es, que quisiera que cuando selecciono algun valor del combobox se filtren los valores de la tabla y solo aparescan los registros de la marca seleccionada y que cuando borro lo que esta en el combobox que desaparesca el autofiltrado. Desde ya muchas gracias a todos por la ayuda que siempre me brindan. Saludos! autofiltrado.rar

Buenas noches amigos, Por favor, alguien podría ayudarme con esta duda. Este código que envía mensajes de información que esta en excel, a través de WhastApp, me funciona correctamente en windows, pero necesito adaptarlo para que funciones en un Excel de un ordenador MAC. Creo entender que el problema lo tengo en la ejecución de la función SHELL que inicializa la aplicación, pero no se que adaptación debo hacer para que sea operativo en MAC. De antemano agradezco su valiosa ayuda. Declare PtrSafe Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal hwnd As Long, ByVal lpOperation As String, ByVal lpFile As String, ByVal lpParameters As St…

Buenas a tod@s, llevo varios días rompiéndome la cabeza intentando que me funcione esta macro. El tema es el siguiente, tengo dos hojas: - Datos - Resultados En la hoja “Resultados” necesito que me busque el dato de Cantidad para cada pieza, y para ello los requisitos son la hora y fecha. Lo que tiene que hacer la macro sería: - De la hoja “Resultados” - Coger el dato tipo de pieza. - Coger fecha - Coger hora - Ir a hoja “Datos” y buscar, con esos tres criterios la cantidad - Copiar ese dato de cantidad en la hoja “Resultados” Por ejemplo de la pieza A, el 19.05.2014 a las 7 tendríamos 10 piezas. Para el caso de la pieza B el 20.05.2014 a las 12 tendr…

Buenas tardes, por aqui me encuentro preguntando nuevamente. Tengo un libro de excel normal que ejecuta un macro que me abre un libro compartido, esta es la macro: Sub Abrir_y_Ocultar_Libro() Dim xls As New Excel.Application xls.Workbooks.Open Filename:="C:\Datos\Datos.xlsx" xls.Visible = False End Sub Ahora tengo dos preguntas, cómo puedo hacer otra macro que me lo cierre este libro? y otra, alguna macro que me guarde el libro? o lo active para poder guardar datos en el? Gracias de antemano

Hola. Necesito gran ayuda. Cópmo hacer una macro que se accione con doble click en una celda generando un envío de correo de outlook, con el campo para, asunto, y texto ya diligenciados, y con un pdf temporal adjunto que desaparece cuando se envía, y que tiene como rango fijo los rótulos de columna y un rango variable (que es el que voy a cambiar dependiendo de a quien se envia el correo) He visto macros que hacen esto, mas no sé como juntarlas en una sola macro. Agradezco cualquier acercamiento a la función. Gracias.

Hola, buenas tardes. Llevo varios dias dándole vueltas a un problema con una macro, me explico: La función de esta macro es de, en primer lugar, listar los documentos archivados en una carpeta cualquiera (seleccionada con un Browser), con sus propiedades y características. Esto ya he conseguido hacerlo (es la parte fácil) No obstante, ahora necesito que, si escribo en otra columna X un nuevo nombre para el documento (digamos que el nombre actual del documento está en la celda "C2", y yo tecleo un nuevo nombre "*.*" en la celda "D2") al activar la macro ésta vaya a la carpeta del documento, y modifique su nombre antiguo por el nuevo, sin modificar el directorio. Más o …

Hola amigos de Ayuda Excel. Nuevamente por aquí para pedirles un . He intentado hacerlo pero pero no logro el objetivo. Necesito copiar el rango A5:K5 (fila que estará siempre oculta) y deben ser insertadas 5 filas iguales en la primera celda vacía de la columna A. La macro se ejecutará a través de un botón. Agradecido de antemano por su valiosa colaboración. INSERTAR 5 FILAS AYUDA EXCEL 2.xlsm

Hola amigos necesito ayuda con un archivo me super urge. Tengo un archivo con una base de datos y en el cual se van llenando y ordenando por fechas, al momento que se termina de llenar los datos de la fila que sigue despues de la ultima que se dio de alta. Se da clic en el boton que tiene una macro que se posiciona en la celda C1 y de ahi baja hasta el ultimo registro y selecciona toda la fila completa y de ahi la copia en un correo nuevo de Outlook y lo manda al destinatario del correo que ponemos en el codigo de la macro, es aqui donde necesito ayuda, ya que quiero que en ese mismo codigo en lugar de seleccionarme solo el ultimo registro que primero me seleccione la pr…

Hola a todos. Me gustaría que alguien me ayude con una macro que ejecute lo siguiente: Tengo un rango de datos con varias columnas y filas y necesito que cuando cambie el valor de la primera celda del rango siguiente, la última fila del rango anterior se resalte con un color determinado (puede ser el amarillo, por ejemplo) En mi rango de datos, ese cambio debe producirse en la columna E (NIT), es decir, que cuando el valor del NIT cambie, la fila inmediatamente anterior a la celda que cambia de valor se resalte. Para ejemplo, subo un libro compuesto de dos hojas (Datos y Así) En Datos, está el rango de de datos, y en Así, cómo debe quedar dicho rango una vez se …

Hola Amigos del foro me pueden ayudar quiero reemplazar unas fechas q tengo en una base de datos ejemplo: tengo mis fechas 22/04/2013 pero a la hora de realizar mi macro de "/" a "." me cambia el formato a 4.22.2013 y asi no lo requiero yo quiero que me salga 22.04.2013. estoy utilizando la linea Selection.Replace What:="/", Replacement:="." [/PHP] pero a la hora de correr la macro me cambia el formato alguien me puede ayudar a que me reemplace "/" por "." y que me deje el mismo fromato de fecha.. gracias por su valiosa ayuda..

Buenas tardes, Tengo una base de datos con un total de 20 columnas de las cuales deseo extraer en una hoja nueva del mismo libro únicamente 8 columnas con datos filtrados de una ellas en especifico. En la hoja nueva donde se pasaran los datos que requiero extraer, quiero adicionar 2 columnas más pero las celdas de cada una de ellas arroje un resultado si cumple ciertos criterios. ¿Cuál es el objetivo de esto?´ 1- Filtrar de la columna con el titulo Etapa solo los datos que estén en: Documentación y Formalizado. 2- Copiar únicamente las columnas con títulos (Cliente, Monto Aprobado U$, Tipo De Operación, Ubicación Gtia Tipo Crédito Etapa F. Lib. Gravamen y F. Solvenci…

Hola tengo una tarea algo ambiciosa desde mi punto de vista,ver si existe una macro para esto. Usamos Excel 2010 Quiero manejar un libro comparatido aqui en oficina Hay basicamente 4 usuarios y 2 administradores, Cada Usuario y Administradores deben de tener su contraseña unica pero solo para ciertas condiciones o Privilegios. Aqui la descripcion de Privilegios de cada uno. (de cualquier manera marque las celdas con "X" de aquellas columnas, las cuales no podran modificarse por el usuario o propietario de cierta hoja. Usuario 1 Privilegios: - Ingresar datos en hoja "REGISTRO" - Sin restricciones en hoja "ORDEN" - Copiar datos de "REGISTRO" y "DISEÑO" - Pegar…

¡Hola! Tengo una tabla con con los ingresos de X personas durante los últimos años y meses. Mediante una macro, me gustaría extraer a una nueva hoja aquellos datos (que sean anteriores al mes actual) superiores a 500. También, extraer del mes actual (que lo pueda elegir) aquellos datos superiores a 1000 y para los meses y años futuros, los datos superiores a 500. Al extraer esos datos, me gustaría que les ponga al lado el nombre de la persona al que le corresponde ese dato. No se si alguien me podría ayudar en esto... lo agradecería mucho. Un saludo!!! TABLA.xlsx

Buenas tardes. Quisiera saber de que forma podría copiar la información de un grupo de celdas de una hoja de Excel a otra hoja de Excel pero en diferentes columnas de forma correlativa en intervalos de 1 minuto. Lo hice de la forma como se muestra el adjunto pero requiere que escriba el código por cada columna (A,B,C,D,E...) y de verdad no me es factible de esa forma porque necesito hacer dicha captura por aproximadamente 12 horas y eso implicaría escrbir el código para aproximadamente para 720 columnas y eso sería muy poco practico porque tendría un código muy grande. Esperando sus sugerencias al respecto. En el adjunto podrán ver como tengo creada la Macro para que me…

Cordial saludos, Un favor necesito de su ayuda, para que mediante una macro pueda hallar la referencia de un rango de celdas con datos. ejemplo: Columnas A Titulo B Rango de datos 4879 A1:A11 3558 1222 4899 1799 2458 3978 2891 2788 4561 Que en B2 la macro coloque la celda de inicio del rango hasta la celda final del rango, y tener en cuenta que la celda final del rango puede variar porque se pegan datos diarios, es decir el código o función de la macro debe estar en función de la última celda con datos. Gracias por su colaboración.

Hola a todos. Anteriormente ya había trabajado en un archivo similar, pero me supero este en dificultad, funcionan la mayoría de las cosas que pretendía implementar. Aquí una pequeña explicación de como funciona y que me falta por hacer... 1.- Como iniciar el Userform? R= De click en la celda [A1] 2.- En el Userform Como se usa? R= En la parte superior izquierda esta el ComboBox2 [Cantidad Requerida] Donde se seleccionara la cantidad de unidades que se pretende capturar (tiene un máximo de 8 unidades fijas en el ComboBox), dependiendo de las unidades seleccionadas se bloquearan el resto de los TexBox de captura) FUNCIONA BIEN!!!, Después sigue el ComboBox1 [C…

Hola, Tengo la siguiente Macro: Sub enviar() Sheets("envios").Select ufila = Range("a" & Rows.Count).End(xlUp).Row For i = 1 To ufila If Cells(i, 7) = Cells(i, 1) Then Set parte1 = CreateObject("outlook.application") Set parte2 = parte1.createitem(olmailitem) parte2.To = Cells(i, 8) & ";" & Cells(i, 9) parte2.CC = Cells(i, 10) & ";" & Cells(i, 11) parte2.Subject = "Cumpleaños" '"Asunto" '"Cuerpo del mensaje" parte2.body = "Buenos días," & vbCrLf & vbCrLf & "Nos es grato comunicarles que es el cumpleaños de " & Cells(i, 5) & "." & vbCrLf & vbCrLf & "Un saludo." 'parte2. Attachments.Add Ruta &…

Hola buenas tardes, estoy realizando un programa que pueda insertar productos buscar imprimir y descontar del stock dentro de el puedo insertar productos y sus componentes, al insertarlo necesito que se introduzca el nombre del producto y los componentes y que ademas se agregue a la lista del producto.. dentro de esas hojas nuevas hay 3 tipos de paginas, la primera es la creacion la segunda es la que se imprime y la tercera para modificaciones necesita que en la segunda hoja que es para imprimir ella descuente del stock los componentes escritos al momento de dar escribir y se guarde en el programa la modificacion si alguien me puede ayudar gracias!!