Hola a todos!!!! Espero puedan ayudarme a resolver este pequeño problema! Estoy creando una macro para que se cambien "dinamicamente" las etiquetas de datos de un grafico, el máximo de etiquetas que puede tener dicho gráfico son 8 . Y para lograrlo quiero insertar el siguiente codigo para que primero agregue las etiquetas de datos y después mediante la fucion If decida si la etiqueta de gráfico existe para asi asigarle el valor que se encuentra en una celda de la hoja. El codigo es algo asi: Private Sub CommandButton1_Click() ActiveSheet.ChartObjects("Gráfico 1").Activate With ActiveChart .FullSeriesCollection(1).Select .FullSeriesCollection(1).Appl…

hola necesitaría saber como hacer para enviar de un listbox a una hoja de excel y que cada vez que envié el dato no reemplace el anterior sino que agregue una linea gracias

Hola Gerson. Saludos hacia Honduras y para ti en especial Referente a tu turbo-filtro En el numérico (Consecutivo, cantidad y movimiento) hay que insertar TODO (número completo) pero, en movimiento no me filtra (no acepta) más de 4 caracteres (números) y la columna contiene 8. Pudría ir hasta 14 números el movimiento A prtir del 4º, al introducir el 5º me dice que; Se ha producido error 6 en tiempo de ejecución Desbordamiento Por ejemplo me acepta 9154 pero no 91547048 La opción Private Sub destinogp_Exit(ByVal Cancel As MSForms.ReturnBoolean) no me funciona (nada filtra,) no sé si al amigo si También si coloco 37500 filas (lineas) con datos, al tratar de abrir…

Hola a todos, Tengo una macro que lo que hace es separar cuentas pendientes por cada uno de mis clientes y las envia directamente a su correo. El problema es que cada uno de los correos que manda pesa 4mb y esto me vuelve muy lento tanto mi excel como mi outllok y en realidad no es un archivo grande el que manda. Habra alguna opcion para que estos correos se hagan un poco menos pesados? De antemano, gracias por sus comentarios. Les adjunto un ejemplo de lo que envia la Macro: EjemploMacro.xls

Tengo en una hoja llamada (Control-Caja) dos datos: * Celda "L31" una fecha(puede ser cualquier fecha del año) * Celda "M31" un valor en pesos(perteneciente a un gasto) y en otra hoja llamada(Ganancias Dia-Año) tengo una tabla con: columna "A" Fecha;columna "B" Ganancia Bruta;columna "C" Gastos;columna "D" Ganancia Neta. Mes Enero columna "E" Fecha;columna "F" Ganancia Bruta;columna "G" Gastos;columna "H" Ganancia Neta. Mes Febrero columna "I" Fecha;columna "J" Ganancia Bruta;columna "K" Gastos;columna "L" Ganancia Neta. Mes Mzo columna "M" Fecha;columna "N" Ganancia Bruta;columna "O" Gastos;columna "P" Ganancia Neta. Mes Abril columna "Q" Fecha;c…

Buenas, un favor, tengo un problema con la ejecución de una macro donde quiero que un libro luego de rellenarlo se guarde con otro nombre y se cierre pero cuando ejecuto la macro no se ejecutan esos dos pasos Windows(Lname).Activate Range("D17:F51").Select Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _ :=False, Transpose:=False Worksheets("CARATULA").Activate ActiveWorkbook.SaveAs Filename:= KName & ".xlsm", FileFormat:= _ xlOpenXMLWorkbookMacroEnabled, CreateBackup:=False Workbooks(KName).Close …

Hola, Estoy mirando por la red y seguro que mi duda también está perfectamente explicada en algún sitio ya que es increíble la cantidad de información que existe pero, no puedo demorar más el envío que me han encomendado, así que me he atrevido a pedir nuevamente vuestra inestimable ayuda. Tengo que enviar un informe y a su vez solicitar información a diversas empresas. Tengo que filtrar la información correspondiente a cada una de ellas pero sólo me tiene que filtrar la información que existe. No sé como decirle que si no hay nada, que no haga nada. Bueno no se nada. Envío un archivo que quizá os ayude a comprender mejor lo que necesito. Gracias de nuevo y un saludo…

Hola a todos. Tengo una macro para enviar correos y adjuntar varios archivos. Pero quisiera poner un código que me avisara que no hay archivo adjunto y así poder abortar el proceso. ¿Es posible? Gracias. Moises.

Hola, que tal eh estado buscando un codigo para agragar y modificar datos en el textbox, pero cuando quiero relizar las modificaciones, lo codigos que nse encuentranb en el buscador no me lo permiten, por lo que recurro a su apoyo. ya que para agregar al y modificar me solicita unos codigos que concuerde con los codigos de busqueda con imagenes. nota: el excel que eh adjuntado si sirve busca imagenes gracias!. Base De Datos IMAGEN.xls

Buenas noches, Estoy intentando automatizar un reporte y quería saber si con una macro es posible hacerlo. Para actualizar el reporte diario, normalmente descargo una base desde el sistema de logística y esta base va a una carpeta con un nombre cuya estructura es la siguiente 64000 -numeros particulares de la bajada diaria-274785. Con esa base descargada, la copio y la pego de forma manual en el reporte, y a partir de ahi trabajo con esa base. Mi mayor problema radica en automatizar el paso recién descrito, ya que actualizar el resto del reporte con la base pegada en el mismo lo he logrado automatizar. Cada día la bajada tiene esa estructura, con comienzo y fi…

hola amigos tengo el siguiente problema espero puedan ayudarme, en el siguiente ejemplo tengo en a3 escrito amarillo y en b3 escrito rojo necesito que me aviente como resultado en c3 rojo pero si en a3 dice amarillo y en b3 verde me aviente como resultado en c3 verde, ojala me haya explicado bien un saludo perdon no me deja subir el ejemplo

stimados AmigosNecesito Ayuda en lo siguiente:como tengo que declarar la variables para un numero personalizadomi numero personalizado es "001-"(numero entero)esta forma lo estou usando para el correlativo de una factura con serie, es decir de la siguiente forma001-00001; 001- 00003; 001-0043601 y asi sucesivamentehe declarado la variable de la siguiente forma para almacenamiento pero me devuelve cerointAutoNumFactura = WorksheetFunction.Max(Range("TablaIngresos[Nº Factura]")) + 1esto es para que me vaya sumando la factura, pero me devuelve 0 osea no reconoce como numero al 001-00460 para sumarle una unidad tal como lo indico en la formula

Buenos dias, ante todo deciros que manejo excel a nivel usuario, pero poco a poco voy aprendiendo más cosas al respecto. Me gustaria saber si podrias ayudarme con lo siguiente: Estoy haciendo un esquema de facturas del cual numera automaticamente cada vez que llama una nueva dejando copia en otra carpeta de la que se ha hecho, y tiene celdas con hipervinculos hacia los albaranes, copias de facturas, etc. El error que me da es que cuando hace la copia, la hoja inicial de la factura que se queda con nuevo número no tiene bien asignado el hipervinculo al archivo de albaranes. Por lo cual me toca insertarlo cada vez, cosa que no es práctica. Os agradecería si supierais de…

Estimados No se que pasa, pero al ingresar un nuevo cliente y al precionar la tecla Guarda el registro aparece en la hoja CLIENTE, pero al presionar salir, desaparace de la hoja. me pueden ayudar Saluds MACROS.rar

Hola estimados amigos De nuevo les pido su colaboracion para solucionar un problema al que no le veo sentido, se trata de un form, el original, que pude completar con la inestimable colaboracion del maestro Haplox, lo he instalado en otro libro, y aqui esta el problema, no me funciona como deberia, y el caso es que si lo transpaso al original, me rula perfectamente, Les agradezco su colaboracion Cordiales saludos Planing

Buenos días, tengo el siguiente problema, como podran observar en el ejemplo adjunto lo que quiero es colocar la peor calificación que corresponda a cada número de cliente, es decir en función del número de cliente que aparece en la columna B colocar la pero calificación que en este caso va de A a D siendo D la peor, por lo que para cada número de cliente que se repite debe sustituir por la peor calificacón que tenga, he intentando con formulas condicionales pero no he podido, quisiera ver si con una macro se puede llevar a cabo esta sustitución en forma mas rapida y eficiente. Agradezco su ayuda de antemano. PEOR CALIFICACION POR CLIENTE.xls

Buenas tardes: tengo el siguiente problema: copie una tabla que excel llama "TABLA11" y al copiarla en otra hoja aparece como "TABLA1128", al hacer la macro para filtrarla la macro busca "TABLA1128" y como esta aumenta de numero automaticamente pues la macro no ejecuta. Como hago para decirle a la macro que filtre sin importar el numero que de la tabla copiada? - - - - - Mensaje combinado - - - - - el codigo aparece asi: Selection.AutoFilter ActiveSheet.ListObjects("Tabla1128").Range.AutoFilter Field:=1, Criteria1:= _ "ACEITE BRONCEADOR, MEJORA FORMULACION" AL EJECUTAR LA MACRO NUEVA APARECE "Tabla1129" y asi cada vez que se ejecuta

Adjunto codigo para eliminacion de espacios en blanco antes y despues de la cadena de texto ,pero no he podico espicificar el rango por que solo selecciona la a2 a a23 y necesito que lo realice en toda la hoja Sub Macro1() 'Paso 1. declarar las variables Dim Rango As Range Dim Celda As Range 'Paso 2. guardar el libro antes de cambiar las celdas? Select Case MsgBox("No se podr‡ deshacer esta acci—n. " & "Guardar libro antes de ejecutar? ", vbYesNoCancel) Case Is = vbYes ThisWorkbook.Save Case Is = vbCancel Exit Sub End Select 'Paso 3. Definir el rango objetivo ult = Cells(Rows.Count, 1).End(xlUp).Row …

Hola, no sé si hago mal, en ese caso disculpas. He abierto este mismo tema en fórmulas, pero no sé si habría que hacer una macro. Tengo en la hoja llamada "DATOS", la celda R2, en la cual introduciré el nombre de otra hoja. Con ese dato quiero acceder a la hoja que indique R2, que está en otro libro, sería como en la fórmula siguiente, sustituyendo 48'! por la referencia a R2(en el que está el nombre de la hoja del otro libro). PHP =SI(INDIRECTO(("'EQUIPOS'!G"&$A$1))="EA";'C:\Documents and Settings\MIGUELB\Escritorio\[Operaciones mto.xlsx]48'!C29;"NO") PHP Muchas gracias

Amigos necesito de su ayuda, quiero que la variable capturada en la txtbox1 me refleje el valor en la TexBox2 el rango de esta condicion esta en una hoja y el formulario en otra Adjunto archivo A espera de sus ayuda como siempre Gracias POLO.rar

Buenas tardes amigos excelianos. Me ha surgido una duda, yo he utilizado este código para leer el disco duro de cada computadora. Me funcionaba bien, ya que le paso un hexa, para convertirlo y sacar de ahí las dos primeras y las dos ultimas. mediante el hexa, ese seria mi contraseña, resulta que ahora con esa contraseña no permite entrar, en otro Excel 2016, y Excel 2007 instalado en una maquina de 64 bits igual ya lo probe en otra maquina de 64 bits y va muy bien!! no se a que se deba esto!! este es el codigo Private Sub Workbook_Open() Author = "XXX" ' disco duro Set fs = CreateObject("Scripting.FileSystemObj…

Buenos dias, con todos, por favor me pueden ayudar con una funcion como dice el titulo tiene que contar unicos con diferentes parametros (algo parecedio al contar.si.conjunto) lo que pasa que con la base de datos que trabajo tiene muchos de estos caso y tengo que estar filtrando, borrando, pasando a otra hoja, etc. por favor alguna ayuda o sugerencia. Saludos, Muscaria

Muy buenas a tod@s espero que me puedan ayudar, quisiera que desde una hoja excel , pinchando en la foto del relosj, se ejecutase el reloj -temporizador de windows 10, pero de momento no lo he conseguido , muchas gracias de antemano por sus respuestas. PRUEBA TEMPORIZADOR.xlsx

Necesito ayuda para contabilizar registros (ocurrencias) dentro de un rango horario y despliegue de las operaciones en ese rango horario. Adjunto planilla con detalle. Agradeceré muchísimo la ayuda. (Disculpen si tambien lo ven en el oro grupo, creo que este es el mas afin) Muchas gracias EJEMPLO.xlsx

Buenas tardes estimados programadores, Acudo nuevamente a su conocimiento, de antemano, agradecer siempre a la persona que se tome el tiempo de ayudarme. Como lo indico, lo que requiero es lo siguiente Tengo un TextBox15 en el cual una vez el usuario hace clic arroja un tiempo en formato "hh:mm:ss", este tiempo sale después de restar 2 fechas del mismo formulario. Ahora bien, la ayudita que quiero es que dependiendo del rango de tiempo le ponga un color u otro, de la siguiente manera si es >= 00:05:00 ponga el color del forecolor del textbox15 rojo si es > 00:02:00 y 00:05:00 ponga el forecolor en amarillo si es < de 00:02:00 p…