Hola, Tengo una macro para quitar la letra "h", por favor me podrian indicar como puedo hacer para quitar cualquier tipo de letra o caracter que encuentre en el rango de la tabla y solo deje los numeros? Gracias Borar Letra H.xlsm

hola amigos tengo una pregunta que no se porque me causa confusion y espero ustedes me ayuden ¿como puedo hacer para que si una celda esta llena el checkbox esté checkeado y si esta vacia no lo este? gracias y saludos

Hola amigos, buenos dia: Tengo un userform donde doy de alta a los artículos, pero quisiera ver si se puede colocar un control de Imagen donde con un CommandButton se pudiera insertar la imagen en el control Imagen y al dar guardar a la alta la imagen se guarde en la carpeta imagen. Dejo la macro que tengo hasta ahorita para su análisis y apoyo. Private Sub Imagen1_Click() If TextBox1 <> 0 And TextBoxId <> "" Then VerImagen.RenglonImagen = TextBox1 Set VerImagen.ImageAltas.Picture = FormaCodigos.ImagenPrincipal.Picture VerImagen.Top = FormaCodigos.Top VerImagen.Left = FormaCodigos.Left VerImagen.Show End…

Mi pregunta no se si tiene respuesta. He creado un libro excel con varias hojas y dentro de cada hoja hay varias paginas (ajustadas a la impresora) Yo querria una macro para que me imprimiera solamente las paginas de cada hoja que cumplan esa condicion es decir, en cada pagina de cada hoja hay una fecha y quiero imprimir solo las que cumplan esa condicion dada. Muchas gracias

Tengo un gráfico de dispersión con dos series, cuando quiero cambiar el color de una de ellas lo he realizado de la siguiente manera, pero la cuestión es que no me lo cambia, ¿Alguien sabe cuál es el motivo? ActiveChart.SeriesCollection.NewSeries ActiveChart.SeriesCollection(2).Name = "=""Datos ajustados""" ActiveChart.SeriesCollection(2).XValues = "='Principal'!$A$1:$A$30" ActiveChart.SeriesCollection(2).Values = "='Principal'!$F$1:$F$30" ActiveChart.SeriesCollection(2).Select Saludos y muchísimas gracias.

como le puedo agregar a este código que las celdas que escoge aleatoriamente en mi hoja estadística me las rellene de color amarillo Sub Aleatorios() For x = 1 To 22 f = Int((42 * Rnd) + 1) c = Int((256 * Rnd) + 1) Sheets("analisis").Range("C" & x) = _ Sheets("estadisticas").Cells(f, c) Next End Sub

BUenas noches, por favor su apoyo con esta consulta, quiero redondear decimales de una formula al momento de hacer una macro en excel por ejemplo n*3*0.7, supondiendo que n es igual a 5, el total me sale 10.5, ahora le pongo delante Int(n*3*0.7) y me 10, pero quiero que se redonde a 11, como puedo hacer para que cuando el decimal es mayor o igual a 5 se redonden al mayor, esto lo estoy poniendo como parte de un programa en vb. Gracias

Hola a todos!!! Necesito mostrar una tabla en un listview, en la cual cada item (cada fila) tenga un color de fondo diferente. Para el color de la fuente he usado algo como Listview1.ListItems(1).ListSubItems(1).ForeColor = vbRed y funciona perfecto, pero ahora necesito cambiar el backcolor. Alguna idea? Desde ya les agradezco mucho su tiempo.

Buenos dias. Tengo un programa de gestion de almacen en VBa y Excel. El programa lee el archivo excel, mostrando Referencia, cantida y descripcion, y el usuario confirma que los datos son correctos o no. El problema que tengo es que en archivos con muchas referencias(mas de 75), al llegar a numero 75, se me cierra excel dandome el error de "MIcrosoft Excel ha detectado un problema y debe cerrarse" Como ya os he comentado, me pasa a partir de la linea 75. Si cierro el programa y vuelvo a abrirlo no da error, por lo que creo que es algo de memoria. Me podriais ayudar?? Muchas gracias.... p.d. He intentado adjuntar el programa pero no puedo, asi que si alguien piensa…

Gente, Buenas noches, Primera vez que escribo, hace un tiempito que estoy registrado. Les comento a ver si pueden brindarme una ayuda, en mi trabajo somos 3personas que trabajamos con el mismo tipo de planilla de excel, mismascolumnas, etc, son tres libros excel. Vamos cargando los datos de cadaexportación que realizamos, cada persona en su planilla. La idea sería hacer una macro que busque cada fila del libro(por número de orden, factura, el que fuese mejor) y la compare con un libro general,si existen diferencias entre ellas que actualice y sino existe que agreguela fila al último. Lo que queremos lograr es que al terminar el día ejecutaresta macro y estos datos …

Hola, Lo siento por las molestias pero me paso algo muy extraño. Resulta que tengo una plantilla guardada en un PENDRIVE y voy trabajando sobre ella en casa y en el trabajo cuando puedo. Ayer lo tenia bien y trabaje en casa sobre pequeños detalles y hoy al abrir el documento, la macro "ENVIAR mail" me indica este error: Se ha producido el error’-2147024772(8007007b)’ en tiempo de ejecución: No se guardo el documento La macro que me habéis ayudado en conseguirla es la siguiente: Sub PdfMail() Dim Archivo As String, Destinatario As String Dim Asunto As String, Cuerpo As String Dim OutlApp As Object, H1 As Worksheet '-- Applica…

Buenas noches. He estado buscando en el foro consultas similares a la mia, y no se adecuan a lo que necesito, si bien me han permitido aprender sobre este mundo de Excel. Intento hacer –bien, cada año lo hago manualmente y es muuuy pesado- un cuadrante de turnos con una hoja por mes, dos turnos rotativos y tres fijos. El rotativo que trabaja de tarde un mes el siguiente es de mañana. Los otros turnos (grupos XYZ) son fijos y no rotan. El grupo X, los suertudos, tienen fiesta todos los fines de semana y festivos del año. Los de los grupos Y i Z tienen fiesta todos los festivos y, los fines de semana tienen fiesta sabado y domingo y el siguiente viernes y sabado, …

Hola, si alguien me puede informar, donde podría encontrar algún sitio para estudiar o saber para que sirve cada una de las lineas de Propiedades de Userform ? he buscado por internet y no encuentro nada que vaya directo al asunto. Gracias de antemano

BUENAS ESTIMADOS SOY FLORENCIO MENCIAS DE HONDURAS CENTROAMERICA. SOY SUPER NUEVO EN ESTE GRUPO. TRABAJO CON MACROS Y BISUAL BASIC PERO HACE UNOS DIEZ DIAS AL MOMENTO DE QUERER TRABAJAR MIS ARCHIVOS BASADOS EN MACROS Y BISUAL BASIC ME APARECE UN ERROR Y NO HE PODIDO DECIFRARLO O ARREGLARLO EL ERRO ES EL SIGUIENTE: PARTE QUITADA: PARTE/XL/VBAPROJECT.BIN (VISUAL BASIC PARA APLICACIONES (VBA)). ALQUIEN PODRIA DARME UN CONSEJO DE AYUDA YA QUE ESTOY SUPER ATRAZADO CON VARIOS TRABAJOS. GRACIAS

Hola buena tarde, Nuevamente haciendo una consulta, con un poco de dificultad logré hacer una macro que ejecuta un filtro avanzado. Su función es usar como criterio el valor ingresado en la celda “F2” del libro “Destino” , luego filtra desde éste libro la información que se encuentra en la columna “I” llamada “COTIZACION/IVA” del segundo libro llamado “Origen”, una vez filtrada la información la copia al libro “Destino”. Dos cosas me faltan y no consigo hacerlas. La primera es que al momento de pegar en el libro “Destino” los datos filtrados lo haga después de la última ceda con valor que se encuentra en la columna “F”. Tengo la idea de que se hace con este código: …

Estimados soy nuevo en esto de las macros que he leído y avanzado mucho en lo que deseo realizar el problema es que no puedo hacer que el formulario para ingresar datos si le falta alguno no deje copiar los datos a la planilla y envié un mensaje " que falta un dato antes de copiar" o algo así intente así pero solo me entrega el mensaje falta llenar folio If Range("D12").Select = "" Then Else: ActiveWorkbook.Save MsgBox "Falta llenar el Folio", vbCritical, "DATO VACIO" Cancel = True End If Gracias por su ayuda validador de dato ayuda excel.rar

Hola, Para seleccionar la hoja de un libro (libro activo) usando VBA uso la siguiente instrucción Workbook("Cierres").Sheets("IngresoProductos").Select 'Seleccionar Libro/hoja La hoja tiene un nombre interno "Hoja_IngresoProductos" El nombre de la etiqueta es "IngresoProductos" La pregunta es ¿Como se puede hacer para que la selección de la hoja se haga con el nombre interno? Algunas veces cambiamos el nombre de la pestaña y hay que revisar el codigo para las correcciones, es menos probale cambiar el nombre interno, y hacer la seleccion usando el nombre interno evitaria tener que revisar el codigo cuando se cambie el nombr…

Hola Chicos, tengo un detalle con una automatización... El evento .click no me funciona y no sé porque, e buscado en internet y no encuentro la solución... Perdon por no poder compartirles el usuario y contraseña para que hagan pruebas, sin embargo, si tienen ideas o links para que pueda leer al respecto, les agradecería... La página se llama SAP es un aplicativo en línea para el control de la contabilidad, entre otras cosas... No funciona: Private Sub CommandButton1_Click() Cargando objIE.document.getElementById("__button0").Focus objIE.document.getElementById("__button0").Click objIE.document.getElementById("__button0").C…

Buenos dias, estoy necesitando ayuda con la solucion de este problema. Tengo una subrutina que hace varias cosas, y ala final quiero que me imprima el formulario para que quede un registro en PDF, alguien seria amable de ayudarme con ese problema? Desde ya muchas gracias

Soy nuevo en esto de las macros, me he puesto con el grabador y aquí estoy haciendo lo que puedo. La cuestión es que he hecho unas macros, que más o menos me funcionan, pero siempre viene una parte que desconoces. Quisiera escribir en la siguiente linea vacia, ¿como se lo tengo que decir a la macro? Tengo en una hoja el problema que siempre que voy allí me manda al principio de la hoja. Que se puede hacer para corregir éste problema, para que me envié donde está el último dato. Como no puedo subir el archivo porque es muy grande, os pongo la macro para que me digais. Gracias y un saludo a todos. Pablo Sub MacroIberdrola() ' ' MacroIberdrola Macro ' ' Sheets…

Buen dia Recuerro a ustedes papar poder validar el correcto cierre del ciclo de esta macro. El ciclo afectado es el FOR que tiene la variable n debe trabajar hasta el 23, pero cuando llega a 24, sigue con el ciclo de numero1 y de suma y continua trabajando con errores. como puedo hacer para que la n al llegar a 24 finalice la macro y no realice las demas actividades ? ya movi los Next pero no lo he logrado, espero me puedan dar una guia Gracias esta es la macro Sub Union() ' Dim fila, RR As Long Dim n&, cCriterio$, H&, g&, y& fila = ActiveSheet.UsedRange.SpecialCells(xlCellTypeLastCell).Row …

Estimados Amigos quería pedirles su ayuda. Resulta que tengo una planilla con muchos gráficos y actualmente se actualizan manualmente cada semana tomando las semanas anteriores y la nueva, eso hasta que cumple un año el gráfico mostrando las 52 semanas. el problema es que cada semana tengo que actualizar manualmente arrastrando en rango del gráficoa la semana siguiente. me gustaría saber si ahí forma de automatizar esto y se corra solo el rango una columna mas hacia la derecha. dejo adjunto un ejemplo. AYUDA.rar

hola teneis ideas como hacer una macro que desde una camar web efectue fotos en tiempo real espero busestras ideas gracias a todos

Buen Dia, Soy nuevo en el foro, trabajo en una empresa filial a Coca Cola, llevo inventarios de productos con lotes y ubicaciones esto actualmente lo hago manual, quisiera saber si se puede crear una macro, en la cual tenga un menú, donde pueda ingresar entradas, ingresar salidas y consultar algún producto. Como llevo inventario por lotes, tengo la necesidad que al terminarse un lote mas viejo el lote mas nuevo ocupe el lugar del lote que ya se acabo. Un Ejemplo. Tengo un Producto con 4 lotes; SKU DESCRIPCIÒN LOTE1/EXISTENCIA , LOTE2/EXISTENCIA, LOTE3/EXISTENCIA Que al terminarse la existencia de Lote1, se actualice el nombre de los demás lotes, el que t…

Estimados, Soy nuevo en el foro, y necesito que me ayuden con el caso a continuación: Estaba desarrollando la formula condicional de mas abajo, y Excel (2010) me suministro un mensaje de error, pues su tamaño excedía lo que permite el formato en una sola celda. Entonces se me ocurrió que quizás a través de VBA (De lo que no se nada) pudiese hacerse lo mismo, sin la limitación de la celda de la hoja de calculo Formula: =IF(O:O="No Gestionado","Prospecto",IF(O:O="Llamado, No Contactado","Prospecto",IF(O:O="Enviado Invitacion a S.I. y/o Brochure Programas","Prospecto",IF(O:O="En Espera de Respuesta","Prospecto",IF(O:O="No Interesa MBA, Si otros Programas","Declinado",…