hola expertos tengo este libro y me gustaría que enviara los números que están a la siguiente hoja y los que no están a la otra hoja ordenadamente gracias ordennumerico.xlsm

Hola, tengo la siguiente duda, necesito pasar de columna a fila de manera masiva, ejemplo: Lo que tengo: 4321; A04 4321; A03 4321; A04 8765; A01 8765; A02 8765; A03 Y lo que necesito es: 4321; A03; A03; A04 8765: A01; A02; A03 Son varios códigos distintos (4321, 8765q), con distintos datos que cambiar de columna a fila, ocupar la función trasponer me ocupara mucho tiempo.

Buenas tardes que pena con ustedes lo que pasa es que tengo un problema he tratado de hacer una formula o macro para poder hacer un descuento desde la factura o remisión que haga y de igual manera adjuntar las entradas osea la compra de mercancía, por otro lado tengo una hoja que se llama facturas emitidas se supone que eso ella es para anexar todos los datos de las facturas emitidas pero no me funciona, me toca adjuntar pantallazos porque el archivo no se dejo subir. gracias Dios los Bendiga

Hola, A partir de dos macros que encontré en el foro (disculpen no recuerdo a los autores) hice esta macro, pero me da un error de automatización. Alguien que sepa VB me ayude porque apenas si entiendo esto. La macro es para enviar correos a travez de outlook, la lista de correos y los nombre de los destinatarios están en dos columnas en excel. Sub EnviaCorreo() Dim myOLApp Dim myOLItem Dim olMailItem Dim midire, minombre, miasunto As String Dim Firma As String Dim ts As Object Dim fso As Object 'se establece la ruta de la firma Set fso = CreateObject("Scripting.FileSystemObject") Set ts = fso.GetFile("C:\Users\Sergio\AppData\Roaming\Microsoft\Firmas\Se…

Hola, chicos, a ver si podéis ayudarnos. Partimos de esto: Pasamos por la Plantilla Se podría copia la info del txt de cada estudiante? y pegarla en la fila 8 y 9 en cada hoja para inglés y Matematicas Para después renombrar cada archivo con el nombre del estudiante extraído del txt? SE ADMITEN TODAS LAS POSIBILIDADES INCLUSO CAMBIAR EL XLSM A XLTM y hacerle warch ojalá puedan ayudarme. Muchas gracias a todos siempre Explicación: Student_Class1A_23224_Eng.txt Student_Class1A_23224_Math.txt Student_Class1A_23225_Eng.txt Student_Class1A_23225_Ma…

Buenas tardes colegas. Espero se encuentren bien de salud. Este es un Proyecto "viejo" en el que vengo trabajando y tratando de mejorar siempre que el tiempo y los conocimientos me lo permitan. Trabajo con él a diario y es el instrumento que más utilizo. Acá lo simplifiqué, o sea eliminé un grupo de hojas y formularios que no necesito para exponer mi problema. Necesito cuando yo escoja en Banco a trabajar en el combobox ComBanco, se muestre en el listbox LstDiario el contenido de las operaciones de ese Banco en cuestión. Puede ser mediante el Objeto Tabla o mediante la hoja. O sea, si escojo BANDEC, que se muestre los datos de la Hoja BANDEC y así con las otros …

Tengo una base de datos en excel con distintas columnas en una hoja que llamo "registro".Me gustaría poner una serie de filtros en otra hoja que llamo "filtros", y que los resultados de ese filtrado me gustaría que se mostrase en una tercera hoja que se llama "resultados".¿Pueden ayudarme cómo hacerlo? Si me dicen cómo puedo adjuntarles el archivo.Muchas gracias PlantillaEstadistica-6E.zip

Hola a todos! En esta oportunidad los molesto con un proyecto en el que estoy trabajando en el que necesitaría crear un buscador (A modo de formulario), que al encontrar el "Campo clave" o "Primary Key" me devuelva los demás campos que le corresponden cargado en un Formulario. Los pasos serían los siguientes: *Clickea en un botón *Abre el formulario de búsqueda *Carga el dato "Clave" y presiona en buscar *Devuelve todos los datos correspondientes a ese campo "Clave" o informa que no se encontró nada con ese nombre Ya tengo algo armado, pero realmente lo veo muy primitivo (Y funciona el 50% de las veces) y condicionado a mezclar el modelo de programación con el del…

Intento abrir un archivo CSV con una macro y quiero cambiar los paramentros de TextFileColumnDataTypes. hice una macro con la que a través de las caracteristicas de cada columna puedo incluir en una variable los parematros que necesito, pero al abrir la QueryTables.Add, no se como suplir el array. Los datos que incluye la variable son: MyVariable = "4,2,2,2,1,2,1,1" With ActiveSheet.QueryTables.Add(Connection:= _ ImpFile, Destination:=Range("$A$1")) ' .CommandType = 1 .Name = "salidas_merc" .FieldNames = True .RowNumbers = False .FillAdjacentFormulas = False .PreserveFormatting = True …

Hola a todos, Me ha pasado con Userform y con una macro. Tengo varias columnas ocultas, pero tengo una macro que copia un rango de la hoja1 pega datos en la hoja2 en el rango A:H, teniendo ocultas las columnas G:H. la macro se para justo cuando se va a ejecutar el Paste. He puesto instrucción Unprotec y además mostrar columna antes del Paste y ocultar columna al final de la macro. Hasta aquí llego, no se si es normal el comportamiento o si estoy haciendo algo mal. Gracias y saludos,

Con parto un formulario, muy bueno con varios campos a diligenciar, pero mi pregunta es alguien sabe como optimizar el cargue de la macro y que al momento de dar clic en almacenar no parpade tanto, que eso se ve muy feo???? Muchachos adjunto formulario y sentencia en archivo separado.... me cuentan, mil gracias sentencia macro formulario.xls FORMULARIO.xls

Hola: Solicitando su ayuda estimados, en el caso de este archivito que es parte de un estado de resultados contable del cual tenemos los diferentes conceptos en las horizontales y en las verticales los meses del año. Lo que deseo es que a través de una macro se obtengan subtotales parciales y totales, en este ejemplo: 1. Si la consulta es de ENERO-JUNIO inserte subtotal en la columna H, en cada una de las filas por $ 600 2. Si la consulta es de ENERO-AGOSTO inserte subtotal en la columna J en cada una de las filas por $ 800 2. Y a su vez, en la columna total, siga 'totalizando' los $ 1,200, o sea, que de acuerdo al rango de la consulta fuese actualizando sin movers…

Buenas noches a todos. Abro este post para ver si a alguien le ocurre lo mismo y ha encontrado solucion. Despues de googlear no he encontrado nada. Resulta que tengo macros que me imprimen hojas con una impresora conectada en red, pero esta misma mañana la han cambiado y han puesto otra impresora que te pide una contraseña para imprimir, para que quede constancia de quien imprime cada cosa y demas. Es un engorro cada vez que imprimes algo meter la contraseña, hasta.aqui no se puede hacer nada. Me he bajado las instrucciones de la multifuncion y nada. Entonces mi consulta es si hubiera alguna forma de poner en la macro la contraseña para que imprima del tiron, si algui…

Hola! Amigos del foro quisiera solicitarles el apoyo para resolver lo siguiente: Lo que pretendo obtener es en un form mediante la selección de un combobox, buscar el valor en todas las hojas (realizar la búsqueda con el botón) y se devuelva un resultado mediante un msgbox mostrando en cual(es) hoja(s) se encontraron el valor. En el tab FindError del formulario es donde deseo realizar el buscador, algo parecido a la siguiente macro: Sub buscarEnTodasHojas() Dim hj As Worksheet Dim contExiste As Integer Dim busqueda As Range Dim res, consulta As String res = "" consulta = Sheets("EEE").Cells(7, 4) contExiste = 0 For Each hj In T…

Buenas a todos. Estoy intentando salir del agujero y programar con un poco mas dignidad, pero no acabo de entender un tema. A ver si me podéis ayudar, gracias de antemano!!! Después de mirar varios tutoriales, entiendo el concepto de clase, objeto, instancia... (o eso creo), pero no me cuadra una cosa: Objeto Libro, Workbook Coleccion de Hojas, que tambien una coleccion es un objeto, Workbooks Objeto Hoja , Worksheet Coleccion de Hojas, que tambien una coleccion es un objeto, Worksheets Hasta aquí todo bien, programo por ejemplo (y no da error): Dim mihoja As Worksheet Set mihoja = Application.Workbooks("Libro1").Worksheets(1) MsgBox mi…

Hola, yo tengo un archivo que cuando se cierra se guarda automaticamente en una carpeta con el nombre NUEVO, me gustaría saber como se puede hacer para que antes de guardarse en esa carpeta compruebe si existe un archivo con ese nombre y entonces se guarde con el nombre NUEVO2. Muchas gracias.

Enviar Email masivo desde excel con Body distintos el problema que me sugiere es el siguiente. En fila F (Causa) a la hora de correr la macro esta siempre me da el resultado de la F2, ya que cada destinatario la causa es diferente, la macro va ligada con (asunto & Causa & con un mensaje de despedida). Gracias por adelantado. EnviarEmail.xlsm

hola buen dia Por favor ayuda para mejorar el codigo deL boton actualizar, ya que cada vez que ingreso el codigo en el campo item me toca oprimirlo para que me traiga los datos. Lo que busco es que tan pronto tenga los numeros de item que deseo registrar, actualice la informacion que corresponda. Agradezco vuestra ayuda. Exitos en sus labores. prueba v2.rar prueba v2.rar

Hola: Tengo un formulario en una hoja excel 2007 y quisiera que en algunas celdas cuando termine de escribir automáticamente pase a formato Nombre Propio, encontré en este mismo foro el siguiente código pero no logro hacer que sea solo para las celdas B2 y B4, en la hija1: Option Explicit Private Sub Worksheet_Change(ByVal Target As Range) If Target.Count > 1 Then Exit Sub If Target = Empty Then Exit Sub If Target.Column = 6 Or Target.Column = 19 Or Target.Column = 23 Then Target = UCase(Target) If InStr("B2$,B4$", Left(Target.Address(, False), 2)) Then _ Target = Application.WorksheetFunction.Proper(Target) End Sub Muy agradecido de ant…

Buenas a todos. Muchas gracias de antemano por la ayuda de siempre. Vengo con este problema, navego con vba a una url interna de mi empresa; cuestión que despues de haber ingresado también con vba el respectivo usuario y contraseña, me redirige a otra web. Si quiero navegar nuevamente en la web con IE.navigate me solicita nuevamente usuario y contraseña. se me ocurre abrir una segunda pestaña, ya que si esta logueado en IE el usuario, volviendo a cargar la web requerida en una segunda pestaña no me redirige..ahora, como abro y navego en una segunda pestaña? gracias!

Buenos días amigo: Hace tiempo que ando tras la solucion de un problema que va relacionado con un EVENTO CALCULATE, lo que quiero hacer es dentro de un mismo evento trabajen por separado dos acciones. el codigo es el siguiente Private Sub Worksheet_Calculate() Static MiValor As Double If MiValor = 1 Then MiValor = [L8] If MiValor = [L8] Then Exit Sub MsgBox "Esta OP. ya fue leida anteriormente, intentelo nuevamente!" MiValor = [L8] [E9].Select Selection.End(xlDown).Select Selection.ClearContents 'Static MiValor2 As Double 'If MiValor2 = 1 Then MiValor2 = [L9] 'If MiValor2 = [L9] Then Exit Sub 'MsgBox "Esta OP. no pertenece a la zona q usted hace referencia, intente…

Hola ayudaexcel, He visto un muchas soluciones que se han publicado aquí y quiero felicitarlos por sus avanzados conocimientos!! Ahora a lo que me hace recurrir a ustedes es una problemática que si bien puede ser sencilla, me tiene de cabeza. Pasa que estoy construyendo un formulario de consulta rápida, que como verán en el archivo adjunto, tiene muchas columnas y es fácil equivocarse, por lo que me inventé una forma de ver si está o no está el dato con un formulario userform, van checkbox, lo cuál me corre de maravillas, pero el problema es que quiero usar un dos textbox que buscan en columnas distintas del listbox, el listbox lo cargo con una opción que me da las pro…

Buenas noches aqui estoy otra vez con el mismo tema: Esto sigue sin funcionar Mientras que tengo el libro abierto funciona muy bien pero cuando abro de nuevo el libro y le doy a habilitar macros automaticamente se coloca la fecha y hora actual El amigo GATOCARIÑOSO me paso esto Public Function nfecha() nfecha = Date End Function Public Function nhora() nhora = Now - Date End Function Y eso es lo que he puesto en un modulo y en las celdas a1=SI(E1="";"";nfecha()) b1=SI(E1="";"";nhora())[/php] Pero sigue actualizandome la hora Saludos

Buenas tardes amigos de "AyudaExcel" me podrian ayudar introduciendo un código para que aparezca un MsgBox que diga "No se encontro el dato" a no haber el dato en un código de busqueda que tengo no se donde colocarlo e probado unas opciones pero no mismo ya se que para ustedes será algo fácil pero para los que estamos iniciando se nos hace un poco dificil. Gracias por su ayuda amigos y una buena tarde Adjunto el código que tengo de busqueda en el cual quiero insertar el MsgBox Private Sub Buscar_Click() If cboLote.ListIndex > -1 Then Lote = cboLote Set celda = Base_Datos.Columns("A").Find(What:=Lote, LookAt:=xlWhole) If N…

Team, Un favor, me podrían ayudar asesorandome para mejorar una macro, en esta lo que he tratado de hacer es que me pase datos de varias hoja a una sola. 1.- La macro del archivo DatosDiscos.xlsm me importa archivos de TXT y me genera un libro nuevo que en este caso se llama ResultadoDatosDiscos.xlsm, por cada TXT hay una hoja con sus respectivos datos, misma estructura todos. Cada TXT correponde a un día de un determinado mes, en este caso solo adjunte 11, pero como puedo tener 30 o 31. 2.- La macro con la que quero que me ayuden es la que esta dentro de la hoja DatosDisco1 del libro ResultadoDatosDiscos.xlsm, esta macro lo que hace es copiarme por cada hoja, los dat…