Hola estimados foreros de Excel, una consulta he tomado un formato y/o sistema de aqui de este mismo foro hace unos dias hoy recien probando este mismo formato le hice algunas modificaciones pero no me toma el campo de en este caso plataformas para realizar una búsqueda, me explico en breve: 1) En el boton Reporte general, escribo el rango de fecha de busqueda, entonces le he agregado un nuevo textbox para busque tambien el metodo por plataformas, osea si encuentra en las fechas 15/08/2019 al 29/08/2019 plataforma mexico debe mostrar los datos ingresados en ese rango de fechas con existencia de plataforma mexico, si hay otras plataformas no mostrarlo. 2) En el b…

Hola, tengo un problema con excel, desde un Commandbutton, y mediante combinar correspondencia, abro y auto relleno un archivo de Word, con el último registro de una tabla Excel. El problema viene cuando al tener abierto ese archivo Word, pulso de nuevo el mismo commandbutton, quedándose el userform bloqueado. Mi duda es como configurar para que al volver a apretar ese commandbutton no inicie la macro comprobando si esta abierto el archivo. Y por último no soy capaz de hacer que al abrir directamente se inicie el guardar como, para así no modificar el archivo base. Copio el código de la combinación de correspondencia. Private Sub PORTADA_Click() ruta = ThisWorkb…

Hola, como se pueden comparar dos macros y actuar según si son iguales o no ?

Hola, alguien me puede facilitar el código del "juego de memoria" en excel, que consiste en una tabla de 6 x6 casillas y hay parejas de números que no se ven, al pulsar cambia la casilla de color y se ve el número, entonces debes recordar donde está el otro igual, al encontrarlo ya quedan a la vista. Lo he visto por internet pero no consigo bajarlo. Muchas gracias

Muy buenos días, tardes, noches compañeros. Disculpen que los venga a molestar, pero estoy realizando un proyecto que es sencillo, pero de alguna manera se me complicó, jejeje. La cuestión está, en que necesito validar un rango de celdas, y que estas no se encuentren vacías (en el archivo adjunto sería de la celda B6 a la B17). El problema está en que en medio de dicho rango de celdas, hay 3 que son "opcionales" o hay una "excepción", es decir que se pueden o no llenar, pero no logro correr una macro para que valide que las celdas estén vacías, pero que omita estas 3 celdas que son opcionales (en el archivo adjunto van marcadas en color amarillo). Actualmen…

Buenas tardes: Necesito que una columna entera en una hoja de Excel (donde hay una fórmula) quede protegida para que nadie pueda modificarla pero sin tener que proteger la hoja entera. Cómo hacerlo? Gracias!!

Amigos, Buenas tardes por alguien me puede ayudar por favor con el siguiente tema: Tengo un libro que tiene en la columna A, el código 1,2,3 quisiera ver la posibilidad de por macro pasarla a hojas individuales que quede en "hoja1", todo lo de código 1, en "hoja2", todo lo de código 2 , en "hoja3", todo lo de código 3 pruebacodigos.xlsx

Buenos día amigos, Estoy armando un excel para que mediante un formulario simple en hoja de excel copie los datos a otra hoja según la funcion de busqueda que otorga el excel (CONTROL+B). Lo que requiero es que copie segun la fecha buscada en la otra hoja de excel, pense usar la grabadora de macro pero no me resulta. Adjunto un pequeño ejemplo. Por favor toda ayuda o idea es muy buena. Saludos NUEVO REPORTE FINAL.zip

Hola, tengo un juego de Poker que funciona perfectamente. Pero lo copio a un Mac y el juego lo puedo modificar a mi gusto pero las imágenes del cubilete (como si se moviera) no funciona, solo las imágenes, que parte del código debería modificar ? envío parte del programa, la macro en cuestión. Sub Tirar() Dim COLUMNAS As String Dim DADOS As String, DADO As Integer Dim y As Integer, d As Integer '-- Randomize Range("A1").Select COLUMNAS = "FGHGHGI" 'Columna de la imagen del cubilete DADOS = "JKLMNO" 'Columna de la imagen de los dados Visualizar False For y = 1 To Len(COLUMNAS) ActiveSheet.Shapes.Range("CUBI…

Muy buen Dia/Noche me suscribi a esta pagina con la intencion de encotrar ayuda pero cuando creo encontrarla me arroja un herror y lo unico que deseo es lo siguiente yo estoy a cargo de un estacionamiento y en ocaciones por cuestion del exceso de trabajo cometo herrores en la cuenta de horas ya que tengo que realizar el conteo mentalmente y no he podido dar con el clave 1 hora de entrada 2 hora de salida tendra que ser la hora actual del systema 3 seleccionar tres rangos de cobro (1.- 30 minutos gratis 2.- 90 minutos gratis y el tercero seria el 100% del tiempo gratis esto es para los clientes VIP) 4 numero de boleto o serie 5 tota…

Buenos días gente, bueno es simplemente lo que dice el titulo, quisiera que en una determinada hoja (no en todo el libro) se resalte la fila activa con algún color, sin que modifique los formatos condicionales que pueda llegar a tener esa hoja No lo intenté hacer con formato condicional ya que es una tabla muy extensa y supongo que el rendimiento del libro bajaría en comparación si usaría VB Desde ya muchas gracias y saludos Buena Vida

Hola a todos y gracias por anticipado por echarme una mano... Estoy trabajando con la API de JavaScript para Excel a través de Script Lab (esto no es muy importante) Estoy tratando de cambiar el ancho de una columna... Rango.format.columnWidth=100,81; Mi pregunta es, Ese 100,81 ¿a qué medida hace referencia? porque cuando lo veo al cambiar el ancho de la columna manualmente muestra 18,29 y en cm muestra 3,78 cm ¿Alguien sabría decirme en que unidades están esos 100,81? Debe ser una medida americana. Saludos Jose

Estimados, alguien me podría dar una mano con este tema? necesito poder contar celdas de colores, los cuales cambian en función del formato condicional, estuve buscando por la web pero ninguna de ls publicaciones me fue de utilidad. Gracias. Saludos.

Buenos dias, amigos espero me puedan ayudar con este problema que encontre. Tengo abierto un formulario1 donde hay un listview, llamo al formulario2 donde ingreso los datos para el listview del formulario1, el problema es que al cerrar el formulario2, quisiera que el foco pase al listview, pero no lo consigo: Private Sub btnAceptar_Click() Call Agregar_Asientos_Voucher Unload Me UFVouchers.ListView1.SetFocus ''AQUI Mando el foco pero no lo reconoce End Sub Sub Agregar_Asientos_Voucher() Dim i As Integer With UFVouchers.ListView1 i = .ListItems.Count + 1 Rem MsgBox .ListItems.Count .ListItems.Add(i).Text = UFSubVouchers.txtCtaCbl…

Buenos días Soy nuevo en al foro, y tengo un pequeño problema, estoy intentando comparar 2 columnas de dos hojas y cuando coincidan los valores (código de producto) me haga una suma acumulada, he probado con todas las fórmulas que se y no consigo solucionarlo, a ver si me podeis hechar un cable El asunto es comparar la columna a de las dos hojas y si coincide el codigo, sumar la celda correspondiente de la columna cantidad de la hoja albaran a la misma columna de la hoja stock y que acumule la suma Gracias de antemano EXCEL ALMACEN.xlsx

manejo actualmente un formulario que pretende hacer que se reproduzca la vos de excel con el metodo Speech pero la reproduccion de la voz debe mencionar el valor de un combobox y eso me da error,es posible hacerlo? aqui el codigo para su evaluacion Sub voz() Dim var As String var = Userform1.ComboBox1.Value Application.Speech.Speak "var" End Sub

Estimados Amigos, Buenas noches, una vez más requiriendo de su valiosa ayuda. Esta vez con el tema de saber más acerca de poder optimizar el BuscarV bajo vba, (VLOOKUP), ya que tengo un libro de unos 300000k registros y realmente ha tardado una eternidad en conseguir el objetivo aplicando formular1c1 y applicationvlookup. Consultando por ahí en google me encontré con el tema de los arrays y diccionarios, que increíblemente optimizan el trabajo de los vlookup en vba, pasando de hacer el trabajo de 30 minutos a 10 segundos sin exagerar. He intentando con un código que me ayudaron en un foro en inglés sin embargo no logro hacerlo trabajar además que soy nuevo en …

Buenos días a los integrantes de este foro, en esta ocasión recurro a uds, para que brinde su apoyo en como mejorar la siguiente macro, lo que requiero es que me permita seleccionar la ruta donde se encuentra el archivo a utilizar, ya que esta macro ejecuta todos los archivos que se encuentran en dicha carpeta (previamente haber copiado todos los archivos a una carpeta determinada) y lo otro sería que si solo mostrara los archivos que empiecen con el nombre CONSOLIDADO xxxxxxxx.xlsm o CONSOLIDADO xxxxxxxx.xlsx, para lo cual adjunto archivos como ejemplos. archivo principal: MUESTRA FORMULARIO.xlsm Private Sub CommandButton2_Click() Dim ruta As String Dim …

Buenos dias: Tengo un archivo "original.xls" tipo listado con muchas filas. MAT.CONS se repite en varias filas y la siguiente columna tiene MATERIAS asociadas a ese MAT.CONS Quería conseguir con una macro que quedara como vemos en "agrupado.xls". Es decir, ver solo la fila con la primera aparición de MAT.CONS y solo en el caso de pulsar el botón + poder ver el resto de las filas. Si no me he explicado bien, puedo aclarar cualquier duda. Muchas gracias Agrupado.xlsx original.xlsx

Buenas noches, ¿Se pueden descomponer intervalos de fechas utilizando macros? La intención es extraer la cantidad de días entre la fecha inicio y la fecha fin, y a su vez colocarlos automáticamente en el respectivo MES. Adjunto archivo de muestra... descomponer_fech.xlsx

buenas noches nesecito un poco de ayuda con una macro lo explico la macro busca la ultima fila con datos y luego deberia copiar desde esa selda seleccionada hacia la derecha(rango variable) luego pegar en una columna de otra hoja buscando la ultima fila vacia con trasponer espero haberme explicado lo mejor posible a continuacion solo he llegado hasta esta, pero no encuentro el resto Dim ultimaFila As Integer ultimaFila = Cells(Rows.Count, 3).End(xlUp).Select

Hola buen día, nueva mente necesito de a su valioso apoyo, requiero de una macro que me permita copiar datos de una hoja de acuerdo con varias condiciones en otra hoja, necesito actualizar un stock y no deben aparecer los lotes que ya salieron, dentro del archivo adjunto les muestro tres hojas de calculo, donde vienen las especificaciones. espero que alguien pueda apoyarme, de antemano muchas gracias EYS-STOCK.xlsx

Hola a todos, si alguien me pudiera ayudar a modificar una macro que encontré por ahí, la cual consolida varias columnas en una sola, para ello primero se tiene que seleccionar el rango a consolidar y luego ejecutamos la macro y la consolidación se realiza justo en la columna siguiente del rango seleccionado y lo que deseo es que la consolidación se realice pero no en la columna siguiente si no en la tercera columna siguiente del rango seleccionado. Muchas gracias Sub rango_columnas() 'macro une varias columnas en una sola columna 'para ello primero seleccionamos el rango a unir 'y luego ejecutamos la macro Dim rango As Variant Dim i As Long…

Hola buenas. Necesitaria una macro para copiar pegra de una hoja a otra con un criterio. Copiar pegar L:R si en R >0 Salud2.

Buenas noches, me podéis ayudar con esta macro? es para generar codigo de barras, la cuestion que solo me funciona de la siguiente manera: Code128 20, 20, 20, 1.1, ThisWorkbook.ActiveSheet, "11Q94PTT" Pero me gustaría que se cambiara con un rango de una celda. ¿ seria posible algo asi? pero me da error Code128 20, 20, 20, 1.1, ThisWorkbook.ActiveSheet.Range("=F1C1") y mil gracias code128.rar