Muy buenas mis estimados , en esta oportunidad estoy comenzando con un proyecto de finanzas en el cual tengo 2 textbox con unas tasas a digitar y 2 opciones de boton , estuve trabajando con un codigo pero me vota error , y lo que necesito es ; que al ingresar las tasas en textbox1 y 2 y si escojo el boton TEA corra la formula (EA) y el resultado lo coloque en el label.4 y haga lo mismo cuando selecciono TMV corra la formula (MV) y el resultado lo coloque en el label6 . y mejor aun que el resultado en los labels salgan sin un boton de comando sino automaticamente se selecciona el boton. veo que tengo mas retos por delante en est…

Hola amig@s: Como puedo copiar datos de una hoja que lo filtro por cliente a otra hoja de otro libro que esta preparado para recibir lo copiado, o sea de mi hoja 1 filtro por fecha y después por cliente, y solo quiero que copie lo visualizado, por ejemplo he filtrado las ventas del 03/01/2015 y elegi al cliente Dana tours , y visualiza desde la celda a25 hasta Q45 y solo quiero que de ese rango copie desde la celda d25 hasta la q45 a mi otro libro en la hoja que es fija como una factura y lo copie esos datos a partir de la celda B9. Gracias Saludos Jesús Hojas.rar

Buenas a todos, Haciendo pruebas con macros me he encontrado con el siguiente dilema, estaba comenzando a crear una agenda organizativa para administrarme el trabajo. pero ha habido un corte de luz y el trabajo que estaba haciendo se ha ido a la porra. Es una agenda muy chorra 2 botones, uno para colocar el día en la última fila de la columna (se introduce a partir del activecell) y otro para borrar dicho día (se elimina a raíz del activecell) A raiz de lo de la luz, me han surgido un par de dudas la primera es, el último día introducido en la hoja el 14 en este caso, habría alguna manera de recuperar ese "14" en una variable y la segunda es, puedo imprimir un dí…

Hola, quiero poner un botón en excel que escanee un documento, automaticamente guardarlo en un archivo y guarde la ruta en una celda De momento solo he encontrado como escanear un documento con esto: Sub Insertar_desde_escaner() CommandBars.FindControl(id:=1764).Execute End Sub pero me muestra lo encaneado en la hoja del libro de Excel, cosa que no quiero. ¿alguna idea? Muchas gracias. Saludos, Carlos Toc

Hola. Os presento una plantilla para el control de facturas trimestrales. Estoy intentando obtener los resultados finales que muestro en la Hoja Enero, donde me gustaría que sumara los totales de las columnas indicadas, y que el resultado final fuera igual que el que muestro como ejemplo. Tendría que hacerlo en todas las páginas. He desarrollado parte del código pero no funciona del todo bien. únicamente suma al final de las columnas pero no lo hace bien. Ademas quisiera que copiara las cabeceras tal como se ve en Enero. Para introducir una factura hay que ir al botón nueva factura y el código está en el botón dar de alta. Para poder cargar el archivo …

Hola tengo una duda con esto, como hago para eliminar registros repetidos pero sin mantener ninguno es decir. si tengo: A A A B C Me borre todos los A y me mantenga B y C. Esto tengo hasta ahora. Sub borrar_repetidos() Worksheets("inicio").Activate Application.ScreenUpdating = False Range("C3").Select Do While Not IsEmpty(ActiveCell) x = WorksheetFunction.CountIf(Range("C:C"), ActiveCell) If x > 1 Then ActiveCell.EntireRow.Delete Else ActiveCell.Offset(1, 0).Select End If Loop Range("C1").Select Application.ScreenUpdating = True End Sub

Hola amigos la siguiente macro la tengo en ComboBox como filtro, pero tengo dos detalles con ella espero contar con su apoyo. Cuando un articulo no cuenta con una imagen dentro de la carpeta imagenes me arroja un error y Cuando filtro un articulo por una sola palabra no lo realiza, es decir si busco la palabra cuadrada y esta está en medio o al final no la filtra, solo lo hace si esta al principio. Espero haberme explicado Dim C As Range, mPath$ Image1.Picture = LoadPicture("") Set C = Hoja8.Range("a1").CurrentRegion.Columns(2).Find(ComboBox1, , LookIn:=xlValues, LookAt:=xlWhole) If C Is Nothing Then Exit Sub Worksheets("inventario").Visible = True W…

Buena tarde, es un gusto saludarles nuevamente. Acudo a solicitar su apoyo, dado que no he logrado que una macro que tengo, realice lo que necesito. Resulta que necesito que tengo un archivo con dos hojas: INICIO y GUARDAR. En la fila 4 de la hoja INICIO deseo incluir diferentes valores, los que posteriormente, deseo que se copien y peguen en la hoja GUARDAR, sin embargo, necesito que previo a guardar, la macro verifique que la información no haya sido guardada previamente. Para ello, incluyo un valor en la celda F1 ó A4 de la hoja INICIO, y deberá comprobar que éste número no se encuentre en ninguna celda de la columna A de la hoja GUARDAR. Si la mac…

Buenas tardes estimados, espero y me puedan ayudar con este dilema se trata de lo siguiente. tengo un archivo "01 PCP.xlsx - v02 - copia" el cual entre otras hojas contiene tres principalmente, y son: "Proy.-Comer" - "BD_Recetas" - "Mat_Stock" En la hoja "Proy.-Comer" tenemos en color naranja las semanas del año, y en color amarillo los productos, y en plomo las cantidades (que se digitan manualmente). ***Lo que necesito es que en la hoja "BD_Recetas" , a partir de la celda "M65" Sume la cantidad correspondiente a la semana según el producto de la columna en color amarillo "L10:L193" Y sus cantidades (celdas de color plomo), y lue…

Buenas a todos, necesito cambiar el color de borde de la celda activa o seleccionada por defecto de Excel (2016) que viene por defecto color verde. Intente integrar una macro pero el problema es que cuando quiero imprimir la hoja cambia el color y si no es el color es el borde, de acuerdo como está programado. En cambio, con el color de borde de las celdas seleccionadas o activas que viene por defecto n el excel no altera o no afecta nada de las celdas ya sea el color del borde, color de la celda, etc.

Hola buena noche estoy tratando de hacer una macro sencilla, de cambiar puntos por comas y viceversa, pero el inconveniente es que me deja los números como texto cada vez que los connvierto... si alguien puede que me ayudarme se lo agrederia, Mil bendiciones. Open abrir.xlsm

Hola! Como dice el asunto estoy buscando una función personalizada del tipo =Bold(A1) que devuelva el valor de A1 en negrita. Me estoy volviendo loca y no consigo encontrar la solución! Me echáis una mano? Mil gracias!!

Buenos días, tengo un archivo Excel en el que interactúan varios usuarios con contraseña y dentro de cada usuario con la información correspondiente que le pertenezca. Ahora bien, me gustaría que dentro del ListView se visualizara también la información filtrada sin tener que filtrarla por el buscador ya que la idea es que cada usuario no pueda visualizar lo de los demás. Insisto en que en el archivo original lo tengo definido con una macro pero en listview no funciona. He probado a poner la función dentro del formulario, dentro del listview en cuestión pero no funciona... En las imágenes, en el archivo base aparece filtrado (N o nada) pero en el listvi…

Buenas tardes espero se encuentren muy bien al igual que toda su familia, quisiera saber si alguien tiene idea de como escribir en una celda una función que tenga como referencia una tabla (pero de nombre variable). Adjunto un ejemplo corto de como sería con la función IF en una celda. (Realmente es para una formula más compleja y una macros mas extensa pero presento un problema como este al querer referenciar tablas que se crean al clonar una hoja de trabajo). Cabe aclarar que la tabla existe y tiene el nombre de las dos ultimas letras de la hoja trabajo. He intentado ya .Formula .FormulaLocal .FormulaR1C1 y nada me funciona. ¿Que podría hacer? Ag…

Buenas, estoy intentando hacer una macro (fichero Actualizar_Access) para añadir a una hoja distintos botones y actualizar desde ahí una serie de tablas de una BBDD en Access. No lo he hecho nunca. Hice un pequeño ejemplo para actualizar desde ahí, la tabla PEDIDOS de Access con la Hoja1 del fichero DATOS. Pero solo quiero que agregue los registros nuevos (la clave es el ID) y en Hoja1 ahora mismo hay 3 registros nuevos. Pensaba que sería más sencillo, pero no encuentro mucho por ahí de cómo hacer esto. Alguna ayuda? Os envío los archivos con el pequeño módulo que hice y me da error. Gracias. ejemplo.zip

Hola y gracias de antemano por cualquier ayuda tengo una exportación de datos en una pestaña (original ) y necesitaría que me pegase las lineas nuevas en otro listado de otra pestaña ( copia ).. y al mismo tiempo, que me borrase del listado COPIA los que ya no encuentre en la exportación ( Original ) BUSCAR Y ESCRIBIR EN OTRA PESTAÑA.xlsx

Estimados, necesito de vuestra ayuda en forma *******, tengo una planilla excel con varios formularios (Excel 2010), sin embargo no sé como terminarlos. La idea es que realice lo siguiente: 1. Permita conectarse a una BD Access 2010 para validar usuario y contraseña y Dependiendo de eso habilite los botones del menú de Presupuestos. 2. Que los formularios (me basta con uno de ejemplo) permita añadir, eliminar o modificar los datos para los meses y deje dichos datos en las respectivas hojas de excel (Enero a Diciembre). Agradecido de antemano, P García Presupuesto Anual.zip

Buena tarde a todos: Necesito hacer un resumen de folios y con los nombres de pacientes a una hoja resumen. Pero los datos de cada hoja son extensos. La informacion que quiero extraer son de las columnas en que se encuebntran los Folio, fecha, y nombre de paciente. Muchas gracias Extraccion de datos.xls

Hola a toda la comunidad, tengo un problema con unas listas y les agradecería mucho que me pudieran ayudar. Les explico brevemente: Estoy haciendo un recibo de gastos en el cual relaciono una base de datos de trabajadores y otra de servicios. Con el número de trabajador, usando BUSCARV(), obtengo los datos básicos como nombre puesto, etc. Cada trabajador puede tener dependientes o no, el problema empieza cuando: 1. Quiero listar los dependientes del trabajador como si fuera una lista de validación, al seleccionar el beneficiario, necesito que me regrese, el nombre del beneficiario, parentesco, edad. La lista de trabajadores puede ser de mil o más registro y e…

quiero colocar una variable con el contenido <td class="submenu"> pero me marca error, que puedo hacer para que se considere como texto o para poder procesarlo

Buenos días amigo: Hace tiempo que ando tras la solucion de un problema que va relacionado con un EVENTO CALCULATE, lo que quiero hacer es dentro de un mismo evento trabajen por separado dos acciones. el codigo es el siguiente Private Sub Worksheet_Calculate() Static MiValor As Double If MiValor = 1 Then MiValor = [L8] If MiValor = [L8] Then Exit Sub MsgBox "Esta OP. ya fue leida anteriormente, intentelo nuevamente!" MiValor = [L8] [E9].Select Selection.End(xlDown).Select Selection.ClearContents 'Static MiValor2 As Double 'If MiValor2 = 1 Then MiValor2 = [L9] 'If MiValor2 = [L9] Then Exit Sub 'MsgBox "Esta OP. no pertenece a la zona q usted hace referencia, intente…

Hola a todos, encontre esta pagina y me parece muy buena, felicidades, me gustaria hacer una pergunta, necesito generar una secuencia de cinco numeros sin repetir entre el 1 y el 50, esto mas o menos lo tengo logrado con las formulas =ALEATORIO.ENTRE(1;50) y =JERARQUIA(A1;$A$1:$A$50)+CONTAR.SI($A$1:A1;A1)-1, el caso es que realmente lo que necesito es, que los cinco numeros resultantes, tengan las sigientes condiciones: * 2 números pares y 3 impares * 3 números en la primera mitad, del 1 al 25, y 2 números en la segunda mitad, del 26 al 50 * La suma de los cinco numeros debe estar entre 131 y 150 ¿Seria posible?, gracias... Saludos...

Hola Aprovecho para saludar y presentarme en este mi primer post. Llevo siguiéndoos mucho tiempo y quiero agradeceros toda la ayuda que me váis prestando y todo lo que he aprendido de vuestros conocimientos. Por primera vez, después de leer y leer no encuentro la solución a mi problema. ¿Me podríais ayudar con lo siguiente? Tengo en una hoja en la que quiero que se ejecute el siguiente código Private Sub Worksheet_Change(ByVal Target As Range) 'Elijo el rango de una columna para que siempre que se introduzca un valor a una celda vaya a la celda de la misma fila y de la columna A If Intersect([F2:F1000], Target) Then 'Pongo la instrucción que quiero se ejecute…

Tal vez puedan ayudarme con este tema y así poder realizar una macro que me ayude con esto: En la pestaña Parámetros tengo varias lineas de texto, con un indicativo, lo que necesito es que en la pestaña que dice Tabulado,se desplieguen los datos ya con formato y en orden, tal y como aparecen en las lineas de texto, Cabe mencionar que son muchísimas lineas de texto con diferentes indicativos, (los indicativos son los campos con descripción Sector). También necesito que la macro tenga una opción que pida el "Indicativo o Sector" para que a apartir de ahí pueda buscar en la hoja Parámetros,y a partir de este indicativo poder empezar a tabular y dar formato a todas las l…

Tengo un problema con un archivo *.xlsm que quiero pasar a *.xlam (Complemento) pero el archivo *.xlsm funciona bien pero cuando lo guardo a *.xlam deja de funcionar ¿?. Tengo Win7 64 bit, Office 2010, y todas las librerías *.ocx , mscal, mscomct2, etc registradas, ¿Me puede ayudar alguien a identificar el problema? Adjunto el archivo xslm, se trata de un calendario que se activa en cualquier celda al hacer dobleclick. Gracias de antemano. he resubido el archivo ya que el primero no era el correcto. Calendario_Camarina00.rar