Hola foreros: Me ha desaparecido el "botón" de subir archivos. ¿ A alguien le pasa lo mismo ? Salu2

Hola a todos. Tengo un LIBRO de 142Kb. No veo la manera de reducirlo y que siga siendo comprensible. ¿ Como puedo mandarlo? Gracias a tod@s.

. Hola: ¿ Se puede arrancar la grabadora de macros desde VBA ? Si la respuesta es si, agradeceré me expliques como. Paz y amor

Hola. He creado un libro de excel con 11 hojas, la primera de ellas es una portada en la que he creado 10 botones para acceder al resto de hojas. El caso es que he creado un macro en cada botón para que al pulsar me redireccione a la hoja del libro correspondiente, pero siempre me deja en la celda A1 y lo que yo quiero es que me deje en la primera celda libre, es decir, que si he escrito en A1, A2, A3...A10, cuando habra el libro me ponga en A11 para escribir directamente y no tener que desplazarme hasta allí. El macro sería algo así como: Cuando pulse el botón número 1, llevame a la hoja 1 del libro y ponme en la primera casilla en blanco de la columna 1 ¿Alguien pued…

Buenos días , no encuentro una forma para hacer esto: Tengo varias columnas con datos, en una de ellas siempre hay nombres repetidos (Por ejemplo: TIPO 1, TIPO 2, TIPO 1, TIPO 1), me gustaría pulsar un botón en un formulario y que me mostrase un mensaje indicándome el total. ¿Sería esto posible?, cualquier respuesta sería de gran ayuda. Un saludo a todos y muchas gracias.

Hola: Os explico mis necesidades, a ver que se puede hacer. Tengo tres maquinas a las que me puedo conectar por tres redes locales independientes entre si (que ademas son lentas). Tienen unos datos que me interesa comparar. No es conveniente abrir los archivos mientras trabaja pues causa errores en el proceso. Si intento importar datos directamente desde su ubicación no me deja. Lo que hago ahora es tener un hipervínculo a la carpeta en red, otro al destino y abrirlos para copiar los archivos a pico y pala arrastrándolo. Son ciento ochenta archivos de texto en total pero con la extensión entre .C16 y .C24. Como la intranet es lenta seria fantástico que solo copiase…

Hola buenas tardes. Quisiera y me pudieran orientar como puedo copiar datos de una hoja a otra del mismo libro con una macro tomando como condición códigos iguales que están en ambas hojas en la columna A, es decir que revise ambas hojas y si hay códigos iguales tome el valor de la columna F de la hoja2 y la sume al valor que tiene la columna G de la hoja1. Gracias por su atención . Comparar.xls

¡Hola a todos! Llevo unas cuantas semanas descubriendo lo que excel puede ofrecer y ahora mismo estoy metido en el tema de los complementos. He buscado algunos ejemplos de aplicación en Internet pero son muy básicos, de una sola pestaña o sub-menú. Yo quisiera elaborar un menú que me permita entrar en distintos apartados. A continuación adjunto la imagen deun complemento para que os hagáis una idea. Este complemento dispone de varias pestañas y funciones y dentro de cada pestaña se puede acceder a otra, y de esta a otra, etc. [ATTACH]34882.vB[/ATTACH] ¿Alguien podría ayudarme? Gracias!

Estimados, tengo varios libros (Contabilidad) creados con excel, ¿existe la posibilidad de tenerlos todos juntos y que al habrir excel me los muestre todos(Nombre ó Codigo) para yo elegir cual abrir?, me imagino que debería ser una macro, (pero soy novato en esto y no lo sabría hacer, ¿alguien podría ayudarme?, desde ya se agradece.

Hola a todos Recien comienzo a intentar aprender por mi cuenta VBA y estoy haciendo mi primer factura en la que quisiera que por medio de un boton se generase el numero de factura automaticamente y se copiaran: ese numero correspondiente de factura, el nombre del cliente y el importe. Dichos datos se guardan en otro libro a modo de resumen donde la primer columna es ese numero automatico generado, la segunda el nombre del cliente y finalmente el importe. He estado mirando codigos y solo me he liado y estoy hecho una maraña. Si alguien pudiese orientarme, se lo agradeceria ampliamente. Un saludo y gracias por la atencion.

¿Cómo desplegar calendario en una celda de excel, similar a lo que se muestra en Project? Buenas a tod@s, No tengo mucho conocimiento de Visual o programación, por lo que les pido respetuosamente me tengan paciencia, he estado revisando varios temas de este foro para ver si puedo resolver mi inquietud, pero de los archivos que he descargado y que otros han subido para aportar soluciones a las consultas, cuando los abro y habilito los contenidos y pruebo los pasos que indican, siempre me sale un mensaje que dice: "No se puede cargar un objeto porque no está disponible en este equipo", por lo que mis consultas serían dos basicamente: 1. ¿Tengo que descargar algún complem…

Hola soy nuevo en la programación en vba, tengo un libro compartido en el que al abrirlo se auto ejecuta un macro que hace que el libro se guarde a los 10 mins. de haberlo abierto, este se ejecuta como bucle. Pero tengo un problema, y es que a pesar de que yo cierre el libro de excel, este se vuelve a abrir y ejecutar el macro. Quise usar la opción "Exit Sub" pero no supe cómo programarlo, agradeceré mucho su apoyo. Mis macros para efectuar la tarea son los siguientes: Sub Auto_Open() Hora = Now + TimeValue("00:10:00") Application.OnTime Hora, "Guardar" End Sub Sub guardar() ThisWorkbook.Save Auto_Open End Sub

Estoy tratando de hacer un código el cual use Solver para obtener una cantidad dentro de un filtro, de una pequeña base de datos. La columna "G" tiene los numero 1 (para configurarlo como binario después) La columna "D" tiene las cantidades que quiero que Solver revise para que me de una cantidad designada en la columna "i". El error que me arroja es "Error en el modelo. Compruebe que todas las celdas y restricciones son validas" Es posible que algunas celdas de variables estén marcadas como Integer, Binary o AllDiferent Sub busquedadecantidad() Dim cantidad, binario As Range Dim hoja As Worksheet Dim i As Integer Dim datobuscad…

Buenas No se si es cosa del ejecutable qeu quiero abrir o si es del codigo que estoy utilizando para llamar a ese .exe Pongo en situación, el programa al abrirse por defecto guarda lo que haga dentro de su ruta por defecto en la carpeta "Nompre_prograama\Descargas", esto lo hace bien desde un acceso directo a ese exe o desde un .bat al que le digo que lo ejecute, guarda perfectamente lo que hace. Ahora bien si creo un boton en un userform al cual al pulsar llamo a ese exe con este código Private Sub Llamar_Exe_programa_Click() Shell "E:\Carpeta_progarama\Nombre Programa.exe", 9 End Sub me lo abre, me da la sensación que lo abre no de una forma no…

Me encuentro en una ventana de Formulario y no logro dar con la instrucción que me permita eliminar un control del Formulario, por medio de un procedimiento dentro de un botón (por ejemplo). Pretendo eliminar controles específicos, creados en tiempo de ejecución. El problema por los momentos comienza en que no se con que instrucción eliminarlos aunque estos hayan sido creados en el modo diseño del UserForm. Agradezco ayudas probadas.

Necesito consolidar 128 archivos al mes en una sola hoja de excel, me conseguí una macro, en donde me copia toda la tabla que necesito, que es la siguiente: -->Sub ponernombre() 'Por.DAM Set l1 = ThisWorkbook Set h1 = l1.Sheets("concentrado") h1.Cells.Clear Application.ScreenUpdating = False Set nav = CreateObject("shell.application") carp = nav.browseforfolder(0, "SELECCIONA CARPETA", 0, "C:\trabajo").items.Item.Path If carp = "" Then Exit Sub carp = carp & "\" ChDir carp archi = Dir("*.xls*") Do While archi <> "" Workbooks.Open archi uf = ActiveCell.SpecialCells(xlLastCell).Row uc = ActiveCell.…

Buenas tardes aquí solicitando de su apoyo, alguien me puede corregir de favor tengo los siguientes variables Tengo establecido estos variables para determinar mi última columna puesto que a veces mi base de datos trae 10 columnas y otras veces mas (cantidad variable) hasta aquí parece funcionar 1.- uc = Sheets("Hoja1").Range(Sheets("Hoja1").Range("a8"), Sheets("Hoja1").Range("a8").End(xlToRight)).Columns.Count 2 .-Tengo esto para determinar mi ultima fila referenciando la ultima columna , no se por que pero en otras columnas no puedo usarlos para determinar mi ultima fila ocupada , me imagino que ha de traer caracteres ocultos o de color blanco pero no …

Hola tengo una duda que me esta volviendo loco, porque parace simple pero no consigo hacerlo. Tengo que graficar dos columnas no contiguas de rango variable una en función de la otra. Como veis en el programa, empiezan en la fila 6 y son las columnas 16 y 19. al ser de rango variable, el contador j indica el numero de filas. ActiveSheet.Shapes.AddChart2(240, xlXYScatterLinesNoMarkers).Select StartRange = Cells(6, 16) EndRange = Cells(6, 19) Set a = Range(Cells(6, 16), Cells(j - 6, 16)) Set b = Range(Cells(6, 19), Cells(j - 6, 19)) ActiveChart.SetSourceData Source:=Union(a, He probado definiendo una variable igual a la unión, sin unión, con l…

Bueno creo que la pregunta es clara. Yo tengo una hoja protegida con una macro y quisiera saber si hay códigos para poder habilitar filtro y edición de ancho/alto de celdas. Seria fácil hacerlo manualmente (Revisar - Proteger Hoja) pero lo que sucede es que esta hoja la actualizo constantemente y por tanto tendría que hacer este paso también constantemente. Espero puedan ayudarme Saludos

En este formulario hay una sumatoria de los totales de los productos y ya esta perfecto pero cuando el vendedor necesitara ingresar: -iva (se le suma al total generado de la suma de los precios de los productos) -descuento (se le resta al total generado de la suma de los precios de los productos) -retencion (se le resta al total generado de la suma de los precios de los productos) el textbox de "VALOR TOTAL A PAGAR" seria: txtsumaart+txtiva-txtdescuento-txtretencion lo que pasa es que: hay veces que no se ingresa descuento ni retencion hay veces que no se ingresa descuento ni retencion ni iva puede ser variable dependiendo la situacion de todas maneras si no hay…

Buenas tardes!, me gustaría consultarles como crear la correcta consulta sql para conseguir el valor de stock de cada producto en la hoja (ingresos de excel. Tengo la hoja ingresos, que se va a vaciar en la BD de access, pero ahí necesito conocer el stock de cada unidad (columna STOCK IZQ Y STOCK DER), que voy colocando para que pueda saber que no puedo exceder las salidas del inventario esto con la ayuda de una macro en el evento change () Cree una consulta pero solo me arroja la suma total sin descontar las salidas. Adjunto los archivos de trabajo para ver si pueden darme una mano. Agradezco mucho su atención. ¡Saludos! SQL_CONSULTA.rar

Ya se como: Crear controles en tiempo de ejecución. Hacer que de un modulo de clase, controles creados en tiempo de ejecución hereden eventos. Gracias @Antoni Pero me surge la duda ahora, de como hacer que los controles que voy creando a través de un modulo, hereden propiedades como: Caption, BackColor, BackStyle, etc... Hay forma de hacer que en modulo de clase tenga estas propiedades previamente definidas para que lo hereden objetos en un Formulario? ¿Lo anterior puede hacerse en el mismo modulo de clase en donde están los eventos?

Buen día a todos, espero me puedan ayudar... Quiero IMPORTAR UNA TABLA DE "OPERACIONES ABIERTAS" unicamente y que se este actualizando cada determinado tiempo, Me marca un error pero no consigo corregirlo, Sub ObtenerDatosDeLaWeb() Dim htmlDeRespuesta As Object Dim contadorFilas As Long Dim contadorColumnas As Long Set htmlDeRespuesta = CreateObject("htmlFile") With CreateObject("msxm12.xmlhttp") .Open "GET", "http://www.myfxbook.com/members/MiguelSaucedo/991260/5229397/xXdymdQeIfUEo6S2NORp", False .send htmlDeRespuesta.body.innternal = .responsetext 'MsgBox (htmlDeRespuesta.body.i…

¿Como mostrar imagen en formulario? Hola. Deseo mostrar una imagen fija en un formulario, buscando encontre un codigo que no me funciona: Image1.Picture = LoadPicture("c:\imagen.jpg") Me da un error 481 que dice Imagen no valida, ¿estare haciendo algo mal? Saludos.

HOLA! en mi hoja "INICIO" tengo la celda B8 con validacion de datos cuyas opciones son tres: celda en blanco, "SI" Y "NO". Quisiera poner un boton que apareciera una vez seleccionada la opcion "SI" o "NO" y que me dirija a la hoja "CALCULOS". SOLO TENGO LO SIGUIENTE: Private Sub CommandButton1_Click()Sheets("CALCULOS").Visible = TrueSheets("CALCULOS").Select Range("c2").SelectSheets("INICIO").Visible = FalseEnd SubEL RESTO NO SÉ COMO HACERLO. ¿¿ME PUEDE AYUDAR, POR FAVOR??(( Cabe mencionar, que en la misma hoja INICIO puse otro boton (IRALINEALIQUIDA) con un macro que me dieron y me resultó perfecto para lo que necesitabaque es el siguiente:Private Sub iralinealiquida_Cli…