Buenas tardes soy nuevo en esto de excel de hecho odiaba los editores de textos mi rama va mas por el hardware pero ahoa que entre a servicio social me piden muchas cosas en excel y pues tengo que aprender bueno el problema es este. tengo un documento en excel y tengo que registras caidas en el sistema y a que hora ocurrio eso esa parte esta hecha ya pero ahora el problema es que al momento de querer hacer una grafica acerca de eso no se puede porque las fechas se quedan con la hora y cuenta una caida diferente haci sea el mismo dia por la hora :S quisiera ver si me podrian ayudar aa ver con que formula o proceso puedo hacer que las fechas aparezcan sin hora para pode…

Buenas, en la siguiente base de datos, la cual es bajada de un software contable, quisiera realizar un recorrido por las columnas E, hasta la ultima Columna Activa, en este caso es la columna M. ("como les dije es bajado de un software contable y para cada empresa puede ser diferente el numero de columnas"), la idea es realizar ese recorrido por el rango de columnas (E: hasta la ultima columna activa) y eliminar aquellas columnas que no tengas valores positivos, ya que en algunos casos en una columna sin valores me puede colocar la fecha o cualquier otro dato informativo que no se requiere. BASE PRUEBA.xlsx

Filtro en Macro (Tabla Dinámica) Estimados, Tengo parte una programación en la que necesito su ayuda. ---- ActiveWorkbook.PivotCaches.Add(SourceType:=xlDatabase, SourceData:= _ Worksheets("Hoja1") _ .Range("A1:AF" & Sheets("Hoja1").Range("AF1").End(xlDown).Row).Address(External:=True)) _ .CreatePivotTable TableDestination:="", TableName:= _ "Tabla dinámica1", DefaultVersion:=xlPivotTableVersion10 With ActiveSheet.PivotTables("Tabla dinámica1").PivotFields("Incoterm") .Orientation = xlPageField .Position = 1 End With ActiveSheet.PivotTables("Tabla dinámica1").PivotFields("Incoterm").CurrentPage _ = "(All)" With Active…

Buenos dias compañeros, en esta oportunidad requiero ayuda con un tema de contadores en los ciclos para generar un reporte, solo necesito que me salte a la siguiente fila en las celdas y otro para que me salte cuando selecciono las filas completas. si me pueden ayudar seria magnifico. MASIVA.zip

Buenas tardes Solicito ayuda con este ejercicio, necesito en el campo Buscar, me permita buscar por Nro. de Chasis o Nro de PVD y al digitarlo me diligencie los campos (estos datos se encuentran el la hoja llamada inventario), Que el campo Fecha, me coloque la fecha del sistema, que diligencie los datos campos referencia, descripción y precio, cuando yo digite el campo referencia (estos datos son traídos de la hoja List de Acc), que tenga un botón para imprimir y que salga el área de trabajo en pdf o una nueva hoja de excel así como lo muestra la hoja Salida, una fila mostrando los datos del vehículo y agrupando los accesorios a instalar en el vehículo, como lo muest…

Buenos días a tod@s; Esto liado con una consulta SQL de Excel a Excel y me ha surgido una duda que supongo que no se podrá pero….por si acaso se puede para que me ayudéis. La consulta es una consulta básica en el que filtro por un campo ( situación ) pero en los datos que me reporta, en uno de los campos ( Numero ) necesitaría que solo me reportara los primeros 6 caracteres. Query = "Select Artículo, Casa, Numero from [" & "Musica$" & "] where Situación= 'Ok' " En el campo Numero tengo 12 caracteres. Ejemplo: 123456SA0014 Solo necesito 123456 He probado con substring(Numero,1,2) pero da error método open de objeto recordset. …

Buenos días, necesito ayuda con una planilla de excel que es actualizable mediante formulas especificas de un complemento de excel que usamos en el trabajo. Concretamente la idea es crear una nueva planilla con la misma informacion disponible en la original, que contiene combos, graficos, checkbox, etc., pero que los valores en esta nueva planilla esten como datos y no como formulas como esta en el original. Tambien me gustaria saber, si es posible, si la planilla nueva se puede sobrescribir siempre en la misma ubicacion automaticamente al abrir el original, para que esta nueva pueda arrastrar los ultimos valores existentes en la original. Adjunto el original, …

Tengo una consulta que no se si se puede solucionar con vba de excel. En este formulario de usuario y contraseña quisiera saber como se tendría que hacer para recordar el usuario y contraseña con la que se entra en una aplicación. Espero podais ayudarme. Gracias de antemano Login.xlsm

Hola: Quisiera saber si hay alguna manera de poder filtrar, alternativamente, importes (ej: 81,73), fechas (28/01/2015) y texto ("Cta"). Me da problemas para filtrar cantidades, y se debe al orden de los 3 autofiltros (paso a paso, si lo filtra). Sub FiltroSencillo() On Error Resume Next x = Columns("" & Range("B1") & "").Column With [a1] .AutoFilter x, [a1] 'Para importes 'No funciona bien .AutoFilter x, "*" & [a1] & "*" 'Para texto en general .AutoFilter x, CDate([a1]) 'Buscar fecha End With End Sub[/PHP] Filtrosencillo.rar

Buenos días, Soy bastante novato en macros por lo que agradecería me guiaseis para construir una macro que importe datos de Web, concretamente la Web es Moningstar, en la cual tengo una cartera con información de Fondos de Inversión. El problema es que tengo que acceder a una opción dentro de la Web que es; Mi Cartera y posteriormente, Acceder a una cartera existente, en la cual me pide Usuario y Contraseña.

Tengo un comboBox con 2 Columnas y al pasar los datos a un ListBox, solo me pasa el dato de una de las columnas. Asignar una prenda y la cantidad de prendas. en el Formulario tengo lo siguiente Private Sub UserForm_Initialize() Dim L as Long With Hoja7 Me.ComboProd = Clear ' ComboProd es el nombre del Combo Do while . Cells(L,1) <>"" ComboProd.AddItem ComboProd.List(ComboProd.ListCount -1, 0) =.Cells(L, 1) ComboProd.List(ComboProd.ListCount -1, 1)=.Cells(L, 1) L = L + 1 Loop End With End Sub Se añaden los datos al ListBox a trav…

Buenas noches tengo esta cade de texto \\000.000.000\recepcion\A. MENARINI LATIN AMERICA, S.L.U. - SUCURSAL COLOMBIA\900932340.ME10110.pdf pero quiero extrer solo esta parte 900932340.ME10110.pdf quisiera por favor saber que codigo me sirve para extraer esa parte o bien extraer una parte deseada una idea de esto como yo lo hago normalmente en ecxel es que utilizo la funcion buscar ("/") y pues digamos que me arroja 3 luego vuelvo a utilizar la funcion, pero esta ves en ves de numero inical 1 pongo 4 para que omita el primer "/"

Adjunto un archivo zip con un formulario basico para enviar mail desde excel para cuentas de gmail. En el botón "enviar" no sé como insertar ni donde la línea de código para permitir enviar archivos adjuntos. ¿Alguien puede ayudarme? Gracias por adelantado. Borja enviar email.zip

Quiero facilitar el llenado de un formulario que sirve para pre calificar a las personas en el Infonavit, pero no se como hacer para copiar y pegar los datos de una tabla (en base al numero de la fila) en los campos de la pagina, así como hacer que la macro modifique en la pagina los campos entidad y municipio. soy nuevo en esto no se que mas datos se necesiten. gracias!!! Precalificación.xls

Señor Macro Antonio en atención a su sugerencia le remito el libro para su verificacion. Le informo que a lo mejor pordría ser que he entendido mal el manejo. Pero en mi caso no me arroja resultado. Trabajo con excel 2007, y demora mucho más de 5 minutos en el ejemplo dado, y al final bota error del excel. Por favor, si está a su alcance, le agradeceré una revisada. Disculpe usted la molestia. O en todo caso si me puede indicar bien como usar su buscador, a pesar que ya leí el archivo original. Saludos Jorge Bejarano desde Perú Buscar.xls

Estimados Maestros de este foro quisiera por favor preguntar si alguien tiene conocimiento del porque ya no se puede abrir documentos pdf en formulario, tengo algunas aplicaciones creadas en vbproject de excel y visual basis y en ninguna me deja abrir pdf en formulario

Gracias a Macro Antonio que me creo una macro, quisiera seguir evolucionándola pero mis conocimientos de macros es muy pobre, quisiera mejorarla que la celda que está cortada diagonalmente vuelva a su estado sin borro la celda donde pone Din_Astm y si lo pone que el 50 lo coloque según el ejemplo y si pone cualquier dato diferente la celda de referencia sea ASTM, DIN, API el dato que ponga este centrado a la celda como el ejemplo y en la celda de la columna R también la corte diagonalmente como el ejemplo. Si pone API_ASTM corte diagonalmente la celda de la columna P y si borro los datos de API_ASTM deje la celda en estado original. …

necesito insertar varias imágenes en una hoja Excel y escribir el nombre de la imagen las imágenes están en una carpeta. Estoy empleando para insert imágenes: ActiveSheet.Pictures.Insert(carpeta & imagen).Select pero solo me inserta una

Por favor, necesito ayuda para saber si es posible, buscar datos en un listado y copiar y pegar en otra hoja, es decir buscar vertical y pegar horizontal, pareceria una pregunta muy comun, ...pero la diferencia y que es complicado (al menos para mi) es que el criterio de busqueda, está por ej. en la columna G, y los datos que deseo copiar y pegar en otra hoja estan en la columna B, adjunto un archivo , esperando me haya explicado bien y que alguien me pueda ayudar a resolverlo o que me digan si no se puede...... Gracias de antemano Buscar.xls

Hola, en esta ocacion necesito de su conocimiento para que me ayuden a resolver una duda. Tengo un libro con varias hojas, una de ellas es la hoja formato, que con una macro se copia en muchas hojas, cada hoja con nombre diferente. El problema es cuando las quiero pasar a PDF, guardandose el PDF con el nombre de cada hoja, si me lo hace pero me guarda siempre la hoja1 en todas las hojas que tengo. anexo macro: Sub hacerpdf() For Each hoja In ActiveWorkbook.Sheets ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:="C:\Users\Gerardo\Documents\PDF" & hoja.Name Next End Sub Tambien tengo este codigo pero me hace lo mismo, la hoja1 me la pone en todos los PD…

hola y buen día a todos los usuarios del foro Necesito que se genere un numero consecutivo en el formato que adjunto. Quiero que este numero sea guardado cada vez que se cierre o escoja cada una de las opciones que vienen en la hoja 2 y al dar click al botón se genere ese numero consecutivo con el texto que ya viene en esta pequeña macro que he creado, y continué la secuencia próxima vez que se abre la hoja. por mas que le he intentado hacer no me queda como quiero, cuando le doy click al boton secuencia me genere todos los números consecutivos. Espero me puedan apoyar-orientar sobre esto que no me deja dormir. Saludos a todos original ARCHIVO ACTUALIZADO (1).zip

Hola buenas, Tengo el siguiente problema, quiero utilizar la formula UNICOS en VBA para sacar los resultados únicos de una columna (columna que tiene el nombre de "Soporte" asignado) de una tabla. El código de VBA es el siguiente: ActiveCell = Application.WorksheetFunction.Unique([Soporte]) El problema que tengo, es que solo me devuelve un resultado cuando el resultado que necesito deberían ser varios, pero imagino que en el código VBA al referirme a una única celda solo me devuelve un resultado. En cambio en excel al utilizar la funcion únicos, como permite desbordamiento me devuelve todos los resultados que necesito uno debajo de otro. …

Gusto de saludarles, me podrian apoyar quisiera tener el codigo para un commandbutton para que a la hora de terminar de ingresar los datos del formulario automaticamente el caiga a la siguiente linea osea si el formulario termina de ingresar en la columna m y linea 976 automaticamente cuando se le da insertar o aceptar siga el a la columna a y linea 977 y de ahi sucesivamente....Mil gracias por el apoyossaludos desde guatemalaESTE ES EL ARCHIVO QUE LE MENSIONE COMO PODRAN OBSERVAR HAY UN USER FROM (ALT F11) Y SAL EJECUTARLO Y TERMINAR DE INGREAR LOS DATOS DEL FORMULARIO YA NO PASA DE AHI QUISIERA QUE SIGUIERA EN LA SIGUIENTE LINEA ME PUEDEN AYUDAR ? GRACIAShttp://www.fil…

Estimados, Buenas tardes Tengo el siguiente Código en VBA para seleccionar impresora distinta a la predeterminada y a su vez imprimir copias según valor de celda CE15, si bien selecciona la impresora, el problema es que solo imprime una copia y no el valor asignado a CE15. Si alguien me pueda ayudar. Sub imprimir() Sheets("C2t-Small").Select ncopias = Hoja1.Range("CE15").Value actPrnt = Application.ActivePrinter ActiveWindow.SelectedSheets.PrintOut ActivePrinter:="RICOH SP 310DNw PCL 6", Collate:=True Sheets("Etique").Select Range("CE15").Select Range("CE15:CQ19").Select ActiveCell.FormulaR1C1 = "0" En…

Imaginen que tengo estos datos en una Celda 448505, 448035, 448040, 448051, 448502 quiero un macro que me pueda devolver esto: 448505, 035, 040, 051, 502 osea que si los primeros tres numeros son constantes solo me deje el primero completo y los demas sin la constante. me seria de ayuda en un macro porque es un caso que se repite mucho en mi proyecto.