Hola tengo que importar a excel una base de datos que se encuentra en una página web que me pide contraseña, lo e estado haciendo manual sin embargo es mucha información para seguirlo haciendo haci. tengo entendido que tengo que ocupar el QueryTable.PostText

Bueno primeramente agredecerles por semejante esfuerzo y dedicacion, realmente este foro es unico; bueno mi problema es que quiero que una macro cualquiera sea corra cuando una celda o rango se modifique, es posible? muchas gracias...

Hola a tod@s. Más que una pregunta es una solicitud de ayuda. Tengo una bbdd en sql y quisiera enlazarla con Excel vía VBA para crear fórmulas. Es decir, la idea es conectar excel con sql vía vba y crear fórmulas que me permitan obtener datos y/o realizar cálculos en tiempo real. ¿Donde puedo conseguir información para hacerlo? Es que por más que busco no encuentro como hacerlo Saludos y gracias Juan

Señores expertos, soy nuevo en el ámbito de vba y estoy tratando de realizar una macro para ingresar datos de una planilla de control de hormigón fresco, y para poder realizar el formulario de ensayos, necesito repetir el código de muestra las n veces según la cantidad de probetas. Ejemplo: Usando userform ingreso los siguientes datos (entre otros pero solo necesito los del ejemplo): Código de muestra --- edad de ensayo --- cantidad de muestras MT1 ---------- 2 ---------- 3 El resultado esperado en otra hoja debería ser MT1 --------- 2 MT1 --------- 2 MT1 ---------- 2…

Amigos buen dia con todos, por favor me pueden ayudar con este tema he realizado un sentencia sql usando count(distinct [columna]) pero me da error. yo quiero realizar la siguiente operacion de preferencia en con frm. X = minutos por atención / cantidad de ordenes de atención mi problema es que como hay duplicados, quise utilizar la sentencia count (distinct pero no he podido, alguna sugerencia quizás otra manera de realizarlo. Archivo Aca gracias por tu apoyo. Saludos

Hola cracks!! Estoy tratando de generar una macro que calcule el promedio de mis datos, pero en vez de que sea un rango fijo de X2:X8431 sea hasta el ultimo valor que tenga la columna X es decir que pueda variar ya que a veces son mas datos o a veces menos, les dejo el código que tengo actualmente con rango fijo. Range("X2").Select ActiveCell.FormulaR1C1 = "=AVERAGE(R[2]C:R[8431]C)" He tratado con este pero no funciona: Dim last_row As Integer last_row = Cells(Rows.Count, "C").End(xlUp).Row - 1 Range("X2").Select ActiveCell.FormulaR1C1 = "=AVERAGE(R[2]C:R[last_row]C)" Les agradezco mucho su ayuda si tienen alguna id…

Hola amigos: Me han instalado el Open Office y al pasar los archivos de Excel con macros me sale el editor de Visual Basic con error. La pregunta que os quiero hacer es: ¿son compatibles o hay que instalar alguna función en la hoja de cálculo Cal del Open Ofiice. Si necesitáis la pantalla de error que aparece os lo subo en otro post. Muchas gracias y saludos

Hola a todos, Estoy intentando crear macro de envío correo electrónico a través de OutLook a los destinatarios de la columna B si la fecha de revisión que está en la columna E es mayor de 2 años con respecto a la fecha actual. Envío archivo de prueba Gracias envio correo.zip

Hola a todos, tengo este ejemplo, el cual si completo todos los campos (textbox) ingresa normal sin problemas, pero si en caso solo completeo unos cuantos me lanza error se pone en amarillo y dice que los campos no coinciden, no manejo VB, este es un ejemplo que encontre pero no se como arreglarlo. Muchas Gracias EJEMPLO NUEVO INGRESO.zip

Hola! Soy nueva en este foro, así que espero estar haciendo esto bien...Me surge una duda al programar una lista para elegir varios valores. Tengo la lista, la elección de valores y todo parece ok, pero me surge el problema al querer mover el rango a uno en concreto y no dejarlo en la primera columna... Quisiera que mi rango estuviera definido por ejemplo entre D7:D20 y si puedo hacerlo en otra pestaña, mejor, alguien me puede ayudar? He puesto esto: Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean) If Target.Column <> 3 Or Target.Row = 2 Then Exit Sub Else Form1 End If Cancel = True End Sub

Hola a todos, Tengo un lista box que me carga la información de una tabla de 13 columnas de las cuales me interesan sólo 5 de ellas: la 1, 4, 9, 11 y 13 por lo cual oculto las que no tienen con ancho 0. El listbox carga los datos sin problema. El buscador funciona bien también pero cuando la columna es la 10 o mayor de .list es menor que 10. Va marcado en azul y negritas donde está el problema. ¿cómo puedo solucionarlo? Private Sub UserForm_Initialize() 'se definen características del Listbox (columnas, ancho, títulos) With LstBusqueda .ColumnCount = 13 .ColumnHeads = True .ColumnWidths = "60;0;0;160;0;0;0;0;240;0;100;0;100…

Hola de nuevo he estado trabajando en un macro me muchos compañeros de este foro me han ayudado mucho pero tengo un problema tengo una serie de numeros los cuales van variando dia con dia ejemplo hoy son 1000 mañana seran 2000 mi problema surgio de que esos numeros deben ser pegados a otro libro de excel solo los numero, el problema radica en que ese libro es accesado media un escrito remoto en pocas palabras esta en otra maquina mi duda es puedo esos datos copiarlos en ese libro y si es posible que esos datos empiezen a copiarse en cierta fila!! Agradecia muchos sus respuestas Ejemplo.rar

Hola, espero que este sea el foro correcto para mi pregunta. Tengo conocimientos básicos de excel y programación así que no se si lo que quiero hacer se pueda realizar con Excel. Lo que intento es que cuando se abra el documento pregunte qué tipo de modelo se quiere abrir, y dependiendo de la respuesta se abran las pestañas correspondientes. (Tengo todas las pestañas, correspondientes a las dos respuestas en un solo documento) No tengo ni idea de cómo empezar así que si me pudieran en primer lugar decir si se pude realizar o no y si se puede más o menos como empezarlo; sería de gran ayuda para mi. Muchas gracias

Hola amigo, tengo una macro que me inserta una cantidad de imágenes en mi archivo excel, pero quiero hacer dos pequeñas modificaciones: 1) que la cantidad de fotos (CantFotos) que inserto este vinculado en una celda de mi excel, y no que la tenga que modificar desde la macro 2)que me comprima cada imagen que inserto a 150pp esta es la macro: Sub InsertarImagenes() Dim PosX, PosY, X, J As Integer Dim CantFotos As Integer Dim Ruta As String 'le asigno valores a las variables, mismas que dependerán 'de cada proyecto: 'ruta de acceso a las imágenes Ruta = "\" 'cantidad de imágenes a cargar: CantFotos = 42 'margen izquierdo y superior que separará a cada imagen: …

Buenas, Necesito una macro que me haga el siguiente formato condicional, si es posible. Muchas gracias.

Saludos Deseo realizar una búsqueda avanzada por medio de varios comboboxes y checkboxes (que activan a los combobox), lo que deseo es poder activar los checkbox que requiera como criterio de búsqueda (mantener disabled a los que no) y al oprimir buscar, realizar la búsqueda(filtros) con los criterios seleccionados y presentar los resultados en un listbox. El problema radica en que soy inexperto en vba y sólo se me ocurre realizar estos filtros con sentencias if, lo que me parece algo extenuante, ¿alguna recomendación para realizar esta búsqueda avanzada más practicamente? De antemano, gracias. Adjunto el archivo donde se entenderá mejor. https://www.dropbox.com/s/jn…

Hola a todos de nuevo, Me gustaría saber si podéis ayudarme con un pequeño problema...tengo una hoja excel llamada LISTADO PRECIOS, que tiene las celdas con formulas protegidas. Además he creado varios Botones para ocultar columnas y filas diferentes, según el listado que quiero imprimir. El problemas es que al ejecutar los botones si la hoja esta protegida me da error 1004 y me pide que desproteja la hoja, lo cual es peligroso ya que varias personas trabajan con el listado y pueden borrar alguna formula. Con la hoja desprotegida los botones ejecutan correctamente las macro. Es posible que se ejecute correctamente las macros (botón), sin tener que desproteger la hoja? …

Necesito alinear columnas de un listbox directamente cargadas de los textbox, una columna que la cargue a la izquierda la segunda al centro y la tercera a la derecha. adjunto el archivo. Les agradecería la ayuda. Alineación_Listbox.xls

Hola Compañeros Tengo libro que cuando lo trabajo quiero trabajar En Calculo manual y solo me calcule cuando yo espiche el botón.. pero al salir a otros libros también me desactiva el calculo Quiero que eso no pase Asi que Puse que al Al Salir Se Active Y al Abrir Se Desactive Pero Aveces tengo que copiar mucha información y recurro al Copiar y pegar Desde otro libro de Excel Pero La selecciono y al momento de pegarla en el libro del calculo manual es como si no la hubiera seleccionado Así que decidi deactivar el calculo manual al abrir el libro y ahi si sirvió que hago

Hola, Estoy intentando aprender macros sencillas, pero me enganche en el Vlookup, no consigo hacer uno sencillo que me añada el nombre de un codigo que esta en otra pestaña. Que me falta o me sobra!?!? Basicamente quiero que me añada en la columna H el nombre del Codigo. Sub Vlookup() Dim Destination Dim Name Dim Cont Cont = 2 Do While Range("A" & Cont) <> "" Range("K" & Cont).Select Application.WorksheetFunction.Vlookup Range("H" & Cont), Worksheets("Sheet2").Columns("A:B"), 2, 0 Cont = Cont + 1 Loop End Sub Vlookup.xlsm

Buenas tardes a todosacudo a ustedes para solicitar su ayuda como de costumbre ya que me he atorado con una rutina Tengo archivo "Problema" de la cual manejo básicamente las siguientes Hojas:Hoja1Hoja3Pretendo buscar el código del empleado de la Hoja3 columna "B", realizar la Búsqueda en la Hoja1 columna"A" y si se encuentray ademas en la fila donde se ubique, columna "F" sea mayor a 0 (Cero), copiarlo y realizar el pegado en la Hoja3 en la fila que corresponda , de lo que he desarrollado únicamente lo realiza con la columna de Horas Extras ,pero no se por que no lo hace con el resto de las columnas, espero haber sido explicito, GraciasLa macro lo puse en la Hoja3 prob…

Solicito de su ayuda tengo textos los cuales debo limitarlo a 80 máximo por celda, pero las lineas de textos iniciales son mayores a este limite y lo que busco es que en la segunda celda me concatene el faltante de la celda 1 mas la linea de la celda 2, pero que la suma no sea mayo a 80 caracteres que se cumpla sucesivamente. hasta volver el texto al limite que se debe dejar. deje una formula como ayuda pero al hacerla mas adelante no me da me falla. Ayuda excel.zip

Sigo liado con algunas dudas sobre listbox, ya en una duda anterior sonre añadir item a listbox me ayudaron y puede silucionarla en el siguiente link https://www.ayudaexcel.com/foro/macros-programacion-vba-10/agregar-items-nuevos-listbox-userform-31424/ En estos momentos tengo dos problemas: 1. No consiguo ordenar el listbox automaticamente por orden alfabetico al añadir un item nuevo. 2. Intento eliminar un item de dicho listbox pero no consegui que se elimine definitivamente de la hoja de donde pilla los datos, solo consigo eliminarlo del listbox. CommandButton1_Click() If ListBox1.ListIndex > -1 Then 'si se ha seleccionado algo Cells(ListBox1.ListIndex + …

Hola amigos, tengo una inquietud le he matado la cabeza pero no he podido 1-en la hoja de registros hay tres datos, pueden haber x cantidad de datos 2-la macro cogería el primer dato de la hoja de resitro y la pasara ha esta hoja 3-3- luego empezara hacer el recorrido por la hoja Db y con el primer registro ya tomado empezara a sumar en su caso o le restara en su caso hasta que la suma de Cero o se aproxime a cero 4- copiara los registros que sumo de la hoja Bd a sta hoja de suma 5-los datos ya sumados no se pueden repetir dos veces saludos Suma inteligente.zip

Hola tengo un archivo en el que tengo bastantes formulas y para que no las modifiquen tengo protegida la hoja con un macro, esto me permite trabajar únicamente sobre las celdas que no están protegidas, me permite usar filtros. Lo que no he logrado conseguir es que a pesar de esta condición me permita insertar comentarios en la celdas no bloqueadas, esto es para cuando necesito agregar algún comentario extra a la información que va en la celda. Lamentablemente el tamaño de archivo es bastante grande para poderlo adjuntar pero les comparto el código para ver si me pueden ayudar diciéndome que tengo que agregar para al codigo para que me me permita la accion arriba menciona…