Hola: A modo de sugerencia, sería interesante que alguien ideara una macro elegante (sin sendkeys) que ingresara el usuario y contraseña para entrar en este foro (para después asociarlo a un botón en la barra de herramientas de Excel), y así no tener que estár escribiéndolos cada vez que se entra. Saludos.

Les agradeceria, por favor, su apoyo en la creacion de una macro que me permita realizar el conteo de entradas vendidas para cada funcion dia por dia. Tengo unos archivos en excel donde se muestra el plano del escenario (platea y mezzanine) indicando las entradas numeradas. Dia a dia ire marcando con un color cada celda para identificar las entradas vendidas en ese dia y con ese total de entradas poder determinar el monto recaudado en el dia para todas las funciones. Adjunto un cuadro de pdf que es el que debe resumir la informacion obtenida del excel. Muchas gracias de antemano. Nina 20100610_ENTRADAS.zip VENTA DE ENTRADAS PLAY 2010_10 JUNIO.pdf

Buenas noches Estimados, llevo ya tiempo tratando de hacer esto y necesito que me den una mano el siguiente codigo me busca un archivo en windows mi problema es q necesito que lo guarde, no se cual es la propiedad para guardar cuando cierre mi formulario. Private Sub cmdGetFile_Click() Dim fd As FileDialog Dim ffs As FileDialogFilters Set fd = Application.FileDialog(msoFileDialogOpen) With fd Set ffs = .Filters With ffs .clear .add "Pictures", "*.jpg" End With .AllowMultiSelect = False If .show = False Then Exit Sub Image1.Picture = .SelectedItems(1) End With Exit Sub End Sub Gracias por la ayuda Prueba.zip

hola necesito que la macro filtre según el modelo a digitar pero al grabarlo siempre queda registrado el modelo con el cual grabo la macro .

Buen Dia. Bueno dia nuevamente , tengo un problema desde hace dias el inconveniente , primero aqui adjunto la macro , la cual se encuentra en el Modulo 2 , con nombre : VerificarsinoExistendatosDuplicadosenlasHojas , lo que deseo es que compara celda por celda , con las siguientes condiciones , si la celda E3 de la hoja DatosFiltradosSysmex es igual a la celda E4 de la hoja REGISTRO DE RESULTADOS, posteriormente que compare la fecha y hora si son iguales , que esta comparacion de la celda (4,"e"), con las condiciones antes descritas, la compare con todos las celdas de la hoja registro de resultados y una vez comparada con todas, si no existe que copie toda la celda corre…

Hola Foro. gracias por su ayuda, le cuento que he creado un formulario que ayuda a copiar los datos de una BD a otra hoja en función a un criterio(combobox2),este formulario esta en el archivo "Combo",sin embargo quiero mejorar este código , quiero incrementarle un nuevo criterio y para ello he creado el combobox3, que permite seleccionar ademas el segundo criterio. y cuando quiero ejecutarlo me indica "este argumento no es opcional por favor puden ayudarme el archivo a mejorar es el "Combo1". adjunto una carperta zipeada con los dos archivos. Consulta.zip

Hola a Todos Soy nuevo en el Foro Tengo 2 dudas concretas la primera es : Realice un excel con macros y demas pero cuando lo pongo en otra pc y lo abren en vez de abrirse el useform que puse me lo frena el cartel de seguridad que desabilita las macros, en resumen lo que quiero es que cuando envie mi excel a otra pc que tenga esta configuracion no afecte las macros y se inicien igual esto es posible?. (pense que quizas podia poner algun archivo que guarde la configuracion de excel en un instalador junto con el excel y que se instale todo junto ya con la configuracion de las macros habilitadas) Otro punto Me gustaria saber si hay alguna forma de que se instalar el co…

buenos dias amigos de excel tengo el siguiente problema tengo un formulario que al darle click a un boton me busca las coincidencias numericas de un numero de 4 cifras de acuerdo al codigo y me las marca con color verde en una hoja pero quisiera llevarlo a un nivel mas alla quisiera que el codigo no se ejecute en la hoja donde esta el formulario pero que si en la hoja siguiente Sub coinciden() Dim n As Range Dim lookup 'se solicita ingreso del nro de 4 dígitos lookup = Format(Val(InputBox("ingrese NUMERO de referencia", "BUSQUEDA DE COINCIDENCIAS")), "0000") If Len(lookup) <> 4 Then MsgBox "Número no válido.", , "ERROR" …

Estimados colaboradores Buenos días: Baje de la pagina EXCELTOTAL la macro para copiar datos filtrados, adecue la misma a mis necesidades solo que tengo los siguientes inconvenientes: -El libro destino "NOTAS DE COBRANZA 2015.xlsm" lo tengo abierto y cada que le digo que copie lo vuelve a abrir y eso no quisiera que lo realize porque ya lo tengo abierto. -El libro destino "NOTAS DE COBRANZA 2015.xlsm" tiene la hoja "ND" oculta y quisiera que lo visualize, debido a que es ahi donde copiara los datos del libro origen "Caja Jesus 2015.xlsm". -Una vez que copie quisiera que se quede en el libro El libro destino "NOTAS DE COBRANZA 2015.xlsm" hoja "ND" y celda "C7". Desde…

¿Es posible declara una variable Tipo Range como Private? Ej: Private cel as Range ----------------- Sub Prueba Dim cel As Range Set cel=cells(1,1) Call Prueba2 End Sub --------------- Sub Prueba2 Msgbox cel End Sub Es que no lo consigo de ninguna forma y no he visto nunca nada al respecto. Gracias

Hola muy buenas tardes amigos, soy nuevo en esto de los foros, me gustaría realizar un filtro de varias celdas pintadas de un solo color, el filtro quisiera realizarlo con una macro pero no me queda.

Buenas tardes, comento tengo un mini sistema desarrollado en el cual formate mi maquina y ahora me tira un error de compilacion..y hace como 4 años que hice este programa y no me acuerdo como solucionar este error.. el cartel dice Compile error: Variable not defined..y me selecciona una variable picker.width=72.. que estimo que es un datepicker que abre usado pero no se como agregar ese componente o libreria si alguien puede guiarme. muchas gracias

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…

hola amigos de excel mi idea es que tengo un formulario que lo que hace es resaltar aquellos numeros que estan repetidos en dos hojas y quisiera enviar esos numeros a la ultima hoja del libro llamada comparacion de acuerdo a la columna que tiene el encabezado donde se realizo la respectiva comparacion y tener un mejor analisis les agradezco su colaboracion muchas gracias comparar.xlsm

Hola a todos (as) Tengo el siguiente código que pasa cierta información de una hoja a otra, todo funciona bien, el único detalle es de que quisiera que no me sobreescibiera o se pegara siempre sobre la misma columna, si no que se pegara en la siguiente columna disponible, no se que me falta en el código para poderlo arreglar Espero haberme dado entender Sub cONCENTRADO() 'copia columnas a la TE-DESC Sheets("TE-DESC").Select Range("A4:B35").Select Selection.Copy Sheets("CONCENTRADO").Select Range("A1").Select ActiveSheet.Paste End Sub

Hola amigos. esperando que todo les suceda de maravillas,escribo para ver si me dan una mano mejorando el código de la macro que adjunto al presente. el tema es que quiero crear libros con el nombre de las hojas, si los creo en la misma direccion en donde esta guardado el archivo qque esta adjuntado, funciona, sin embargo yo quiero elegir la carpeta en donde guardar los nuevos libros creados, y pues eso es lo que no consigo hacerlo. en el módulo esta una macro que creo que se puede mejorar para cumplir esa tarea . Gracias por su atención saludos. Do_creaArchivo_Hojas.xls

Cordial Saludo Primero que todo muchas gracias a todos por su inmensa colaboracion, traigo el siguiente problema quiero comparar dos hojas de Excel En una hay un listado general y en la otra hoja un listado especifico. Necesito encontrar los registros que coinciden y copiarlos a una nueva hoja, y las diferencias a otra hoja, yo tengo una version pero solo compara unas pocas columnas, requiero que compare todas las columnas sin importar la cantidad. subo el archivo en su version inicial que fue solucionado por ustedes los foreros. De antemano muchas gracias Consolidador de Datos Original.zip

amigos buenas tardes... mi duda va a lo siguiente, necesito un boton editar, que a partir del ingreso del run del alumno despliegue el userform con los datos ya ingresados, para que se puedan agregar los datos faltantes... en otras palabras... - click en buscar - ingresar run - busca los datos -aparece el userform original con los datos ya ingresados - se ingresan los datos faltantes o modifican los ya ingresados - guardar, limpiar y volver al userform les agradeceria cualquier ayuda al respecto... les dejo el archivo que estoy trabajando.. Dropbox - matricula_v12.xlsm mi mail por cualquier cosa el archivo esta disponible para cualquiera que necesite part…

Hola a todos Necesito ayuda con un trabajo que me tiene bastante preocupado Se trata de una macro que abra un archivo existente (desde el nombre de una celda) este paso lo tengo bien claro. Pero cuando me abre el archivo en este pueden haber 1 o 2 o 3 o hasta 5 hojas con diferentes nombres. Aquí es donde tengo el problema: necesito tomar algunos datos de las hojas que existen (en este punto tengo que crear una hoja con un nombre: "Totales" y pegar la información de las otras hojas) En este momento solo tengo como abrir el archivo y me quede pegado con el copiado y pegado... Por favor con su ayuda y comentarios, se lo agradezco de todo corazón. pego código existen …

Hola buenas tardes La presente es para solicitar de su ayuda en el siguiente trabajo necesito hacer un reporte presupuesto en el cual tengo desde enero hasta diciembre , en la hoja "Presupuesto" es en donde se va a realizar el resumen de las hojas antes mencionada, donde cada hoja seria una columna, en cada hoja de los meses hay una columnas que se llaman Localidad y Unidad además que me lo debe de transformar según unas cuentas que están en la hoja de "Descripción Cuentas" Ejemplo la unidad GCIA.DE RECURSOS HUMANOS de la localidad de CCS me la cambie por AT010604 , en descripción va el nombre de los conceptos que están desde la columna "G" hasta la "AL" que se encue…

Buenos días a todos; -Con la macro que adjunto paso el valor formateado con dos decimales a la celda pero veo que si voy a la barra de fórmulas me siguen apareciendo más de dos decimales. Hay alguna otra solución? Me interesa que solo sean dos decimales porque después estos datos los paso a Access y me está cargando todos los decimales. Saludos Formato.xlsm

Hola amig@s: Les comento que gracias a sus ayudas estoy creando una base de datos de clientes, bueno en el archivo adjunto está el libro crear clientes, en la hoja MENU está el botón para crear nuevo cliente, la macro funciona asi como quiero, mi pregunta es cómo poder crear hipervinculos a las hojas, me explico en la hoja MENU está las siguientes columnas COD-CLIENTE-BOLIVIANOS-DOLARES, y quiero hipervicular la columna COD donde corresponde, o sea al nuevo kardex creado asimismo en la nuevo kardex tiene dos celdas que están los totales de los bolivianos y dólares, los mismo que quisiera relacionarlos con la hoja MENU, para que así me muestre bueno el saldo del cliente, …

Soy usuario intermedio de excel y principiante para macros. Me gustaría saber si es posible que se añadan valores a un campo de una tabla cuando dos campos diferentes coinciden con otros dos cmpos de una tabla referencia. Ejemplo: Tabla Ref: Madrid (campo 1)-Sevilla (campo 2) 500(campo3) Tabla 1 Madrid (campo 1) - Sevilla (campo 2) Y que al ejecutar la acción automáticamente aparezca 500 en el campo 3 de la Tabla 1 Gracias por anticipado.

Hola amigos, Lo que necesito es muy sencillo pero soy novato y no tengo ni idea. En la hoja inicio hay un botón que es un formulario, quiero que cuando se rellene, demos al botón Agregar y los datos se pongan en la Hoja Base de Datos. Tengo un campo que está apartado que es de Seleccionar, no sé como agregar para seleccionarlos, me gustaría que me lo pusierais en plan ejemplo y que aparezca en la columna AA. Muchas gracias y perdonad mi ignorancia en este mundo. Un Saludo Hoja Inscripción Esc.xls

hola estoy haciendo un formulario para modificar datos, con esta rutina me muestra los datos en el formulario, funciona muy bien Private Sub UserForm_Initialize() With ComCod .ColumnHeads = True .ColumnCount = 2 .ListWidth = 130 .ColumnWidths = "30;100" .RowSource = Range("A6:B" & Range("A" & Rows.Count).End(xlUp).Row).Address End With ComEstEmp.AddItem "Activo" ComEstEmp.AddItem "Inactivo" ComEstEmp.AddItem "Despedido" ComEstEmp.AddItem "Renuncio" End Sub Private Sub ComCod_change() Dim rango As Range Set rango = Range("A:A").Find(What:=ComCod, _ LookAt:=xlWhole, LookIn:=xlValues) TextNomb = Range("B" & rango.Row) Tex…