Estimados masters de masters: Queria preguntarles sobre una duda existencial que tengo con respecto a conexiones ADO: ¿Es posible conectar excel atravez de conexiones ADO a una base de datos que está en dropbox y que es pública? Por ejemplo cuando conecto una bd que esta en mi computador la conexión seria asi : With cnn .Provider = "microsoft.jet.oledb.4.0" .ConnectionString = "data source=" & ThisWorkbook.Path & "\base1.mdb" .Open End With he intentado cambiar el data source introduciendo un link de dropbox que es público pero no me conecta: With cnn .Provider = "microsoft.jet.oledb.4.0" .ConnectionString = "data source=https://dl.dropboxusercontent.c…

Hola amigos Quisiera que me ayuden para crear un macros en donde se pueda ingresar datos y generar un reporte con los últimos datos que se ingresaron, con la hora y fecha. estoy adjuntando un ejemplo de como seria. Muchas Gracias PRUEBA.rar

Hola Equipo Excel, Quiero sber como puedo darle un tiempo limite a un libro excel que al caducar el tiempo se cierre o te pida una contraseña; y asi cada vez que la abra.. Gracias de antemano

Hola amigos, queria que me echasen una mano con este problema. Tengo datos en las 7 columnas seguidas desde B hasta H, pero quiero que se oculten en funcion de los valores que haya en las 7 celdas de la K10 a Q10. Si la celda tiene un numero no tiene que ocultar nada. Si la celda esta vacia tendra que ocultar a la columna correspondiente de su orden. Es decir, si K10 esta vacia se oculta la columna B; si es L10 se oculta la columna C, la M10 oculta la D; la N10 oculta la E; la O10 oculta la F; la P10 oculta la G y la Q10 oculta la H. Como los datos de las celdas K10:Q10 cambian con cierta frecuencia me gustaria que se ejecutara la macro de forma automatica. Muchas g…

Hola a todos. Tratando de terminar mi proyecto me encontré con un lindo problema. Hace unos meses pasé los valores nutricionales de carbohidratos, proteínas y lípidos de una pagina que tiene un vademécum de la mayoría de los alimentos que hay en el mercado argentino. La cuestión es que a medida que fui realizando mi proyecto me di cuenta que no era suficiente con esos datos que tenia y que necesitaba la totalidad de los valores nutricionales de cada alimento. Los alimentos que pase fueron 1550 aproximadamente, lindo trabajito... Investigando un poco me di cuenta que me podría haber ahorrado ese trabajito realizando una macro. Bueno, vayamos al problema real... Lo qu…

Buenos días Recurro como siempre a su ayuda para lo siguiente. Lo que necesito hacer es una macro para que al guardar el archivo me haga una validacion de la columna E, indicando que no pueden dejar en blanco E4, E5, E6 y E8, etc,. Que obligatoriamante los deben seleccionar de la lista, y poner en color rojo las celdas que hacen falta por llenar este dato y no me permita guardar el archivo. Agradezco la ayuda. subo archivo de ejemplo, gracias. Validacion antes de guardar.rar

Hola, He planteado este tema en otro ya cerrado, lo vuelvo a subir. Tengo un listado de 7.000 líneas y necesito eliminar aquellas cuya suma sea 0. He intentado adaptar una macro, y funciona, pero solamente con las columnas que se ponían de ejemplo. En mi caso son 11 columnas y no he sido capaz. Adjunto las cabeceras. El subtotal lo incluyo en el debe y haber para cambios en la columna "proveedor". Saludos Cabeceras.xls

Saludos a Todos, Tengo mi trabajo listo, pero se me presento un problema, le presento el problema: un ejemplo chico,lo programe para me realice cálculos ,cada 2 celda un valor, pero en la Columna A están por grupo y en la columna H me calcula algo así: A ; H ac-1; ac-1; 2 ac-1; ac-3; 3 ac-3; ac-4; 1 ac-4; ac-4; 3 ac-4; lo que necesito que cambie cuando apararesca otro grupo en lista en la columna A ,que realize los cálculos cada 2 celdas en la columna H,algo así me quedaría: A ; H ac-1; ac-1; 2 ac-1; ac-…

Buenas Tardes Tengo un problema El archivo que tengo la fila 2 siempre esta vacia quiero eliminarla despues de eso ordenar la columna P de manera Acendente al momento de hacerlo con mi macros normalmente primero se tiene q eliminar la segunda Fila despues Ordenar pero cuando la ejecuto forma 2 filas en blanco despues de esas lo ordena la columna P no hace mas... aparte de ello el archivo es un BD que algunas veces cuando exporta los datos a un libro se distorcionan algunas celdas se identifico que es apartir de la celda P por eso depues de ordenar lo que se tiene que hacer es los 2 datos que distorcionan (P4:Q4) que deberia ser si todo funcionar bien (P2:Q2) eliminars…

hola necesito un codigo que me liste las propiedades de una celda en access tenia algo parecido a esto para las porpiedades de un fomulario, algo como si dim pr As Property For Each pr In Me.Properties Debug.Print pr.Name; "="; pr.Value Next [/CODE] necesito algo parecido pero para las propoedades de una celda en excel grcias

Hola , Quisiera hacer una macro que copie lineas de cada pestaña en una resumen (nueva), claro es que en cada pestaña las lineas estan en diferente renglon, no cambian las columnas, solo la ubicacion de cada renglon inicial, y al pegarse se vayan colocando en la pestaña resumen (creada) . Ya he tratado , pero cada pestaña tiene diferente tamaño de numero de lineas a pegarse y no todas estan en el mismo renglon inicial. En cada pestaña se enlistan los titulos, son 2 titulos que se repiten (osea dos reportes), pero si nos basamos en la la celda A6 el titulo "Num. Recibo" es el titulo del primer listado de lineas, pero busco que copie las lineas que siguen del segundo ti…

Buenas tardes amigos! Necesito de su valiosa ayuda para la solución a un problema que estoy presentando con un código, En resumen, tengo dos hojas en el libro, una llamada DATA y la otra GESTION, cuando ejecuto el siguiente código me lanza el error "No se puede obtener la propiedad SumIfs de la clase WorksheetFunction" Sub test() Dim rango As Range Data.Select Set rango = Range(Range("A6").Offset(0, 14), Range("A6").Offset(0, 14).End(xlDown)) Gestion.Range("O7") = Application.WorksheetFunction.SumIfs(rango, Data.Range("K6:K60000"), "manzanas", Data.Range("A6:A60000"), "verde", Data.Range("B6:B60000"), "casa", Data.Range("C6:C60000"), "peru") End Sub[/CODE…

Podrian ayudarme a solucionar este problema al copiar y pegar me da problemas con vba Fecha.xls

Bue dia, necesito modificar la macro que se detalla a continuación, en el trabajo nos migraron de Groupwise a Outlook y la persona que la realizo no está más. Option Explicit Private ogwApp As GroupwareTypeLibrary.Application Private ogwRootAcct As GroupwareTypeLibrary.account Sub Email_Multiple_Users_Via_Groupwise() 'Macro purpose: To stand as a self contained procedure for creating and 'sending an email to multiple users (if required) 'This code requires: ' -A reference to the Groupware Type Library ' -The following 2 lines declared at the beginning of the MODULE: ' Private ogwApp As GroupwareTypeLibrary.Application ' Private ogwRootAcct As…

Ola Masters. Me preguntaba si existe forma de abrir otro archivo de excel, cuando se tiene un formulario ya ejecutado del excel y a la vez abrir otros archivos de excel, sin que me presenten conflictos. Mil Gracias SALUDOS....

Buenos dias!!.. Necesito colocar saltos de página de una hoja , donde la condicion para hacerlo es segun un filtro con varias posibilidades.....que al terminar de encontrar el texto "javier" en la columna con filtros coloque un salto de paginas, y asi sucesivamente hasta pasar por todos los contenidos de la columna con filtro ejemplo: colA ColB (con filtro y ordenado por alfabeto) 100 Javier 203 javier ............................aqui insertar salto pag 20 mario 49 mario 60 mario ............................aqui insertar salto pag 20 Luis ya probe una macro borrando prime…

buenas e visto muchos vídeos por youtube y estoy realizando un pequeño cuadro de inventario rápido y sencillo, tomando el patrón de uno de los vídeos que e visto e diseñado uno me funciono, pero lo personalice como:les explicotengo 4 pestañas de las cuales 3 las voy a manejar yo y la otra es para que mis empleados lo vean pero no modifiquen nadaen la pestaña producto tengo un botón que con el puedo ingresar datos y le dije a la macro que los quería que se alojaron en la pestaña principio, entrada y existencia eso esta bien no tengo problemas; mi problema es que no quiero que en la pestaña principio me aloje los resultados a partir de la celda A1, sino a partir de la celda…

Hola amigos Agradezco anticipadamente a quien me pueda ayudar o asesorar en este tema. Tengo un archivo que me toca enviarlo 1 vez a la semana a unas 10 personas de sus ventas y de sus clientes o tiendas a cargo. Necesito enviar un solo archivo que cuando lo abran les toque colocar un usuario y contraseña y que eso permita que solo puedan ver sobre el filtro de la tabla dinamica. Opcion Coordinador. para cada uno de los coordinadores y no puedan ver lo de los demás coordinadores. Gracias Usuarios Contraseñas INFO.xlsx

Hola estimados. Tengo una tabla en la cual realizo diferentes acciones desde un formulario, en este punto pretendo filtrar a travez de un CheckBox desde un formulario 3 campos de una columna, esto lo he logrado con el siguiente código Private Sub rojo_Click() If rojo.Value = True Then ActiveSheet.Range("$A$4:$Q$19").AutoFilter Field:=3, Criteria1:="rojo" Else ActiveSheet.Range("$A$4:$Q$19").AutoFilter Field:=3 End If End Sub Private Sub CheckBox29_Click() If CheckBox29.Value = True Then ActiveSheet.Range("$A$4:$Q$19").AutoFilter Field:=3, Criteria1:="amarillo" Else ActiveSheet.Range("$A$4:$Q$19").AutoFilter Field:=3 End…

Necesito de su ayuda quisiera cambiar este título: “PUBLICACIÓN. . .”, por otro. Esto sucede cuando estoy exportándolo o convirtiéndolo a PDF una hoja de Excel. Aquí les dejo la MACRO: Sub Imprimir() If MsgBox("¿Estás seguro que deseas imprimir el archivo.?", vbQuestion + vbOKCancel, "HOLA") = vbOK Then MsgBox "Procediendo con la impresión del archivo. . .", vbInformation, "HOLA" MsgBox "Seleccione la ubicación o Directorio a guardar su archivo .PDF. . . !", vbExclamation, "HOLA" 'nombre = WorksheetFunction.Text(Now(), "dd-mmm-yyyy-O-hh-mm-ss") nombre = "HOLA" ruta = Application.GetSaveAsFilename(nombre, "Pdf,*.pdf", , "Guardar como") If ruta &l…

Estimados, Les presento mi problema que espero me puedan dar una guía de como resolverlo. Por temas de presentación en un reporte de excel tengo que poner una tabla dinámica bajo la otra tabla dinámica, el problema que tengo como es evidente es que el momento que quiero expandir la tabla dinámica superior no me deja por que no se puede superponer sobra la tabla dinámica inferior. Para solventar este problema quería aplicar una macro en VBA de excel que permita hacer lo siguiente: Encontrar el evento de la tabla dinámica que cuando de clic en el "+" para expandir la tabla dinámica lo primero que realice la macro se contar los hijos que contiene. …

Hola a todos de nuevo. Estoy intentando entrar a través de VBA en una página web. He conseguido el código a través un vídeo YouTube, que no pongo porque creo que no debo. Quiero decir que el código no es mío. Lo estoy intentando adaptar a mis necesidades pero me salta un error. El usuario lo pone bien, pero en el momento del password es cuando se detiene. No se si es que no estoy identificando correctamente los objetos de la página. Ruego si me podéis ayudar. Gracias de antemano. Sub EntrarScorpweb() Dim abrir_ie As Object Set abrir_ie = CreateObject("internetexplorer.Application") With abrir_ie .Top = 1 .Left = 1 .Width = 2000 …

Hola a tod@s Hay la posibilidad de extraer información desde la siguiente página web? https://autos.mercadolibre.cl/repuestos/soporte-motor Ingresar a cada anuncio y extraer el contenido según el archivo "PRUEBA"? Por ejemplo: -Ingresando a la siguiente anuncio https://articulo.mercadolibre.cl/MLC-471927238-soporte-lado-caja-mitsubishi-l200-4x4-2007-2015-_JM?quantity=1#position=1&type=item&tracking_id=d75e5bc0-7e51-41ea-8dab-47605e7b5896 Para extraer el contenido de "NOMBRE DE TIENDA" esta se encuentra en la sección "Información sobre el vendedor" en donde hay un enlace "Ver más datos de este vendedor" e ingresando al enlace se p…

Hola, buenas tardes me podrian ayudar con este proyecto. adjunto ejemplo Lo que necesito es que tengo en una base, datos concatenados en un hoja de excel y he logrado separarlo con split a unos textbox pero ahora me surgio la idea de ponerlos directamente en un listbox sin separarlos previamente. sera que me podria ayudar con el codigo. Salu2 Ejemplo Listbox concatenado.xls

Buenas noches!Amig@s del foro espero se encuentren muy bien! quisiera solicitarles el apoyo con lo siguiente, tengo un problema con el siguiente código (adjunto) con este lo que se pretende es insertar la formula buscarv en las celdas de las columnas(A,B,C,D,F) en base al valor de la lectura de código de barras (TxtCodigodeBarras_) del formulario (fmrfact) y este valor es colocado a partir del rango G16 hacía abajo. El ingreso de lector del código de barras parece trabajar bien, pero al querer insertar las formulas para traer los datos de este código solamente lo hace con la fila 16, los valores de la búsqueda se obtienen de la hoja BD.Código vba: Sub convertir() On E…