Buenos Días: Trabajo con dos libros uno con el nombre Caja Jesus 2015 y otro con Cuentas por Cobrar, en mi libro Caja en la hoja BOLETOS celda D20851 tengo la siguiente función =SI.ERROR(HIPERVINCULO("[Cuentas por Cobrar.xlsm]MENU" & DIRECCION(COINCIDIR(F1|[MENU]MENU!$B:$B|0)|2|2|1|"MENU")| "VER NOTA")|"NO VER") Lo que quiero hacer es que según el valor de la celda F1 vaya al libro Cuentas por Cobrar y se sitúe en el mismo valor en la hoja MENU que en este caso seria en la celda C10, pero no me esta funcionando, ayuda por favor. Muchas gracias por su atención. Saludos cordiales Jesús

Hola compañeros de nuevo, Tengo un problema con la siguiente fórmula: Function VentaConDescuento(ByVal fkProducto As Range, ByVal fkPedido, ByVal descuento As Range) As Double ' Limpiamos los errores anteriores... Err.Clear ' Tratamos los errores... ' On Error resume next ' Declaramos las variables... Dim productos As Range, pedidos As Range Set productos = ThisWorkbook.Sheets("PRODUCTOS").Cells(1, 1).CurrentRegion Set pedidos = ThisWorkbook.Sheets("PEDIDOS").Cells(1, 1).CurrentRegion Dim precioCompra As Double, precioVenta As Double precioCompra = Application.VLookup(fkProducto, productos, 5, False) precioVenta = Application.…

Buenas noches, tengo un pequeño problema con esta Macro, tengo un archivo plantilla (archivo adjunto) y con esta macro GUARDAR COPIA el cual me permite generar otro archivo con un nombre distinto, pero no lo esta generando como debe ser, porque tanto el archivo plantilla como el nuevo archivo se queda con los mismos datos. Y lo que necesito es que los datos que contiene mi archivo plantilla que se encuentra resalto se borren al momento que ejecute la macro GUARDAR COPIA con el nuevo nombre de archivo. Nota: Al momento de generar la macro, pregunta si deseo "usar el archivo por default", porque lo que doy la opción NO, para que luego me permita colocar el nuevo nombre que…

Hola amigos, Alguien podría indicarme como importo un rango de datos de una hoja de excel, a mi formulario cargado con un control Spreadsheet. gracias de antemano por la ayuda

Copio de nuevo el mensaje en este subforo que me han dicho que es el indicado para ponerlo. Hola a todos, de antemano pido disculpas si este tema se ha preguntado antes, que es posible que si (aunque yo no se utilizar muy bien la búsqueda en los foros). No he sabido muy bien como titular a mi consulta, puesto que no se si es exactamente lo que busco. Tengo un documento de excel en el que llevo una base de datos de los usuarios que forman un club que tengo y para saber si estos usuarios son activos o no, tengo que gestionarlo uno por uno de forma manual. Me gustaría saber si es posible crear en una tabla las siguientes indicaciones (adjunto un documento explicativo con …

Hola Nuevamente a Todo el foro, Presento el siguiente problema, el cual, por mucho que he mirado en el foro, no encuentro la solución de como ejecutarlo. La cuestión es que debo prepara documentos de expedición para clientes. Un cuadro son los datos fiscales del cliente y en otro cuadro los datos de entrega de la mercancía vinculada al cliente. En el cuadro "cliente codigo", el desplegable que quiero en la celda B2 son todos los codigos de la hoja 'cli' con CDIR = 000, pero quiero que me lo muestre "cod - nom", es decir "210 - cli1nom" y el dato de la celda debe ser de la hoja 'cli' el dato de la columna A del registro seleccionado. El resto de datos del cuadro los bus…

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 amigos, primero que todo agradecer por la buena honda del foro, e aprendido mucho de vba (aunque estoy en pañales aun) Mi consulta es la siguiente: Tengo que descargar 1800 certificados aprox. (de alumnos prioritarios), desde el link que les daré a continuación. Existe alguna manera de hacerlo automáticamente con una macro desde excel donde tengo los RUT? Este es el link: http://certificados.mineduc.cl/mvc/home/index# Una ves ahí se debe hacer clic en "Otros tipos de certificados", Luego "certificado de alumnos prioritarios 2014", Luego ingresar RUT e EMAIL, y por ultimo buscar... Dejo lista de RUT, para que prueben. Muchas Muchas gracias Prioritarios.rar

MUY BUENAS MI CONSULTA ES LA SIGUIENTE: TENGO UN ARCHIVO QUE ES MUY GRANDE Y LO CUAL PARA PODER AVANZAR NECESITO QUE LA FILA A3 - L4 COPIE A LAS DEMAS FILAS VACIAS YA QUE SOLO ES UN SOLO ASIENTO ENVIO UN EJEMPLO MAS DETALLADO SOLO E PODIDO LLEGAR A CREAR UNA MACRO QUE SOLO COPIA PERO SOLO EN UNA CELDA LO QUE DESEO ES QUE COPIE A N CELDAS HASTA ENCONTRAR EL ULTIMO VACIO prueba1.xls

hola expertos tengo una duda necesito com pasar un dato de un lavel aun comando boton gracias

Hola Ojala alguien ojala pueda ayudarme y de antemano agradezco la ayuda para detectar donde esta el error en mi Macro estoy creando una base de datos y en un Form trae la información a un ListBox , hasta acá todo bien pero quiero que al dar Clic en alguna linea de la información del listbox me traiga un valor a aun texbox y esto es lo que no logro estoy usando WorksheetFunction.VLookup pero por más que veo no hace nada al hacer clic en el listBox Private Sub ListBox1_Click() On Error GoTo ErrorHandler cuenta = FormNuevoProducto.ListBox1.ListCount For i = 0 To cuenta - 1 If FormNuevoProducto.ListBox1.Selected…

hola no logro que funcione correctamente tengo unos combox que uso para filtrar filas el 1 aparece ordenado el 4 tambien los otros no,y nesecito tambien que sean dependientes que muestren las opciones segun correspondan si selecciono por ejemplo el proveedor "jaime" en el combox me muestre los productos correspondientes a jaime en el combox correspondiente y no todos los productos... gracias combo_filtros.zip

DUDA. Adjunto Código. Tengo casi tres semanas de trabajar en este proyecto para aprender. El usuario al digita el primer valor en C2, entonces A2 muestra la fecha de Hoy. Luego digita un valor en B2, este valor solo se escribe una vez al ingresar el primer dato en C2. Luego el usuario digita un valor en E2 y da clic a botón Run que calcula valores en D2 y F2, pero, muestra en B3 muestra el valor de B2 + 1, que no debe ocurrir. El botón Run, también, debe mostrar en la fila 5 (no en la 4) los totales de las columnas C,D,E y F. Así, cada ves que se digita un valor en C la fila con los totales se va incrementado en 1 hacia abajo. La Fila de Totales también debe mostar…

Hola, necesito su ayuda, estoy trabajando en un sistema de notas para un colegio y necesito crear un macro que me permita: Generar todos los informes de una vez, con el nombre del alumno y en formato pdf, dandome la opcion de elegir en que carpeta deseo guardarlos. si me pueden ayudar se los agradeceria mucho, quedo atento a sus comentarios

Hola chicos, se que el tema que os voy a proponer es sencillo, pero lo estoy intentando y no me sale. Vereis, tengo un formulario donde tengo un textbox para introducir una fecha. Bien, me he instalado un complemento de excel que es un calendario, y lo he configurado para que me introduzca en el textbox, la fecha que seleccione previamente en el calendario, hasta ahì todo bien. Pero el problema està en que cuando le hago doble click sobre el textbox, que es el evento que he configurado para que salga el calendario, este sale pero debajo del formulario primero, y yo lo que quiero es que me salga encima. Si, lo se, el primer formulario deberia ser no modal para que el calen…

Muy buenas tardes Honorables maestros. Tengo un libro en Excel y lo que quiero es copiar varias filas, datos de diferentes hojas a la hoja Ploteo por fecha. Tal como dejo el adjunto. De antemano agradezco su conocimiento y apoyo. Muy buenas tardes. Muestra1.xlsm

Hola a todos y todas; -A ver si me podéis echar un cable. Estoy intentado pasar el nombre del formulario por parámetro a un procedimiento que tengo en un módulo y me genera error y no sé porque. Si la macro la ejecuto desde la subrutina del formulario va bien en cambio desde el módulo no va y no sé porque. Sub EnviarHojaActiva(vForm As UserForm) 'Sub EnviarHojaActiva(UserForm1 As UserForm) <---Tampoco va Dim RutaTemporal As String, NombreArchivo As String Application.ScreenUpdating = False Application.DisplayAlerts = False NombreArchivo = ActiveSheet.Name RutaTemporal = VBA.Environ("temp") & "\" NombreArchivo = RutaTemporal & NombreArchivo …

Hola muy buenas, nose si este es el lugar, la verdad pero es que tengo un csv que esta en formato libro de excell que me pasa mi proveedor y quisiera que aparecieran tambien las urls de las imagenes y otras cosas de interes para subirlo a unas webs comerciales pero lo que ocurre es que me dan una informacion de como acceder a una API que tienen ellos para hacerlo, el tema es que no entiendo muy bien que es lo que tengo que hacer para "llamar" o algo asi dicen a esa accion, tengo que poner ese tipo de link que me dan en la API en el recuadro de el articulo el cual quiero la imagen y la descripcion? Por ejemplo para las especificaciones me dice esto: …

Buenas Tardes!! Una vez mas solicitando de su amable ayuda Tengo Un Libro conformado así: Hoja Layout de un casino donde me muestra la distribución de los juegos, Hoja Thermo Indicador donde corresponde la Licencia de cada juego Hoja Base x maquina que contiene la base de datos correpondiente a las licencias Por medio de VB deseo que cada vez que se seleccione un juego, un Msgbox me arroje los datos de la licencia Adjunto Ejemplo De antemano muchas gracias MsgBBuscador.rar

Buenos días, Tengo un formulario en VBA en el cual el usuario introduce 32 valores y el programa compara si hay una diferencia entre algunos de ellos mayor de diferentes parámetros. Tengo una función que pinta el fondo de las textbox de rojo o amarillo cuando se superan estos parámetros. Funciona perfectamente, pero cuando borro uno de los valores introducidos (por ejemplo porque me he equivocado al introducirlo) me salta el error 13 'no coinciden los tipos'. Soy consciente que es porque pasa de comparar dos números a un numero y un "null" pero simplemente quería saber si la función puede esperar a que haya un valor para compararlo y así no tener que rein…

Yo pedi ayuda en la confeccion de un formulario y ANTONI me contesto y me soluciono el problema, Crack total. Ahora bien, dentro de el listbox del archivo que adjunto "lo hizo antoni" quiero agregar tipo de comprobante y en la parte superior mes y año; la verdad que lo intente y fracase. Algun alma caritativa por ahi que me pueda dar una mano Recibos Antoni.xlsm

Hola buenas noches: en un archivo necesito copiar un rango de celdas de distintas hojas de mi libro. En mi hoja 1 pondré el nombre de la hoja donde debe buscar el valor en la columna A y el valor a buscar en este caso "Form" La celda donde pondré la hoja se encuentra en C9 donde pondré la palabra a buscar en celda C11 ="Form" Esta palabra debe ser buscado en la columna A (fango a15 a a50) de la hoja indicada, y pasar a la columna B y seleccionar el rango activo y copiarla para pegar la información en otro libro o a Word. Muchas gracias Buscar en hojas dato.xlsm

Buenas Noches: Tengo los siguientes códigos: Esté código copia a la hoja con el nombre de la celda T2 Sub Copiar_tkt_a_Kardex() For Each Hoja In Worksheets If Hoja.Name <> "TKT" Then 'Comprobamos antes si la hoja está entre las mencionadas en la columna R Dim qRangoR As Range Set Origen = Range("T2") 'qRangoR = Application.Intersect(Columns("N:N"), Hoja1.UsedRange) For Each cell In Origen 'qRangoR If cell.Value = Hoja.Name Then 'si la hoja coincide con alguno de los nombres de la columna N, se ejecuta ' Worksheets("TKT").Range("$A$3:$n$100").AutoFilter FIELD:=14, Criteria1:=Hoja.Name uFila = Worksheets("TKT").Range("A" & Rows.Count).End(xlUp).Row Works…

Gracias por revisar mi pregunta en el archivo adjunto explico lo que deseo, gracias de antemano. un saludo jesus gomez POLIZA DIARIO1.rar

Hola Buenas desconozco un poco del tema de excel si se puede o no, Pero realice un UserForm con ListView1, Quisiera saber si se puede usar el hipervinculo que tenia en el listado que aparezca en view porfavor, y si es que existe otro metodo para realizar algo parecido.