Hola a todos! Tengo un formulario en VBA para registrar datos en una tabla de excel. Lo que necesito, es que cada vez que se hace click en el botón "Registrar" de mi formulario, en la primera celda de cada fila vaya generando algo así como un Autonumerico con formato "REG-0001" y al volver a cargar datos en el formulario y al apretar nuevamente dicho botón, lo haga con el código "REG-0002" ...03,04 y así sucesivamente.... ¿Alguien me puede guiar? ¡Gracias!

Buenos Dias, Jovenes Espero me puedan ayudar con algun codigo para crear gráficas dentro de un user form o listbox Agradecere sus ayuda...

Hola buenas, estoy intentando exportar una hoja de mi libro de excel a pdf con el siguiente código: ActiveSheet.ExportAsFixedFormat Type:=0, fileName:= _ "C:\Users\admin\Documents\Mis hojas de cálculo\14LCM00000.pdf" El problema es que me dice que el método no se reconoce, por lo que me imagino que no existe la opción de exportar por que algo le falta al excel. He revisado el Mismo excel y no veo por ninguna parte ninguna opción de exportar. Tengo instalados el Acrobat reader y el PDFCreator. Incluso si doy a "Guardar Como" no me aparece como opción en los tipos de fichero el .pdf. Que está pasando? PD: He puesto Type:=0 por que no me reconocía el xlTyp…

Hola buenos dias amigos De nuevo por aqui para solicitar su añuda, por que no consigo dar con la tela, les explico, cargo los datos de la hoja en el listbox, al hacer doble clik encima los consigo enviar a los tex y combobox, pero no consigo que se vea la imagen, este es el codigo que utilizo, le he hecho algunos cambios, pero no me hace nada TextBox38.Text = ListBox1.List(ListBox1.ListIndex, 10) ComboBox1 = ListBox1.List(ListBox1.ListIndex, 11) ComboBox3 = ListBox1.List(ListBox1.ListIndex, 12) ComboBox4 = ListBox1.List(ListBox1.ListIndex, 13) fotografia.Picture = LoadPicture(ListBox1.List(ListBox1.ListIndex, 14)) Espero que me puedan ayudar …

Buenas tardes Desearía me ayudaran, si es posible, para hacer un Formulario que contenga tres Combobox dependientes entre sí Un saludo y gracias anticipadas AndrMax Formulario.rar

He visto varias macros que realizan esta macro, incluso tengo un excel con esa macro incorporada y funciona. Pero cuando copio y pego esas macros a mi excel siempre me sale error 438 donde se especifica la fecha de la cita. Lo único que busco es un botón que cree una cita/tarea en outlook y que tome de dos celdas de mi excel los datos asunto y la fecha con hora. Gracias

Buenas Estoy intentando crear un macro para generar un reporte entre periodos que están en las celdas " D5 " y " F5 " de una tabla de Access, pero no logro que funcione. acudo a ustedes para que me ayuden a definir cual sera el error. Formato de la fecha en Access "29/07/2020 10:48:51" Application.ScreenUpdating = True NumId = (Format(Worksheets("usuarioF1").Range("D5").Value, "DD-MMM-YYYY") & "# ") NumIh = (Format(Worksheets("usuarioF1").Range("F5").Value, "DD-MMM-YYYY") & "# ") Set Cnn = New ADODB.Connection With Cnn .Provider = "Microsoft.ACE.OLEDB.12.0" .ConnectionString = "\01.Datos\Registro.accdb" .Open End With Set Rs = New A…

Hola, de nuevo por aquí para hacerles una consulta, tengo un modulo de 32 bits con un código, este me funciona bien en compu de 32 bits, pero no asi en compu de 64 bits, la consulta es la siguiente, puedo poner un modulo con el código de 32 bits. y otro con el de 64 bits, para que me funcionen indistintamente, es posible, se podrían combinar sin problemas, aquí les dejo el codigo Gracias por anticipado, un cordial saludo a todos los foreros Módulo32Bits.bas Módulo64bits.bas

Hola amigos buenas tardes Alguien sabe si existe alguna forma para convertir los XML a PDF, es decir que me muestre como una factura. Yo he visto que algunos programas hace eso pero no se si existe alguna forma en excel? De antemano muchas gracias Que tengas un excelente fin de semana Saludos...

Un Saludo a tod@s, y daros las gracias por vuestras respuestas. Tengo una consulta y despues de buscar en el foro no he encontrado el codigo que me vaya bien, lo que pretendo es enviar un libro excel a traves de outloock, es decir cada dia de la semana se envie por correo a las 06:00h un determinado libro, a tres destinatarios diferentes, es esto posible? Gracias de Nuevo y un saludo.

Hola: Lo que voy a pedir quizás roce lo imposible pero, por si acaso, ahí va: El archivo (creao por Logroastur) envía un mensaje a cada destinatario de la columna C. En condiciones normales (o sea, desde Outlook) envío los mensajes -uno a uno- y luego, desde la bandeja de enviados, imprimo el mensaje enviado para tener una prueba por si me reclamaran meses más tarde (ya que elimino los mensajes eliminados al cabo de unos días). Por tanto, lo que solicito es si hay alguna manera de que una vez enviados se imprima un folio (o bien se generen pdf´s que luego imprimiría) con los datos el mensaje enviado (uno por cada destinatario, claro). Como sugerencia (por ayudaros …

se puede usar la funcion vlookup, para buscar en libros externos

como estamos mis estimado ,pues veran venga austedes solicitando me ayuden con una pequeña cosita. de por si no me gusta usar el mouse cuando estoy digitando es por eso que tengo mi formulario ordenado para saltar de campo en campo con la tecla tab. pero tengo problemas al asignar los valores a los check box y option boton necesariamente tengo que agarrar el mouse para asignarle un valor a esos controles mi pregunta seria. existe alguna manera de poder asignarle valores con la tecla enter?. asi por ejemplo me voy moviendo con la tecla tab cuando llegue a un checkbox oprimo enter y se seleccione como tildado y asi pueda saltar al siguiente campo con tab. todo eso sin …

Hola buenas tardes, Tengo un excel con un UseForm el cual me gustaría poder imprimir en horizontal. Tengo creado un botón de imprimir que tiene un código sencillo que me imprime pero en posición vertical y no se visualizan todos los datos que deseo Private Sub bt_imprimir_Click() FrmListBoxProductos.PrintForm End Sub Mi intencion inicial es poder imprimir el Useform por completo pero si no es posible me basta con poder imprimir el ListBox con las cabeceras Espero me puedan ayudar Saludos, BUENO.xlsm

Buenas noches amigos de Ayuda Excel. Estoy atorado en una parte del proyecto, y quiero consultarles de que manera se podria realizar lo siguiente. Estoy haciendo un archivo de registro de entradas y salidas de equipos seriabilizables, pero necesito que al capturar el serial del equipo con una lectora de codigo, la macro me verifique si este esta en la tabla de la hoja "Salidas", si el serial esta en dicha tabla, necesito que la macro me traiga la informacion de ese rango de fila, y lo agregue en otra tabla ubicada en la hoja "Entrada", y que adicionalmente agregue en esa misma fila, al lado de la fecha de egreso, la fecha de hoy (ingreso) con su hora (de la mism…

Muy buenas tardes estimados, la verdad es que soy bastante nuevo en las macros programadas mediante VBA. Estoy haciendo una que se utilizará aqui en mi trabajo para calcular el tiempo utilizado por otros trabajadores en realizar ciertas tareas asignadas y definidad en un libro de Excel. Para calcular el tiempo utilizado, desde el principio definí que sería mediante una hoja nueva, sin embargo yo sé que existen algunas formas muchos mas funcionales que la que yo he pensado. Adjunto un libro (Libro2.xlsx) el cual contiene el código que calcula el tiempo transcurrido, lo que yo necesito es poder manejar los tiempos cuando por ejemplo una tarea dure mas de un día y haya que p…

Buenos dias. Estoy haciendo una macro y quisiera saber como usar "WorksheetFunction.VLookup" para que lea con dos criterios diferentes en una tabla de excel.Me explico; Si tengo una columna "A" connumeros que se repiten, pongamos 1,2 y 3,cada uno se repite 2 veces, a su ves tenemos la columna "B" con vocales abc( no se repiten). Como hacer que un userform consulte esto sin que tome el primer valor y usando este metodo.

Tengo una macro que al exportar una seccion de excel exporta el rango en blanco sin informacion no se por que aqui el codigo Sub Descripcion_jpg() Sheets("Ingreso Productos variables").Select Dim B As String B = Range("C43").Value If B = 2 Then Exit Sub End If Sheets("Descripcion").Select ActiveSheet.Unprotect ("adctv530") Dim rgExp As Range: Set rgExp = Range("B22:K42") Dim archivo As String archivo = Range("A1").Value ''' Copy range as picture onto Clipboard rgExp.CopyPicture Appearance:=xlScreen, Format:=xlBitmap ''' Create an empty chart with exact size of range copied With ActiveSheet.ChartObjects.Add(Left:=rgExp.Left, T…

Tengo varios subtotales y quiero eliminar los de valor cero con sus respectivas celdas precedentes, ¿se podría hacer con una macro? Saludos. Subtotales.rar

Hola y buenos días a todos; He empezado a crear una macro que me permite crear un archivo .txt pero no sé como continuar. Quiero conseguir que los datos almacenados o filtrados inclusive los que vaya seleccionando con el ratón en el listbox del frm_Cobros los pueda capturar y poder exportarlos al archivo .txt generado. Adjunto macro y video: https://youtu.be/bVO7f-JZuSg Saludos. ExportarTxt.zip

Hola a todos. De nuevo por aquí pidiendo ayuda. Nos han cambiado las licencias de Office a Office 365. He revisado las macros y las que me fallan tienen que ver con las que envío correos automatizados. He podido arreglar todas, cambiando el código porque de Office 2013 a Office 365 cambia el código, se usa el objeto CDO.Message. Pero se me resiste esta macro, que envía un correo e incluye como parte del cuerpo del correo un rango de celdas donde hay un gráfico. Os pego el código para ver si me podéis ayudar. Después de la instrucción "ActiveWorkbook.EnvelopeVisible = True" el programa ya no ejecuta nada más. He probado con F8 paso a paso y ahí se detiene. Necesi…

Buenas tardes, Estoy elaborando una base de datos para llevar un seguimiento de los juegos que tengo comprados en las diversas plataformas. Para ello, he elaborado un excel donde tengo una tabla de registro y una de búsqueda en la primera hoja. Y la base de datos propiamente dicha en la otra hoja. En la primera hoja contamos con un apartado de registro con dos celdas la del nombre del juego y la de la plataforma. Por otro lado, tenemos el apartado de búsqueda donde tenemos las celdas: nombre del juego, ¿Lo tengo? y plataforma/as. En la segunda hoja tenemos un total de 11 tablas (cada una haciendo referencia a una plataforma de juego/tienda). Mi problema …

Hola que tal soy nuevo en este foro y estoy muy frustrado porque no se la manera de crear una BD para realizar conteos ciclicos. Les voy a explicar mas a detalle: Cuento con una lista de 17,228 productos los cuales necesito realizar una macro para realizar aleatoriamente conteos ciclicos, por ejemplo los productos con un valor de $0.01 a $250.00 les asigne la letra C, los productos con un valor de $251.00 a $1,000.00 les asigne la letra B y los productos con un valor de $1,000.00 a 10,000. Productos A realizar conteos mensuales B realizar conteos trimestrales C realizar conteos anuales Lo que necesito es que me vaya dando aleatoriamente y sin duplicados X numero de…

Señores buenas noches. Por favor necesito su ayuda, tengo que revisar linea por linea una base de datos y necesito una macro para que con un botón dar click y siga la siguiente referencia de una determinada columna. Gracias.

Saludos amigos del foro, he pasado ya varios días procurando tener código preciso el mapa apropiado para que excel está configurado para poder guardar a formato XML ya que en el generador de exámenes de Examview existe una opción para importar desde XML. Incluso tengo un archivo de libre descarga que estaba en XML y ha sido justamente hecho para ser importado por Examview, debo suponer que debe haber alguna versión que lo haya generado; en este caso Examview si lo importa sin problemas. Lo cierto es, que trate de basarme en este archivo XML para configurar el mapa de xml y ser agregado al Excel, pero no lo acepta. Fui eliminado código para hacerlo más simple hasta el punt…