Hola a todos! Espero alguien me pueda ayudar. Tengo el siguiente código pero al ejecutarlo coloca la formula con referencias fijas (con signo $) si quisiera que fuera relativa para poder copiar y pegar ¿cómo puedo cambiar el código para que la celda sea relativa o fija? ¿Alguna idea? fil = ActiveCell.Rows.Row Selection.FormulaR1C1 = "=(R" + Trim(Str(fil)) + "C4*8)" Muchas gracias.

Buena Tardes les escribo por la siguiente duda. Estoy construyendo una macros, para enviar datos de UserForm en excel a word, todo funciona perfectamente. excepto la validación de un texbox en el formulario, los cuales estan agrupado en unos frame. al precionar la tecla enter, en un texto en blanco lanza un mensaje de error, pero al ir al ultimo texbox de cada frame, no realiza la validación y simplemente pasa al otro texbox les adjunto mi archivo para dejarlo todo mas claro prototipo_luminaria.rar

Hola de nuevo compañeros, ¿Cómo puedo hacer para mostrar toda la información contenida dentro de un array en un sólo cuadro MsgBox? Tengo el siguiente código de pruebas con dos opciones disponibles, pero ninguna de las dos funciona: Sub pruebas() ' Declaramos las variables... Dim miArray() As Variant miArray = Range(Cells(2, 1), Cells(2, 8)) ' Opción 1: ' MsgBox Join(miArray(1, 3), vbCr) ' Opción 2: For i = 0 To UBound(miArray) msgString = miArray(i) & vbCr Next i ' Mostramos el contenido del array... MsgBox "Los valores del Array son los siguientes: " & vbCr & msgString End Sub

Hola! Necesito crear alrededor de 120 libros, los cuales deben contener dos hojas cada uno. Dichas hojas son extraídas de dos libros diferentes. Lo que estaba haciendo era crear, a partir del "libro 1", un archivo por cada hoja que contiene dicho libro, usando una macro. Luego, abría cada uno de esos archivos y movía, manualmente, la hoja que les correspondía del "libro 2". Es importante mencionar, que tanto el "libro 1", como el "libro 2" contienen 120 hojas, las cuales pertenecen a cada nuevo archivo. ¿Existe alguna forma de crear los 120 archivos de forma automática? Desde ya agradezco cualquier información que me puedan aportar.

Hola, quisiera saber si pueden ayudarme hacer una macro que cree una carpeta con el nombre del cliente (celda C6) y dentro de esta carpeta que guarde la hoja (NOTA_DE_TRABAJO) con el numero de la (celda F2) y la fecha del día, quisiera que se guardara en el disco duro "E" en la carpeta "Notas", y al guardar quedarme en la hoja activa (CALCULADOR). Esta macro la copie de internet pero no se modificarla. EJEMPLO: Sub guardar_Click() Range("A1").Columns.Hidden = Not Range("A1").Columns.Hidden Dim wb Dim ruta, carpeta, libro, texto As String ruta = InputBox("E:\notas") 'ruta = "E:\notas" carpeta = ActiveSheet.Range("C6").Value libro = ActiveSheet.Range("F2").Value…

Hola a tod@s, agradecería mucha que me ayuden, debo hacer una planilla que calcule el material que se ocupara en la fabricación de un pedido de cortinas, principalmente la tela, la cual necesito saber cuantos metros lineales se ocuparían por cada tela del pedido. Les explico como funciona, solicitan medidas de cortinas, ancho x alto y debe elegir el tipo de tela (entre otras cosas). Teniendo estos 3 cosas fundamentales, ya deberíamos poder calcular la cantidad de tela a utilizar. Teniendo en cuenta que los rollos de telas miden 2.8 mts por 30 m de largo, si hay 2 o más medidas (ancho de cortina) si la suma de sus anchos sume igual o menor a 2,8 m, solamente se considera e…

hola, no encuentro la forma de completar textbox de un userform en vba excel desde sql server por favor ayuda gracias

Buenas noche amigos me gustarian que me den una ayuda he encontrado en el internel un código para extraer imágenes a excel desde una carpeta pero quiero mejorar. La idea es; tengo una carpeta de imagenes y quiero desde excel digitar el código (código de la carpeta origen) en una celda "A2"que tiene un combobox y que la imágen aparezca en la "B2" con dimensiones predeterminadas y al digitar el siguiente código en la celda "A3" se cargue la imágen en "B3" y así sucesivamente porque quiero mandar esto por un correo. Le adjunto el archivo para que ayuden amigos. Gracias por su tiempo Demo2.0.xlsm

Buenas noches quisiera pedir su ayuda ya que tengo un archivo de excel con aproximadamente 1000 registros. En la columna "C" tengo datos los cuales deberían estar concatenados, sin embargo, estan dispersos, por ejemplo, la celda C1 dice HOLA, la celda C2 dice SOY y la celda C3 dice JUANITO, el resultado que quiero lograr es HOLA SOY JUANITO en una sola celda a partir de donde empieza la palabra HOLA. No importa que queden celdas vacias debajo de cada cadena concatenada. Adjunto un archivo donde se puede ver un ejemplo de los datos que tengo. Agradezco su apoyo. Prueba.xls

Hola, quisiera que me ayudaran diciendome como o cual es el codigo para imprimir un formulario de visual basic con los datos ya escritos, la idea es que de la instruccion de imprimir y la persona que llene el formulario escoja la impresora. Espero que me puedan ayudar ya que no soy muy experta en esto Muchas gracias

Buenas tardes; soy nueva trabajando con macros y tengo una hoja llamada Buscar datos (hoja1)que tiene el combobox1 y necesito que al darle click al combo me cargue los datos de la hoja cooperativas (hoja2) del rango a7;a30 sin repetirme datos o mostrar espacios en blanco ya que en esta columna existen varias veces los mismos nombres o hay celdas vacias. Agradeceria de antemano su ayuda! Copia de Control de Cooperativas.xls

Hola amigos mesecito una ayuda con una macro que estoy relizando para enviar mensajes masivos por WHATSAPP usando el excel, tengo una archivo hoja 1 donde en una celda en mi caso E4 tengo una formula donde esta concatenado el mensaje que quiero enviar. y la macro la estoy extructurando de esta manera Mensaje = Hoja1.Cells(i, 5).Value ThisWorkbook.FollowHyperlink "https://web.whatsapp.com/send?phone=%" & NumeroTelefono & _ "&text=" & Mensaje & "&app_absent=1&send=1" que sucede con el mismo me da un error '-2146697208 (800c0008)' en tiempo de ejecucuón: No se puede des…

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 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

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

Buenos días! Amigos estoy buscando una solución que me permita enviar un correo en nombre de otra cuenta, en lo que he logrado leer es posible, la siguiente instrucción trabaja bien, pero al momento de intentar agregar .AddAttachment "C:\Users\jballadares\Desktop\Comprobante.pdf", me salta el siguiente error (imagen adjunta), podrían ayudarme como resolverlo de forma que me permita adjuntar un documento : Sub SendEmailOnBehalf() Application.ScreenUpdating = False Application.DisplayAlerts = False Dim olMailItm As Outlook.MailItem Set olMailItm = Outlook.CreateItem(olMailItem) With olMailItm .SentOnBehalfOfName = "Boletarecolectores@do…

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…

Quisiera saber como puedo hacer para que en un userform me aparezca en una casilla tres valores hallados en la hoja excel y además que grafique una gráfica de barras de dos de esos valores. macrocontar.xls

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....

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…

Hola a Todos, tiempos sin escribir, pues realmente el diseño de la aplicación de formularios de excel esta funcionando perfecto, pero a hoy por la cantidad de información y un numero mayor de usuarios me veo en la necesidad de realizar una conexión a una base de datos externa, he leido algo y se puede hacer con ADO para un libro de excel aparte como base de datos o por medio de una base de datos en acces en realidad este tema hasta ahora lo empiezo a descubrir, y en realidad me cuesta demasiado trabajo comprenderlo, pues en este foro he encontrado algunos, ejemplos al respecto pero no he podido lograr implementarlo en mi archivo, pues no están como bien documentados y ex…

Buenos Días, Como puedo hacer para limpiar mi tabla dinámica sin necesidad de hacerlo uno por uno. ActiveSheet.PivotTables("Tabla dinámica1").PivotFields("Producto").Orientation _ = xlHidden ActiveSheet.PivotTables("Tabla dinámica1").PivotFields("Mes").Orientation = _ xlHidden ActiveSheet.PivotTables("Tabla dinámica1").PivotFields("Departamento"). _ Orientation = xlHidden ActiveSheet.PivotTables("Tabla dinámica1").PivotFields("Promedio de ISRed"). _ Orientation = xlHidden[/CODE] Espero su ayuda Gracias.

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 alguien sabe como insertar calendario desplegable en excel 2013

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.