Estimados Soy nuevo en el foro y en el uso de VBA Excel y quisiera ver como puedo pasar el formato condicional que tengo en la hoja de exel y mostarla en un userform. o si se puede por ultimo dar formato de color a cada celda del listbox. dejare adjunto el excel. Espero que me puedan ayudar. Muchas gracias. Libro1.xlsm

Hola a todos. Si tengo en la celda C2 la formula =suma(c3:c10) y eso da X resultado... quiero pasar esa formula a una variable ej. varform de tal manera que varform="=suma(c3:c10)" Como puedo obtener esto. Gracias

Estimados, Esperando que se encuentren bien, recurro a ustedes para que me ayuden a dar solución a una duda que tengo. He creado una VBA para generar una fórmula en Excel tomando como criterio el contenido de otra. Si tiene "X" cantidad de filas esta se rellene en otra celda con la fórmula propuesta. Ahora, ¿Cómo puedo hacer para que después de aplicada la formula esta pase a valores? Adjunto el VBA que use: Range("Z2").Formula = "=VLOOKUP(Y2,AO:AP,2,0)" Range("Z2", "Z" & Range("AC2").End(xlDown).Row) = Range("Z2").Formula Quedo atento a sus comentarios. Ss.

hola a todos intento expresar una formula un poco larga como una funcion para que sea mas practica solo que en un ejemplo usando extraer si me resulta, intento utilizarla para otra funcion pero no me queda ojala me puedan ayudar pasar formula a funcion.zip

Hola necesito ayuda para copiar datos de un libro a otro, el libro matriz que se llama matriz pcs es el fijo que tengo que se alimenta de diferentes libros los cuales pueden variar nombre de hoja y de libro. Por ellos realice el siguiente comando.Sub LLENADO()ActiveWorkbook.ActivateActiveSheet.SelectFor a = 0 To 68Workbooks("MATRIZ PCS").Sheets("J3D133").[t11].Offset(a, 0) = [t11].Offset(a, 0)NextEnd Subpero me sale error no se si alguien podria ayudarme, prueben con cualquier hoja solo son pegar datos de una hoja y libro a otro pero usando el active shett

Hola, Requiero de su valiosa orientación y ayuda, de antemano gracias! En la Hoja "DATA" tengo la información que necesito se pase a la hoja "RESULTADO" el id es el número de empleado que esta en la Hoja "RESULTADO" A2 solo se tiene que pasar toda la información que coincida con este dato. En la hoja "RESULTADO" he dejado como debe de quedar la información. Anexo archivo muestra. Muchas gracias! muestra.zip

Buenos dias, nuevamente voy sus valiosos conocimientos, lo que pasa es que tengo un archivo dentro de ella tengo una hoja llamado "Formato de Tareo 2021" donde hay un boton azul llamado "seleccionar" al presionar clic jala un formulario donde ingreso el dni y me lista los detalles que le corresponde a ese jefe o capataz donde jala directamente los datos de la hoja "DATA PERSONAL" (columna AE), esto funciona todo bien e incluso lo lleva a la hoja todo lo filtrado cuando registro. Pero ahora el jefe necesita que toda esa acciones se haga solo en la hoja poniendo el numero de dni en la celda D4 de la hoja "Formato de Tareo 2021" y me muestre los datos en la ragos de celda t…

Hola, aprovecho para presentarme. Hace tiempo que os leo pero solo unos días desde que me he registrado. Llevo tiempo preguntándome si será posible hacer lo que pretendo. He buscado temas relacionados con "cambio de moneda" y he encontrado cosas parecidas, pero no exactamente lo que busco. Lo que quiero es que con un botón los cuadros de financiación que tengo se muestren en diferentes monedas (euro - dólar y sol, por ejemplo). Y si es posible, aunque ya es demasiado pedir, que se tome la cotización de alguna web. Cualquier ayuda o idea será bienvenida. Un saludo y gracias por ayudar. Dejo un fichero con lo que tengo. Financiación.rar

Hola, estoy tratando de usar Excel-DNA (Excel-DNA) para ordenar una matriz de una sola dimensión. Es para probar el uso de .NET en VBA. Excel-DNA ya me corre bien para funciones sencillas, como por ejemplo si en el editor de macros de Excel 2010 le pongo: Public Sub Prueba01() MsgBox Application.Run("Sumale", 3, 4) End Sub [/CODE] Y en el archivo de texto “ExcelDna.dna”, donde se programan las funciones de VB.NET tengo: [CODE] <DnaLibrary RuntimeVersion="v4.0" Language="VB" > <![CDATA[ Imports ExcelDna.Integration Public Module MyFunctions Function Sumale(x, y) Sumale = x + y End Function End Module ]]> </DnaLibrary> [/…

Buenos dias , lo primero gracias por la ayuda que me podais prestar ya que estoy en blanco. Lo que necesito es basicamente , pasar un texto descriptivo a un formulario , explicado mejor seria asi: Tengo una web donde se tiene que reportar unas pruebas que se realizan , esta web tiene bastante pruebas y cada prueba es una pagina diferente , pero todas siguen un patron. En esta web , lo que necesito rellenar automaticamente desde la excel es un campo que pone User Comments y otro que pone Thecnical Comments , actualmente eso se hace prueba a prueba y lo que necesitaria es poder hacerlo en la excel y con la macro que lo vaya autocompletando. Esto es viable?? Muchisimas g…

Buenas amigos del foro Estuve revisando un tema solucionado que lo aplique en mi necesidad, pero no me sale el resultado. Espero que alguien de ustedes me brinden su valioso apoyo. Lo que necesito es que el archivo Excel que el adjunto se convertido en PDF y luego enviado por Outlook o gmail a varios destinatarios. Les agradezco su valiosa ayuda Chile1.zip

hola que tal¡?, me gustaria saber como puedo hacer para pasar un dato (que para este caso es la cadena de caracteres "POSITIVO") de una columna dada a otra que yo le especifique?? en este ejemplo tengo la columna negativo y la columna positivo dentro de la columna negativo debe de estar la palabra "NEGATIVO" y dentro de la columna de positivo debe estar la palabra "POSITIVO" pero resulta que tengo ese problema y quiero separarlos porque dentro de la columna negativo tambien existe muchos palabras "POSITIVO" y quiero quitarlo como le hago?. Saludos y gracias Copiar un dato de una columna a otra.rar

Que tal, tengo un archivo con varias hojas y en cada hoja hay un rango (igual en todas) que quiero copiar a una hoja "matriz" pero que la informacion sea agregada en la fila vacia despues de la ultima fila con datos, quiero aprender mas como programar en excel porque me enredo con los metodos, modulos, que si es objeto, procedimiento, etc. espero su ayuda, gracias de antemano..! El rango a copiar es A4..P15 ¿como hacer que el nombre de las hoja se copie en una celda en especifico en esa y en otra hoja "matriz"? Anexo archivo ejemplo,.... gracias...! Ejemplo Macro Excel copiar datos.xls

Hola a todos: Estoy trabajando un Userform quiero exportarlo a PDF y utilizo el siguiente código: Private Sub CommandButton1_Click() Sheets("Tabla de Resultados").Activate ActiveSheet.ExportAsFixedFormat Type:= xlTypePDF , Filename:="C:\Users\daffne\desktop\INFORME.PDF", Quality:=xlQualityStandard, IncludeDocProperties:=False, IgnorePrintareas:=False, OpenAfterPublish:=True Me.Hide end sub El principal problema es que cuando ejecuto me marca un error de compilación y me pide un identificador, justo en Type:=... soy nueva en esto y no he encontrado aún cómo resolverlo, les agradecería muchísimo su ayuda. Saludos

Buenas noches, espero puedan ayudarme: El problema es el siguiente, tengo una columna desde A5:A30, cada celda tiene una fórmula asociada a una lista (meses del año) que cada vez que elijo una opción de la lista (por ejemplo elijo FEBRERO), se actualiza la información de las celdas mediante la fórmula, ahora cada vez que haga una actualización, por ejemplo si escojo de la lista "FEBRERO", estos valores queden copiados en otra columna (por ejemplo se copie información del rango A5:A30 (este rango puede aumentar por ejemplo A5:A35) a la C5:C30 pero en forma de valores, si elijo marzo, se copie información de la A5:A30 a la celda D5:D30etc.

BUENAS TARDES! Agradeciendo de ante mano su ayuda, tengo que realizar un archivo en bloc de notas con ciertas características en donde se debe de respetando campos y espacios que deben de llevar cada uno, en excel realice la base de datos y según yo ya tengo la estructura que quedara para pasarlo de forma masiva a un archivo de txt, solo es una columna que deseo pasar al txt la cual es la columna R, como son muchos movimientos los que se tienen que realizar creo que me puede ayudar el uso del excel. Excelente día Saludos! CAMPO MIO 1.xlsx

Cómo puedo pasar una consulta realizado a una tabla de acces a una variable o a un array; el utilizar una u otra dependerá del tipo de consulta. Al día de hoy la puedo pegar en una hoja de excel pero no se cómo asignarla directamente la consulta a una variable. eje. Dim flotante as Variant Modifica = "SELECT Clave, Costo_P_A_3 FROM EXIST_06 WHERE Costo_P_A_3<0" rs.Open Modifica, cn ActiveSheet.Cells(17, 6).CopyFromRecordset rs flotante = range("F17:....).value[/CODE] Gracias...

Hola, a todos buenas tardes ... Tengo un libro con una pequeña base de datos a la cual le hago consultas y me arroja los valores como veis en la imagen En otra hoja del libro tengo una tabla con el número de entregas que comienzan con el código seguido de 90 celdas en una misma fila Lo que quiero es usar una macro para al seleccionar la celda por ejemplo C9 se haga una busqueda en la tabla y me devuelva la fila de 90 celdas en filas de 9 por lo que pasaria a tener 10 filas de 9 y quiero que vaya dentro del marco negro que se ve en la foto y he estado buscando por todas partes y es que ni me acerco a lo que busco paso foto de la ot…

hola tal como dice el titulo es posible pasar una imagen/shape de una hoja a otra sin utilizar copiar pegar, es una lastima tener que borrar el contendió del portapales y no parece una solución muy adecuada.

Buenas días a todos; -Estoy intentando pasar el valor de un listview a la celda que tengo activa y no he sido capaz. He intentado encontrar algo en San Google pero no he encontrado nada similar. Adjunto macro. Un saludo para todos. CeldaActiva.xlsm

Hola a todos; -Llevo un rato a vueltas con la macro que adjunto y no logro avanzar. Consta de un formulario principal y un formulario diríamos auxiliar. En el principal tengo dos textBox con dos botones que a pulsar abren dicho form secundario. En este secundario hago unas operaciones de suma y resta y por medio de un botón me devuelve a los textbox el resultado, pero a los dos. Lo que quiero conseguir es que el resultado vaya para el textbox con el que haya pulsado el botón. Adjunto macro. Saludos a todos y buen finde. MacroS.xlsm

hola a todos, me gustaría saber si hay alguna forma de pasar varios txt con datos, a 1 solo csv ó xls, pero que cada txt esté en una hoja diferente pero todo en el mismo libro........ Espero haberme explicado Gracias y un saludo

buenas espero que estén bien, necesito de su ayuda ya que estoy aprendiendo a manejar el excel a nivel macro, ya e vistos muchos vídeos y e leído mucho y no consigo la solución que busco tengo este formulario, me funciona muy bien pero quiero colocarle el PasswordChar = "*" y no doy con esa solución Private Sub LOGS_Click() CLAVE_LOGS = InputBox("EXCRIBA SU CLAVE") If CLAVE_LOGS = "w21052014r" Then Sheets("LOGS").Visible = True Sheets("LOGS").Select Else MsgBox ("CLAVE INCORRECTA!!!") Sheets("portada").Select End If End Sub si hay alguien que me ayuda por favor

Buena tarde Tengo un problema con una macro, es justo en el renglon marcado donde me indica el error. Por favor su ayuda. Sub Test() numhoj = InputBox("¿Cuántas filas desea insertar?", "Insertar filas") If Not IsNumeric(numhoj) Then Exit Sub Rows("16:16").Copy Rows("16:" & 15 + numhoj).Select Selection.Insert Shift:=xlDown Selection.PasteSpecial Paste:=x1PasteFormulates Selection.ClearContents Application.CutCopyMode = False End Sub

Buenas tardes a todos. En esta macro: Public Declare Function SetCursorPos Lib "user32" (ByVal x As Long, ByVal y As Long) As Long Public Declare Sub mouse_event Lib "user32" (ByVal dwFlags As Long, ByVal dx As Long, ByVal dy As Long, ByVal cButtons As Long, ByVal dwExtraInfo As Long) Public Const MOUSEEVENTF_LEFTDOWN = &H2 Public Const MOUSEEVENTF_LEFTUP = &H4 Public Const MOUSEEVENTF_RIGHTDOWN As Long = &H8 Public Const MOUSEEVENTF_RIGHTUP As Long = &H10 Sub ABRIR_IE() Dim IE As Object Set IE = CreateObject("InternetExplorer.Application") IE.Navigate "http://www.paginaweb.html" While IE.Busy DoEvents Wend IE.Visible = True DoEvents …