Buenas tardes, Un saludo a todos por ahí. Soy nueva en el foro y la verdad que veo que sois una comunidad increíble. A ver si alguien me puede ayudar, o por lo menos orientar un poco. Por un lado tengo unos partes de fabricación y por otro unas salidas. Tendría que vincularlas para obtener un stock. Se trata de alimentos, que tienen un "tipo de producto" (por ejemplo entero, trozos, 2ª calidad), un "calibre", un "origen" (por ejemplo España, Portugal, América), una "distinción especial" (por ejemplo ecológico, bio, D.O.P) y un lote. La idea es poder obtener el stock, escogiendo las variables que más interesen en cada momento. Por ejemplo, m…

Buenos dias. Trabajo en una Fundación y estoy preparando un excel con macros. Utilizamos como intranet el Sharepoint de Microsoft, y tenemos contratado el Office 365, aunque cada usuario tiene instalado tambien el Office en su ordenador. El problema lo tengo en que un excel con macros no se puede abrir desde Offcie 365 porque no soporta macros. En el sharepont ya he cambiado que la forma de abrir el archivo escel sea siempre desde la aplicación del escritorio, es decir, desde el excel instalado en el ordenador local. Pero solo funciona con el navegador Internet Explorer, hay muchos usuarios que utilizan el Chrome. Se me ocurren dos posibles soluciones (pa…

Hola comunidad, he intentado hacer ésto de muchas formas y aún no consigo obtener lo que necesito, en realidad no sé si se pueda programar con VBA, así que se los comparto por si alguien tuvo algún problema similar y me puede dar una luz Verán, tengo la página web ipodperu.com (De mi propiedad), en ella tengo un IFRAME que apunta a un vídeo en Youtube Lo que quería hacer era cargar la web en un objeto WebBrowser en un formulario y con un SpinButton modificar el SRC del IFRAME, no he podido cargar la web porque me salen constantes ventanas de errores (Por el JavaScript al parecer) Entonces desde un módulo he accedido a la web usando un objeto InternetExplore…

buenos días, Tengo el siguiente macro. Es para copiar una hoja y dar nombre de acuerdo a una lista. Sin embargo, cuando agrego un nombre mas en la lista me da erro. Alguien me puede ayudar? Sub Copia() Dim C As Range Application.ScreenUpdating = False For Each C In Range("A2", Range("A" & Rows.Count).End(xlUp)) Sheets("Molde").Copy , Sheets(Sheets.Count) With ActiveSheet .Range("A5") = ? .Name = Left(C.Offset(, 1), 31) End With Next C Application.ScreenUpdating = True End Sub Ejemplo Copiar Hoja.xlsm

como puedo mejorar este codigo byfejoal para que realice la condicion de resaltar las celdas azules que estan cerca a la celda de borde a una distancia de 21 celdas anterior y porterior a la celda de borde el codigo realiza ese proceso pero me gustaria que el codigo fuera un poco mas reducido y ademas tengo problema con esta linea del codigo sub color Sub color() Worksheets("hoja2").Range("b2:ac33").Interior.color = xlNone Set ha = Worksheets("hoja2").Range("b2:ac33") Set hn = Worksheets("hoja1").Range("a1:cy42") 'controlar rango For i = 1 To hn.Cells.Count 'si la columna es par se omite If hn.Cells(i).Column Mod 2 = 0 Then GoTo SALIDA …

Hola, para hacer una prueba he realizado un formulario UserForm, muy simple, solo introducir un número, y me funciona pero ... no se como hacer para que salga o se cierre, no reconoce la la instrucción "Unload Me" me dice que no reconoce el "Me" ni la instrucción "Userform.hide" ni Exit Sub. Como puedo hacer para que al <Aceptar> se cierre ? y como hacer para que el botón "Cancelar" funcione? Como siempre gracias

He estado trabajando en una macro para extraer la información de 2 hojas de un libro y que la información quede en un nuevo libro y que se guarde en una carpeta. Tengo un libro donde está todo el de RIESGOS VERSION FINAL está la información que necesitamos, hay 2 hojas ahí con la que trabajaremos, SOD y Resumen X usuario, en la hoja SOD filtramos por empresa, (es importante filtrar por empresa ya que se guardará en una carpeta con el nombre de esa empresa el archivo generado) y ahí tomamos un cargo, copiamos las columnas A (CARGO), D (ID RISK), E (DES RIESGO), F (NIVEL), G (ID FUN), H (DES FUN), I (TRX), J (DES TRX) y esa info la pegamos desde la celda A2, luego copiamos …

Amigos, muy buenos días, disculpen que moleste, pero veo que saben mucho, y quisiera pedir ayuda en lo siguiente: Debo hacer una operación matemática en una macros que estoy desarrollando, la realiza bien, pero con valores mayores a 1 pero sin redondeo, es decir después de la coma no me da las valores decimales, y solo tengo esto: A modo de ejemplo que al realizar la operación de: 2 * 1.36 = 2.72, y no 2.00 , o 0.35 * 0.2 = 0.07 y no 0.00 como lo está haciendo actualmente. Solo tengo esto: Private Sub TextBox17_Enter() TextBox17 = Val(TextBox16) / 100 * Val(TextBox7) * Val(TextBox22) TextBox17.Value = FormatNumber(TextBox17.Value, 2) End Sub …

Bunas noches, tengo un problema con una macro, ya que no logro que imprima solo una vez los valores repetidos y que en una celda adicional me diga cuantas veces se repitio, alguna funcion o algo para poder hacer esto, puedo ofrecer dinero ?

hola experto la idea es como reducir o modificar este codigo byfejoal ya que lo que realiza es resaltar en la hoja 2 las celdas azules que estan cerca de la celda de borde grueso ejemplo2.xlsm

Saludos comunidad, acudo a su experiencia con un archivo que contiene una base de datos en la hoja "xmlrec" e importo datos a la hoja "egresos", mi duda es como puedo hacer un filtro a través de un listbox que al ingresar los datos de las columnas G y H del libro "egresos", se carguen solo los datos conforme al RFC de la hoja "xmlrec" desde la columna E hasta la columna J, y poder agregarlos a la hoja "egresos", aunque ya contengan datos arriba y abajo de las filas seleccionadas, adjunto ejemplo de mi archivo, de antemano muchas gracias por sus comentarios. https://drive.google.com/open?id=1ROd5kdRtio0LigpnKpGom2JhDs4I4FYd

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

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, 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

Buenas tardes a todos! Soy nuevo en el foro. Disculpad si esta consulta es repetida, no he encontrado nada parecido y no sé casi nada de VBA. Tengo una tabla bastante grande de datos. Hay una columna llamada "Picture" que contiene la URL de una imagen (en cada fila es una imagen distinta, todas almacenadas en Dropbox). En otra columna (llamada "Icon"), necesito que aparezcan las imágenes, en cada fila la correspondiente a su URL. Podría insertar las imágenes manualmente, pero son más de 700 filas, pueden variar en el futuro y además necesito poder filtrar para ver solo las filas que me interesen. ¿Cómo podría hacerlo? Adjunto el Excel para que se …

Buen día estimado grupo, Estoy teniendo un problema que no logro encontrar solución. La cuestión es que el archivo que estoy trabajando, me está dando un problema al cargar un formulario de búsqueda de información. Este form lo que hace es únicamente una búsqueda en una base de datos, en el cual hay un combobox, que se llena con "datos únicos" de la base de datos. El código que uso para cargar el combobox es el siguiente: Private Sub cbx_Cliente_Enter() Dim Fila As Long, Final As Long Dim Registro As Integer Dim i As Long For Fila = 1 To cbx_Cliente.ListCount cbx_Cliente.RemoveItem 0 Next Fila Final = Hoja2.Range("A" & Rows.Count).End(xlUp).Ro…

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…

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…

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

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…

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

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

Buenos días a la comunidad, Soy principiante en el tema de formularios y me gustaría saber si alguien me puede ayudar con algún modelo de excel que tenga con un formulario para introducir datos y generar una base de datos. Lo que tengo que crear es una base de datos con Ordenes de fabricación. Gracias de antemano por vuestra colaboración.

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

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!!