jairo retorno

Tengo la siguiente fórmula, la cual me funciona muy bien F2&TEXTO(CONTAR.SI.CONJUNTO($E$1:E2,E2,$F$1:F2,F2),"000") Sin embargo quisiera pasarlo a un codigo vb excel sub loteo() 'aqui la formula convertida en macro end sub

Me pueden brindar su ayuda lo que pasa que quisiera un código que me permita realizar una base de datos y que en esa base de datos yo pueda consultar más adelanta la información Tengo una tabla en la HOJA1 con encabezados de C2: fecha. C3: turno de...

Me ha apoyado la experta elsa (si me puedes apoyar en seguimiento) Te agradezco El código funciona tal y como solicite Private Sub Worksheet_Change(ByVal Target As Range) 'x Elsamatilde 'se controlan cambios en col C a partir de fila 10 Set hox =...

Tengo una hoja con unos datos de la siguiente manera Hoja1 Los datos empiezan a partir de la fila 10 y están las siguientes columnas Col. A - contiene códigos Col. B - contiene Nombres de personal Col. C - contiene Puestos Entonces yo tengo la Hoja2...

Tengo 5 celdas que utilizó y necesito que al poner un * asterisco en estas celdas f11,h11,j11,l11,n11,p11,r11 Me oculten ciertas columnas Ejemplo: Si en f11 coloco un asterisco que me oculte la columna E y al quitar el asterisco me la vuelva a...

Tengo 1 libro en la actualidad El libro POR que es donde tengo toda la información que necesito Pero yo quisiera que al ejecutar una macro este me pregunte que fecha quiero filtrar y de que "expendio" De la hoja llamada INVENTARIOS Una vez realizando...

Tengo una macro en el libro POR que hace búsqueda en el libro Y, si en el libro Y es exitosa la búsqueda copia del libro Y lo que requiero y lo pega en la ultima fila vacía del libro X.. Funciona bien con pocos datos.. Pero al tener una base de datos...

Tengo el siguiente código, el cual funciona pero del mismo libro y de hoja a hoja Sub Copiar_Filas_2() 'activo la hoja donde están mis datos Sheets("INVENTARIOS").Activate 'inicializo la variable j j = 2 'comienzo el bucle For i = 2 To 101 'compruebo...

Tengo el siguiente código, que publicare en mi propia respuesta ya que no me deja publicar todo por aquí Pero necesito algo como esto: Workbooks.Open Filename:=mybook, UpdateLinks:=0 a = Sheets("DATOS"). Range("A1:E18500") (las fechas en esta hoja...

Tengo una archivo .xlsm que funcionan los códigos perfectamente... El detalle es que al convertirlo a .EXE (ejecutable) me deja de funcionar el siguiente código: Le doy depurar, Solo eso me sale, le quito esa línea y el traspaso de datos no...