Hola un saludo cordial a todos..: acudo nuevamente a usted ya que no he podido resolver un inconveniente , tengo una carpeta de nombre "Estándar", la cual contiene 5 sub carpetas cada una de estas contiene un archivo, ademas tengo un código el cual me pasa los archivos como hipervinculos a otro excel que genero , mi duda esta en que al momento de pasar los hipervinculos solo se me pasan los archivos contenidos en la carpeta estandar pero si quiero agregar otro archivo de una subcarpeta , se pasa hipervinculo pero sin el nombre de la sub carpeta por ej : de nombre_carpeta1 me pasa esta dirección"C:\Users\"nombre_usuario"\ListaFinal\Estandar\"nombre_archivo" si agrego ot…

buenas, tengo un filtro que me funciona muy bien, pero tengo una pega, quiero insertar la fecha mediente un calendario que tengo en un userform no tengo problemas para insertar la fecha, pero el filtro no funciona pues como que parece que se vuela esta linea: Application.SendKeys (">=")[/CODE] para llamar al calendario uso esto [CODE]ElseIf Quien = 6 Then Range("C8") = Calendar.Value Range("C2") = Calendar.Value[/CODE] este es el codigo del filro [CODE]Private Sub Worksheet_Change(ByVal Target As Range) Z = Hoja2.Range("I500000").End(xlUp).Row If Not Intersect(Target, Range("C2:E2")) Is Nothing Then Hoja2.Range("A5:I" & Z).AdvancedFilte…

Hola, alguien me puede ayudar?? He definido una FDU, pero necesito otra, que de valores a una de las incógnitas de la FDU que he definido, hasta que el resultado de la FDU sea superior o igual a 0.85, y me devuelva el valor de la incógnita que hace cumplir que la FDU=>0.85. El valor que busco es el del parámetro S.(Ver función) Function FillRate(S, tipovar, param1, param2, r, r1, p) As Double Dim infinito As Integer Dim x As Double infinito = 150 FillRate = 0 For NSo = 1 To S x = S - NSo FillRate = FillRate + (fdL(x, tipovar, param2, r1, p) * ((FR(NSo, tipovar, param1, r, p) - FRde0(tipovar, param1, r, p)) / (1 - FRde0(tipovar, param1, …

Hola Buenas, necesitaria una macro que sustituyera a las formulas que hay en las columnas G (color verde) H (color amarillo) I (color azul) J (color marron) en base a los datos de C (color fuxia) Igualmente la celda E1-H-I-J 303. Subo libro. Salud2. MACRO PROMEDIOS FORO.xls

Buenas tardes Amigos tengo la siguiente consulta, tengo un archivo en donde si no se registran ciertos datos el no deja guardar o seguir llenando la información, pero cuando lo abro y no digito ningún dato y le doy guardar me sale la restricción y me dice que hacen falta datos, pero si omito este comentario y vuelvo a darle guardar me deja seguir. Igual sale al no diligenciar ciertos datos como la fecha de retiro la dejo en blanco y me salto la restricción y me deja guardar. no se por que al segundo intento me deja pasar. Gracias por la ayuda que me puedan brindar. Adjunto archivo. Formato Reporte Retiros Version 2.07.13.rar

Hola amigos os envío esquema por si me podéis ayudar. Es un fichero .xlsm aplicación Vba Excel con formularios y código. Se trata de compartir el libro para que dos usuarios puedan trabajar en una oficina aparte donde está el servidor. Dos problemas: Al empezar a trabajar cada usuario debe actualizar el libro. Utilizo el ThisWorkbook.Save. ¿Hay alguna opción más "liviana" ? He visto por algún sitio "ThisWorkbook.Refreshall. El otro problema es que cuando intentan guardar o actualizar al mismo tiempo genera un error. ¿Se puede tratar ese error para avisar a uno de los usuarios para que espere mientras el otro haga lo suyo. La gestión es corta porque se trata d…

Buenas a todo el mundo, Soy bastante nuevo en eso de la programación en VBA y excel. Estoy haciendo un archivo y necesito que cuando la hoja2 del libro esté abierta, el valor de una celda de la hoja3 me lo copie de una celda de la hoja2. En cambio, cuando la hoja2 esta ocultada necesito que la celda en questión me coja de una lista con validación de datos uno de los dos valores que tengo. Me he estado peleando pero no hay manera... Lo único que se me ocurre es copiar la hoja, pero después la put*da es que tendría que vincular todo lo otro por solo una celda... Alguien me puede ayudar? Muchas gracias

Hola, disculpen las molestias quisiera que alguien me apoye a programar una macro para resolver este caso. Se trata de generar una macro que me ayude a sustituir las x por la palabra que viene en la fila 1 y que corresponda con la columna por ejemplo la fila una se sustituyo por hola, la segunda seria por como y asi sucesivamente. Disculpen las molestias y excelente tarde sustituir.xls

Hola, Tengo una dificultad con un libro llamado Presupuesto de obras, el cual tiene barias hojas llamadas APU, donde se describen el Análisis de precios Unitarios de cada Item o Actividad, en este aparecen cantidades de materiales por unidad, la idea es que mediante una función o macro, calcule los valores de las celdas Cantidad/rend X cantidad del item y luego muestre el resultado total en la tabla Materiales, mas detalles en el Libro anexo en la actualidad, en la tabla materiales hace el proseso pero al verificar la operacion manual no da coincide con el resultado del macro, si por fabor me pueden ayudar a corregirlo. gracias Presupuesto de Obra 2.zip

Buena tarde como podrian ayudarme, necesito bloquear celdas pero despues de haberle ingresado manualmente datossaludos y mil gracias por el apoyoson diferentes celdas que necesito bloquear por lo que subo un archivo de ejemplo ya que el real es demasiado grandepero pongamos como ejemplo bloquear las celdas de las columnas a,f,h,i,j,k,l y las celdas 13 para abajo pero que se pueda ingreasar a la primera vez y que ya al segundo intento muestre un error de aviso pero que se haga con una contraseña para que solo un admin lo pueda ver y modificar mil gracias - - - - - Mensaje combinado - - - - - EL ARCHIVO PERDON Bodega1.zip

Hola Buenas, necesitaria una macro que sustituyera a las formulas que hay en las columnas G (color verde) H (color amarillo) I (color azul) J (color marron) en base a los datos de C (color fuxia) Igualmente la celda E1-H-I-J 303. lo ideal seria centarlo todo en una solo celda,eliminado las columnas de las formulas,como esta el resultado final en las celdas H-I-J 303, a si descargaria al libro excel bastante al abrirlo. Subo libro. Salud2. MACRO PROMEDIOS FORO.xls

Hola buenas, de antemano agradezco la ayuda que me pudieran ayudar; Tengo un formulario en la cual puedo registrar mis compras a proveedor, pero la fila de datos es muy grande para verlo en un listbox, por lo tanto se me ocurre y he visto (pero no logre descifrar el código) que se puede seleccionar una celda y apretar un boton y se abra el formulario con los datos de la fila de la celda seleccionada. espero me pudieran ayudar gracias de antemano Libro1.1 (Autoguardado).rar

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 de nuevo, tengo una macro que intenta guardar una carpeta de mi C:\ en una carpeta de un servidor, la ejecuto pero no hace nada, está mal evidentemente pero ¿Qué está mal? Sub Mueve_fotos() Dim carpeta As String Dim fecha As Date fecha = Now(Format("dd-mm-yyyy")) carpeta = "\\179.29.84.35\Pub-Water-Jet\REGISTRO VISUAL\" Call Shell("explorer.exe " & carpeta, vbNormalFocus) Name "C:\Seat\Historico\" As carpeta & fecha End Sub[/CODE]

Buen día, solicito de su apoyo quisiera saber si se puede guardar una plantilla de Outlook como HTML desde VBA, actualmente tengo un código pero ese solo guarda la plantilla normal con la extensión .oft, espero me puedan ayudar. Gracias.

Buenas tardes, llevo dándole vueltas a una idea que se me ha ocurrido para hacer más eficientes las clases particulares de inglés que imparto. Tengo una colección aproximada de más de 3000 ejercicios, y claro, cada uno es un mundo diferente: dificultad, tema de gramática, respuesta... Mi pregunta es que si sería posible hacer una macro (no tengo ni idea de cómo empezar) que me permitiera hacer lo siguiente: En base a una base de datos u hoja de cálculo con los siguientes datos (código de referencia, enunciado/oración, respuesta 1, respuesta 2, dificultad y categoría), poder extraer aleatoriamente una cantidad determinada de entradas/líneas de una categoría o dif…

Hola Jovenes, Me gustaria me ayudaran a crear en una celda común y corriente de excel un combobox. ya que quiero buscar una lista de clientes tanto como lista como escribiendo el nombre y me parece que en una celda podria trabajar mas comodo que agredando un control. Nota: he buscado en el foro y no he encontrado nada al respecto. Saludos, y de antemano gracias por colaborarme. HS

Hola: Quisiera saber la línea de código que permite insertar en el cuerpo del mensaje enviado la imagen pegada en una determianda celda (por ej. L1). Saludos. Envio email cc.rar

Tengo una duda de, como podria hacer para agregar una linea nueva, con ciertas celdas con formato. Por ejemplo Cuando se agrega una fila nueva, teniendo en cuenta que en A revise cual es el ultimo valor agregado a la cotizacion y ahi se agregra una fila por ejemplo en 3,A bordes y negrita; en 3,B bordes; y en 3,C bordes, luego en d ,e ,f .. nada la finalidad es para agregar un item en una cotizacion, y tenidneo cuenta que en la 3,C debe de multiplicar b*precio; b = cantidad A B C D ... 1 2 3 4 . . .

Hola Gente!!!! necesito ayuda para un listbox, el mismo ya tiene un filtro pero quiero agregarle un boton para que me liste todo sin busqueda de referencia... gracias!!!! Filtro.rar

Hola, alguien me puede facilitar el código del "juego de memoria" en excel, que consiste en una tabla de 6 x6 casillas y hay parejas de números que no se ven, al pulsar cambia la casilla de color y se ve el número, entonces debes recordar donde está el otro igual, al encontrarlo ya quedan a la vista. Lo he visto por internet pero no consigo bajarlo. Muchas gracias

Buenas amigos de ayudaexcel. el presente es para solicitar su apoyo en la aclaracion de la siguiente duda. tengo 2 archivos de excel uno llamado "Reporte de bases de datos" de una empresa X generado por mi. Mientras que tengo otro archivo llamado "Control de Reporte semanal". en estos archivos tengo basicamente la misma informacion, solo que la informacion de "Control de reporte semanal" se va actualizando con el paso de los dias, y toda esa actualizacion debo ser enviada al archivo de "Reporte..." La situacion que se presenta es la siguiente: la informacion que se encuentra en el "control de reporte.." en la columna llamada UBICACION, deseo pasarla a la columna "G"…

Buenos días Comunidad AyudaExcel Anteriormente me habían ayuda con este archivo , es un recuento de comentarios para personas , se puede consultar dicha persona y luego se pueden ver los comentarios que tienen asignados , en ese "Userform4" ocupo asignarle dos botones uno de editar el comentario o de eliminar ese comentario; si notan lo que se carga es una "Listprinte". Gracias de antemano la ayuda. Clima.zip

hols tengo una macro que convierte a rtf masivo desde una carpeta. ¿quien sabe como poder modificarlo para que tome todos los documentos que estan dentro de un directorio incluyendo los subdirectorios y ualquier carpeta que haya dentro? Sub guachito() ' ' guachito Macro ' ' strRuta = "C:\Documents and Settings\is documentos\COMPILADO\" Set objFSO = CreateObject("Scripting.FileSystemObject") Set objFolder = objFSO.GetFolder(strRuta) Set objFiles = objFolder.Files Set WordApp = CreateObject("Word.Application") For Each objFile In objFiles If (objFile.Type = "Documento de Microsoft Office Word 97-2003") Then MsgBox ("Convirtiendo el archivo " + obj…

Buenas noches. Soy yo de nuevo. Estimados, en esta oportunidad quisiera por favor me orientaran sobre como incluir de manera automática la firma que grabé en outlook a los correos que me genera el archivo que anexo. El mismo lo utilizaré para enviar correos masivos. La ruta donde tengo la firma es: C:\Users\Administrador\AppData\Roaming\Microsoft\Firmas\Firma Jezreel.htm Y esta es la macro que ejecuta el envío de los correos '***Macro Para enviar correos Sub correo() 'Por col = Range("J5").Column For i = 6 To Range("D" & Rows.Count).End(xlUp).Row Set dam = CreateObject("outlook.application").createitem(0) dam.To = Range("D" & i) …