Buenos días, A ver si alguien me puede ayudar con esta macro : Lo que necesito es poner la ruta que hay + todas las subcarpetas que hay después de \2019 Pedidos\..... y no se como hacerlo, Gracias de antemano Sub Proceso_hipervínculo_al_pedido() Ruta = "\\192.169.11.18\RecursosCompartidos\ADMINISTRACION-VENTAS\Interdepartamental\2019 Pedidos\" parte = ActiveCell.Value Set fso = CreateObject("scripting.filesystemobject") Set carpeta = fso.getFolder(Ruta) For Each archivo In carpeta.Files If archivo.Name Like "*" & parte & "*" And Right(archivo, 3) = "pdf" Then Shell "C:\Program Files (x86)\Adobe\Acrobat D…

Buenos días, Amigos del foro hace unos días JSDJSD me comentaba sobre la herramienta libre llamada Custom UI Editor for Microsoft Office la cual me di a la tarea de investigar un poco el tema, compartiendo el esquema creado hasta el momento: <customUI xmlns="http://schemas.microsoft.com/office/2009/07/customui"> <ribbon startFromScratch="false"> <tabs> <tab id="customTab" label="FacturacionJB" insertBeforeMso="TabInsert"> <group id="customGroup" label="NN Holding Solutions"> <button id="customButton1" label="Buscar" size="large" onAction="MI MACRO" image="images" screentip="permite buscar la cantidad …

Buenas tardes; Estoy intentando sacar por vba la fecha de captura o la fecha que aparece en un explorador ( Windows ) de unas fotos pero no lo consigo. Los datos que saco son: La fecha de creación. ( .DateCreated ) La fecha de modificación. ( .DateLastModified. ) La fecha del ultimo acceso. ( DateLastAccessed ) y ninguna de esas fechas es ( adjunto pantallazo en el Excel adjunto de las fechas que salen en el explorador ). alguien sabe como lo puedo sacar??. muchísimas gracias. Libro2.xlsx

Buenas tardes, Es posible hacer que un combobox (combobox1) dependa del valor de un textbox (textbox1) y que a su vez otros textbox dependan del textbox 1 y del combobox1? Es decir si yo en el textbox1 pongo al socio 10728, que el combobox1 me recoja las entradas de este socio, “Un viaje inesperado” y “Hotel Transilvania 2” y que si elijo, por ejemplo “Hotel Transilvania 2”, me realice la búsqueda en el resto de textbox?. Muchísimas gracias. Saludos, Drosophila FORMULARIO.xls

amigos tengo una duda......... tengo la siguiente macro. Private Sub Worksheet_Change(ByVal Target As Range) Application.ScreenUpdating = False On Error Resume Next foto = Range("b1").Value ActiveSheet.Image1.Picture = LoadPicture("D:\FOTOS SISTEMA\" & foto & ".jpg") With ActiveWindow.VisibleRange Image1.Top = .Top + 5 Image1.Left = .Left + .Width - Image1.Width - 45 End With End Sub me ejecuta muy bien........ solo que cuando no esta la foto...... me carga la anterior...... lo que quiero es que cuando no este la foto me muestre el cuadro gris..... ... que se puede hacer...... mil gracias......

Buenos días, soy nuevo en el manejo de macros. quisiera que me ayudaran identificando donde esta el error en el procedimiento, ya que me saca el siguiente error: Se ha producido error "1004" en tiempo de ejecución. no se puede obtener la propiedad VLookup de la clase Worksheetfunction; sin embargo la macro se ejecuta correctamente. la instrucción es: Private Sub ComboBox4_Change() Dim Horacita As String Dim Rango As Range Set Rango = Sheets(5).Range("A2:B174") Horacita = Application.WorksheetFunction.VLookup(Me.ComboBox4.Value, Rango, 2, 0) HoraProgramada = Horacita End Sub Cuando le pido que depure me señala el texto resaltado en rojo, pero no encuentro el erro…

hola a todos y todas soy nuevo en el foro y cree la cuenta por varias consultas pero por sobre todo por el siguiente: he visto en otros temas relacionados posibles soluciones a que no se pueden ver los controles adicionales en excel y digo excel en general porque lo he intentado con el 2003 2007 y el 2010; aun no con el 2013, de instalar por ejemplo MSCAL.OCX o de hacer clic derecho en la sección blanca sin control en la sección de formulario , también están marcadas todas las primeras 5 opciones en herramientas-referencias, ademas como dije antes lo hice con todas las versiones de office y ninguna funcionó. ademas hice que se ejecutara todo desde el PC reinstalando ca…

buen dia. tengo una duda, en un archivo de excel como puedo programar para que al dar clic a un boton me pida usuario y contraseña ya tengo todo el desarrollo echo solo me falta esa parte. Alguien puede ayudarme??? muchisimas gracias....

Cuando ingreso el siguiente código html en el diseño de mi pagina web obtengo un Boton de Enviar (coloco datos de ejemplo), lo que quiero es replicar ese funcionamiento pero en excel, es decir insertar un botón en excel y que al dar clic me abra la url tal cual lo hace el boton insertado en mi pagina. <form method="post" action="https://sandbox.checkout.payulatam.com/ppp-web-gateway-payu/"> <input name="merchantId" type="hidden" value="508029" > <input name="accountId" type="hidden" value="512321" > <input name="description" type="hidden" value="Test Pago" > <input name="referenceCode" type="hidden" value="TestPago" &…

Hola de nuevo, quería saber si en la instrucción CopyToRange habría la posibilidad que copiara sólo valores y mantuviera el formato de la hoja destino siempre igual. Gracias

Hola, Tengo un libro que uso como base de datos en un hotel. En la Hoja1 registro todos los datos relativos a reservas, entradas, salidas, facturación, etc., y en diferentes hojas resumo algunos datos de la BD conforme a determinados criterios para obtener distintos tipos de estadísticas. Inicialmente usé fórmulas para los resúmenes, pero el proceso de cálculo ralentizaba el funcionamiento del libro, por ejemplo al abrirlo. Entonces decidí grabar las fórmulas en una macro en combinación con el evento Worksheet_SelectionChange(ByVal Target As Range), lo cual agilizó considerablemente el proceso pero me obliga a clickar/seleccionar la fecha en el calendario para que l…

Hola a todos.Estoy realizando un formulario donde pueda hacer mantenimiento a pedidos, productos, clientes entre otros. Ya encontré la solución para el listado, pero para agregar, editar y eliminar datos tengo una idea poca clara debido a que si se agrega uno o mas datos se debería hacerse consecutivamente(1 a n datos), si se edita debería editarse solo con los datos editados(1 a n datos) asimismo al eliminar debería hacerse solo con los datos que quisiera eliminar(1 a n datos) en mi formulario.Lo que deseo es que se optimice en rapidez y tamaño de archivo excel los mas que se pueda si se llega a utilizar una gran cantidad de datos.Les dejo el comprimido donde esta el arc…

Buenos días. Estoy intentando aplicar un formato determinado a tres texbox distintos en mi formulario de Alta Proveedores. Utilizo el siguiente código: TextBox2 = Format("# - ##.###.###") ' aplica formato C.I.F. X - 00.000.000 TextBox3 = Format("# - ##.###.### - #") ' aplica formato N.I.E. X - 00.000.000 - X TextBox4 = Format("##.###.### - #") ' aplica formato D.N.I./N.I.F 00.000.000 - X Pero no lo hace, alguien podría aclararme un poco. También me hago la pregunta de si el hecho de que los formatos lleven letras influye a la hora de realizar el código. Un saludo IVA.rar

Hola, espero que me puedan ayudar, estoy haciendo un filtro con varios criterios variables, el tema es que cuando una de las celda esta vacia lo filtra como vacia y lo filtra asi. yo quiero que si esta vacia no filtre nada esa celda les paso lo que hice, no se como agregar if then. bueno si alguien me puede dar una mano porque estoy desesperado!!!!!!!!!!!! Sub filtro() Sheets("Importar").Select Range("A1").Select If ActiveSheet.FilterMode Then ActiveSheet.ShowAllData Range("$A$1:$T$100000").AutoFilter Field:=1, Criteria1:=">=" & [shipto_inicio], Criteria2:="<=" & [shipto_final] Range("$A$1:$T$100000").AutoFilter Field:=2, Criteria1:=">=" & …

Estimados amigos del foro, con el apoyo de los expertos de Ayuda Excel he podido avanzar a realizar un formulario para seleccionar preguntas manualmente y luego de escogidas poder enviar a la hoja para realizar la prueba de examen. Esta ultima parte no he podido hacer que me Funcione. Por lo tanto acudo nuevamente a sus nobles conocimientos. Expongo el funcionamiento del archivo que subo. Al activar el formulario se escogerá las preguntas que se desea aplicar en el examen Luego pinchamos en el botón seleccionar, y se observara que otro formulario nos muestra lo seleccionado y también las opciones A, B, C y D ademas de la Respuesta Correcta que están en listboxes . El b…

Estimados del foro. Tengo un requerimiento puntual y estoy empantanado en el proceso del tipo importación de datos. Para el caso debo importar los datos desde unas tablas Paradox 5, y estos datos luego clasificarlos y graficarlos. el una planilla dependiendo el cliente seleccionado, todo con macros y automatico. La idea es conectar las tablas, generar la consulta y extraer los datos resultados, que es como indique, el proceso a resolver.. ¿Alguien puede guiar a este humilde servidor?. Muchas gracias

Estimados amigos buenos días, Por favor, alguien me puede dar una mano la siguiente cuestión: Tengo un xml que tiene el campo nodo llamado <adicionales> </adicionales> mismo que tiene campos nodo hijos <tagadicionales nombre"Apellido"> </tagadicionales> <tagadicionales nombre"Nombre"> </tagadicionales> <tagadicionales nombre"Numero"> </tagadicionales> Mas o menos así: <adicionales> <tagadicionales nombre="Apellido">Turanga</tagadicionales> <tagadicionales nombre="Nombre">Leyla</tagadicionales> <tagadicionales nombre="Numero">172349…

hola que tal compañeros estaba trabajando en Excel modificando un código de un formulario y todo iba bien asta que salí de Excel y volví entra para continuar el trabajo y me encuentro con este error

Hola a todos: ¿ Podría alguien explicarme porqué no se carga el combobox de la hoja RUTAS al abrir el libro ? La carga del combobox esta condicionada a que se dispare el evento Activate de la hoja RUTAS, cosa que fuerzo en el evento Open del libro. Si después de abrir el libro, seleccionamos la hoja BASE DE DATOS y luego la hoja RUTAS de forma manual, entonces si carga el combobox. Estoy harto de usar este sistema para llenar los combobox/listbox en las hojas y nunca me había pasado esto. No busco alternativas, que las hay, busco el porqué. Gracias y saludos Copia de Reporte.zip

Buenas noches, gusto de saludarles. He estado revisando los diferentes aportes pero no he encontrado, lo que realmente necesito. Por ello es que solicito vuestra comprensión y ayuda. Requiero de una macro que: Liste los archivo de la carpeta que seleccione, y de todas las sub carpetas que contenga esa carpeta, y que obtenga los datos que indico en la cabecera: Nombre del archivo, ruta, carpeta, extensión o tipo, y los muestre en una hoja según el archivo. PD.: la carpeta se debe escoger en una ventana similar a la imagen que muestro en el archivo adjunto. Gracias anticipadas por la atención Callao2908 Listar carpetas y archivos.xls

Buenas, Tengo una macro, la cual me envía los correos y su adjunto, pero a la hora de adjuntar el archivo, tengo que ir uno por uno. Hay un botón que me lleva a la carpeta y selecciono el pdf, luego en la casilla de alado se escribe la ruta del archivo. Como podría hacer para traerme cada documento a la persona que corresponde con macro? Copio la macro '***Macro Para enviar correos Sub correo() 'Por.Dante Amor col = Range("H1").Column For i = 2 To Range("B" & Rows.Count).End(xlUp).Row Set dam = CreateObject("outlook.application").createitem(0) dam.To = Range("B" & i) 'Destinatarios dam.CC = Range("C" & i) 'Co…

Hola amigos tengo ya un buen de tiempo tratando de solucionar este detalle que tengo con una macro que busca datos por fecha y texto, les dejo el archivo con las instrucciones necesarias para su análisis y espero contar con su ayuda. gracias https://mega.nz/#!XMRR0KwJ!XTEuNYjMjwzv79l1OmOn9P9PSi_bPx8U8fSAevHrxyw

Buenos días,Amigos(as) quisiera solicitar la ayuda a mi problema, estoy intentado crear un formulario que contiene 2 listbox, pero necesito que el resultado de la columna# 3 se exprese en formato hora(hh:mm) en cada listbox para mi ejemplo serian 2.Agradezco la ayuda que me puedan dar.Saludos Jose Consulta foro.xlsm

Hola. Estoy empezando a investigar en el mundo de los formularios pero parece que no se me da muy bien. Os explico. Tengo un Formulario con tres grupos de diez TextBox cada uno. Lo que necesito es, mediante el boton "REGISTRAR", introducir los datos de los TextBox en diferentes columnas de la hoja "Aux". Ejemplo : Textbox LR01 a la celda A2 Textbox LR02 a la celda A3 ... Textbox LP01 a la celda D2 Textbox LP02 a la celda D3 ... Textbox LE01 a la celda G2 Textbox LE02 a la celda G3 ... Lo no consigo hacer es una macro que me recorra todos los TextBox del formulario y que si éste contiene datos me los lleve a su celda correspondiente de la hoja "Aux". En el adju…

Buenos dias Quisiera saber si alguien me puede explicar la razon por la cual aparece el sigiente error cuando ejecuto una macro de userform: Run time - Error '457': this key is already associated with an element of this collection. Como lo mencione el problema surge es en formularios, pero no me dice a cual linea pertenece el error, y por lo que logro evidenciar es que existe un conflicto entre estos dos formularios ya que al ejecutar uno de estos, el otro ya no se puede ejecutar y la unica forma de que vuelvan a funcionar es desde el codigo.