Buenas noches Genios en excel, aquí molestándolos de nuevo, figúrense que tengo un archivo que anula ingresos y egreso que me devuelve mi saldo anterior, es decir por ejemplo: al anular un ingreso en la hoja HISTÓRICO en la columna B del código 920 me devuelve mi stock anterior en la hoja de INVENTARIO del código 920, Pero hasta ahí está bien. Pero lo que quisiera es que al anular un ingreso o egreso que me anule la fila que estoy anulando en la hoja HISTÓRICO por ejemplo si quiero anular un ingreso voy a la hoja ANULACIONES_RA y digito el número de operación 1245 en la casilla de Userform de la operación a anular y el número de operación que busco está en l…

tengo un combobox dentro de una celda, escondi la la flecha hacia abajo, hasta que eligen la celda, tengo el problema es que si no dan doble clic dentro de la celda no aparece la flecha de las opciones del combobox, existe forma de arreglarlo?, es decir, tengo la opcióndropbuttonwhen que aparezca cuando selecciono el combobox, pero necesito que sin importan sea seleccionada la celda con el mouse o con el tdeclado aparezca la flecha de la lista ejemplo.zip

Apertura de aplicación que elabora cheques bancarios basada en excel que requiere "llave" Estimados: Reciban un cordial y afectuoso saludo. Quisiera consultarles algo: Se daño mi computador, pero logre realizar un respaldo de la aplicación para "elaborar cheques" que esta basada en Excel, sin embargo la "llave" de activación con la cual me permitía el uso ya no me funciona, dicho lo cual no lo puedo abrir y utilizar. Para tal efecto les dejo el archivo así como la llave que en su momento era el acceso para dicha aplicación. El archivo como esta un poco pesado lo pueden descargar de aquí: https://www.dropbox.com/sh/85u7vu6d6ny9i2i/LLf3a9BZJY Agradeciendo de antema…

Se me presenta un problema que supongo no es dificil de resolver, pero por mas que intento no logro solucionarlo, al ingresar al archivo ADMINISTRACION, solo se despliega un Formulario llamado sistema Contable, en el puedo acceder a diferentes tareas, en el caso de "Registración Contable" al clikear se abre el archivo correspondiente, necesario para atender todo lo que hace a la Registarción Contable y cuando cierro el formulario se cierra el archivo; Todo bien, el problema es cuando solicito "Plan de Cuentas", en este caso se habre y cierra pero la diferencia es que no solo se cierra el Archivo, tambien se cierra el formulario. Existen diferencias entre el llamado a…

Hola, He diseñado una función que detecta el doble click, funciona perfectamente solo que el tiempo máximo entre clicks está siempre fijo, lo he puesto a 500 milisegundos. Me gustaría que este valor lo tomara del valor que le hayamos puesto en el panel de control, apartado Mouse. He encontrado una API donde se supone que extrae ese valor, la declaración es "Public Shared ReadOnly Property DoubleClickTime As Integer" pero no es compatible con VBA6, la api es: SystemInformation.DoubleClickTime Property (System.Windows.Forms) Llevo un buen rato buscando algo compatible con VBA sin suerte, a ver si algún maquina de los de aquí sabría como conseguir adaptarlo a VBA o se le …

He entrado y leido en varias WEBs buscando API o APIs solamente para poder abrir libros con macros creadas en Office x86 y quiero poder abrir los mismos en Office x64 sin recibir alguna advertencia o mensaje sobre (PtrSafe) la declaración de las APIs. En la pagina de Microsoft, aqui otra SOLO para ese fin, poder abrir libros sin mensage sobre el (PtrSafe) y que mensiona ademas de macros incompatibles con la aplicacion

Buenas días, En el archivo que adjunto hay tres hojas. En la primera está la macro que funciona correctamente con un tipo de datos concreto. En la segunda hoja está otra "versión" de la información tal y como la copio de mi ordenador a la hoja de excel (sólo cambia el bloque A). En la tercera hoja está la informacion tal y como debería quedar para poder hacer cálculos entr el bloque A y C después de utilizar la macro. Pienso que haciendolo de este modo se puede ver más claro lo que planteo. Gracias Borja Libro3 (1).zip

Buenas Noches, espeor pueda obtener su ayuda con este caso. En el formulario: 1.-ingreso nombre de proyecto 2.-eligo zona 3.-elijo tipo de producto 4.-elijo producto 5.-click en agregar cuando le doy en agregar, los datos se registran en el excel y a la vez se muestran en el listbox lo que deseo es que cuando yo haga cambios en "AJUSTE DE DETALLE", esos cambios se apliquen a todos los items menos a los que sean TIPO: Servicios (Columna 13 del ListBox) lo que he logrado hasta ahora es que los cambois se apliquen a todos , pero lo que deseo es que los Servicios no tenga cambios en el registro. PRUEBA.xlsm

Estimada Red, Primero quiero agradecer, porque cada vez que necesito alguna ayuda de este tipo, siempre hay alguien de buena voluntad que me responde. No soy experta en VBA, pero me encanta hacer trabajos como este. Les cuento, estoy trabajando en un archivo, donde tengo un formulario que permite hacer búsqueda de información en una tabla, utilizando filtros avanzados, tomando como criterios de búsqueda, los campos que el usuario seleccione de una serie de combobox, y mostrando el resultado en un listbox dentro del mismo formulario. He tratado de hacerlo, busqué la manera de poder filtrar, copiar y mostrar los datos en el listbox. Esto último lo hace, pero el archivo s…

Buenos días, Tengo una pequeña consulta, sencilla. Tengo 80 textbox en un UserForm y quisiera aplicarle el formato moneda a todos ellos. Como podría hacerlo sin tener que nombrar un evento por cada uno. PD: Obvie de subir el archivo porque creo que es algo sencillo y no hace falta alguna muestra. Saludos!

Hola buen día. Tengo aquí un detalle para agregar una formula a una celda de excel mediante VBA. Agrego la formula Sub Botón16_Haga_clic_en() For i = 26 To 2381 If Sheets("Pin(mm)").Cells(i, C) = Sheets("Pin(mm)").Cells(11, AU) Or Sheets("Pin(mm)").Cells(i, C) = Sheets("Pin(mm)").Cells(14, AU) Or Sheets("Pin(mm)").Cells(i, C) = Sheets("Pin(mm)").Cells(18, AU) Then ||||||||sheets("Pin(mm)").cells(i,C) End Sub [/CODE] Ya tengo el for que me indica que celdas comparar para que en otra celda le iinserte la formula, entonces pongo un if para guardar algunos datos que necesito, despues del then viene el detalle, tenia pensando en poner algo asi [CODE]…

Que tal compañeros La redacción del título no se si este bien. Pues necesito apoyo de este detalle, igual ya ha de existir en el foro, lo busco pero no sale lo que necesito o bien no escribo bien por favor orientenme hacia el existente. Tengo un pequeño formulario para insertar el precio, supuestamente inserto el salario diario, cuando se inserte el precio que me calcule el precio con una formula del salario diario multiplicandolo por 30, que viene siendo salario mensual. intento con FormulaR1C1 pero la sintaxis la hago mal, así que lo borré. ¿Alguna sugerencia? GUARDAR.zip

Estimados ExcelFanaticos, Quisiera compartir con ustedes una Macro simple que hice para mi trabajo y pedirles ayuda con otra cosa similar al trabajo que hice. Lo que quiero hacer si ven el ejemplo, es el proceso de forma inversa, esto quiere decir desde una base de datos mediante una macro y una combobox seleccionar el nombre de un "Trabajador" y obtener una ficha de personal donde me simplifique la información y por ende me muestre solamente una ves los valores duplicados y los valores que requieren de repetición (Ej: Promoción, o Cambio de Zona) me los especifique con la fecha en que el suceso ocurrió (Ej: Juan Peres fue promovido el 20-03-2012; Cargo Antiguo "Chofer"…

Nuevamente solicito su apoyo con este archivo y necesito lo siguiente: Me manda un error al guardar capturas y guarda los datos como texto además de ser posible que la fecha me la de en automático. Les agradezco de antemano su apoyo. Gracias. CAPTURA CARGAS DE COMBUSTIBLE.xls

Hola buenas tardes! Agradezco de antemano su ayuday mi duda es la siguiente: Tengo una base de datos la cual se alimenta mediante una lista desplegable y esa base quiero alimentar otra mas solo con algunos campos el punto es que tengo la siguiente macro para pegar datos: Sub pegadatos() Application.ScreenUpdating = False Worksheets("Hoja2").Range("B7:B100000").Copy Destination:=Worksheets("BASE GENERAL").Range("B5") Worksheets("Hoja2").Range("C2:C100000").Copy Destination:=Worksheets("BASE GENERAL").Range("C5") Worksheets("Hoja2").Range("D2:D100000").Copy Destination:=…

Estimados: En mi macros me sale esta imagen cuando quiero guardar y cuando pongo depurar me sale la imagen del lado derecho; no se como solucionarlo por favor me pueden ayudar les adjunto el excel que he estado trabajando. V EJECUTABLE_PRU.xlsm

HOLA BUENAS NOCHES! DE ANTEMANO AGRADEZCO SU APOYO, AL NO SER EXPERTA EN EL TEMA DE MACROS ME VEO EN LA NECESIDAD QUE ME APOYEN CON ESTA PLANTILLA PARA OPTIMIZAR LAS ACTIVIDADES DE MI TRABAJO. ESTOY TRATANDO DE MODIFICAR ESTE LAYOUT PERO ME MARCA UN ERROR 13 EN TIEMPO DE EJECUCIÓN , NO COINCIDEN LOS TIPOS. LES ANEXO CAPTURA DE PANTALLA Y EL ARCHIVO. AGRADEZCO SU APOYO SALUDOS!! Libro1.xlsm

Buen día a todos: Por este medio quiero solicitar su apoyo para ayudarme a corregir una macro que me guarda unos datos de la hoja FORMULARIO a la hoja BASE. El objetivo de guardar los datos a la hoja BASE se cumple parcialmente, pero tengo el siguiente problema: La idea es que antes de guardar los datos, la macro verifique si el campo "NUMERO DE SOLICITUD" que se encuentra en la celda B2 de la Hoja FORMULARIO, ya se ha guardado alguna vez en la hoja BASE. Si se comprueba que ya se ha guardado una vez, la macro debería sobreescribir la información en la fila donde ya estaba guardada en la hoja BASE; si en caso se comprueba que aún no se ha guardado, que copie la …

Buena noche a todos: Tengo una macro que me compartió un amigo desde hace varios meses, pero no tuve la oportunidad de probar, sin embargo, ahora que lo necesité, traté de utilizarlo pero me arroja un error de #¡VALOR! Esta macro en teoría calcula el área de un polígono usando angulos azimutales y distancias. Para ello selecciono de primero el rango de las distancias, luego el rango que contiene los ángulos azimutales, pero como resultado obtengo el mensaje anterior. Adjunto el archivo de ejemplo, para ver si alguien pueda apoyarme. Saludos. Ejemplo.xlsm

Hola amigos de AE. Les escribo acerca del APPCRASH, solo quiero información. He encontrado en la red información. Pero si pudieran comentar al respecto. Que es, por qué sucede, como evitarlo, etc Gracias

Buenas tardes, Amig@s del foro quisiera solicitarles apoyo estoy intentando conseguir una macro que se ejecute en una hora determinada para esto estoy utilizado el siguiente evento: Private Sub Workbook_Open() MsgBox "Es importante recordar enviar el correo de los marchamos retirados al Laboratorio!!" & vbNewLine & "Revisar el retiro de las muestras de leche en almacenes", vbExclamation, "JBalladares ---- Aviso automático" Application.OnTime TimeValue("17:21:00"), "Recordar" End sub Hasta ahí cuando el libro se abre, se ejecuta una macro que lanza un MsgBox en la hora establecida, pero quisiera condicionarlo a que si el valor de una celda co…

Buenas a todos. Tengo este codigo que forma parte de una macro, que como podeis ver sirve para crear y enviar PDF por email pero esta es la seccion donde en ocasiones me produce el error. En condiciones normales y fuera de la oficina con conexion normal a Internet funciona de maravilla. El problema viene cuando tengo el ordenador en la oficina y está conectado a la red de la empresa y al usar la macro se me para en esta linea Application.PrintCommunication = False. Me tiene descolocado ya que tengo configurado como impresora predeterminada CUTE PDF y no se porque en la ofi se para siempre aquí y fuera de la ofi funciona. En la oficina hay impresoras en red a las que…

buenas, tengo un filtro que me funciona muy bien, pero tengo una pega, quiero insertar la fecha mediente un calendario que tengo en un userform no tengo problemas para insertar la fecha, pero el filtro no funciona pues como que parece que se vuela esta linea: Application.SendKeys (">=")[/CODE] para llamar al calendario uso esto [CODE]ElseIf Quien = 6 Then Range("C8") = Calendar.Value Range("C2") = Calendar.Value[/CODE] este es el codigo del filro [CODE]Private Sub Worksheet_Change(ByVal Target As Range) Z = Hoja2.Range("I500000").End(xlUp).Row If Not Intersect(Target, Range("C2:E2")) Is Nothing Then Hoja2.Range("A5:I" & Z).AdvancedFilte…

Estimados compañeros, a ver si me podéis hechar una mano con esta duda que tengo. Os adjunto dos ficheros, el primero (Calculo) calcula en una celda mediante sumaproducto el dato de otro fichero excel (BD). Hasta ahí no tengo problemas y la macro es fácil de crear: Sub CALCULO() ActiveCell.FormulaR1C1 = _ "=SUMPRODUCT((BD.xlsb!R2C1:R2321C1=RC[-2])*(BD.xlsb!R2C4:R2321C4=RC[-1]),BD.xlsb!R2C6:R2321C6)" ActiveCell = ActiveCell.Value End Sub El tema es que lo que necesito es que ese cálculo sea mediante el siguiente código (como una variable ya que a veces me interesará traerme el dato y otras no) Sub CALCULO() Dim …

Buenos Dias Esta es una consulta a todos, me gusta harto excel a nivel formulas y tablas dinamicas me manejo bien, se que estoy aun debil en entender la logica de como operan las macros, programarlas. mi consulta tiene relacion con que los que ya son kapos en macros , de a poquito den tips de como entender la programacion de macros. nose como ejemplo hoy aprenderemos como movernos uando comando de vb : ejemplo celda a1: moverse hasta celda j1 de a poco dar sub rutinas basicas para ir comprendiendo y explicando como se hace , que es lo que significa en mundo macros vb lo digo por que la idea no es hacer un copy paste de una duda, la idea es aprender y entender lo …