Tengo un archivo de txt que necesito poder levantarlo y que me conserve el formato, pero necesitaria que me permita poder delimitar la longitud ya que por ejemplo al principio tengo una serie de NUMEROS unidos con un TEXTO, y eso por ejemplo lo quiero poner en dos columnas. aca les deje un ejemplo y el txt para que me ayuden. 20052614048PEREZ CARLOS F 001029758 0.00008000000 0 4774.12 4773.16 0.00 0.00 0.00 0.00 0.00 4773.16 4773.16 4773.16000 0.001 0.0011 1 0 0 4773.16 0.00 0.00 0.00 0.00 30 4773.161 0.00 0.00 0.00 4773.16 0.…

Necesito ejecutar un macro X numero de veces y que se agregue en una tabla los datos dentro del macro pero no encuentro forma de hacer que funcione Aqui una foto de lo que deseo agregar donde esta X que sea un numero cualquiera deseado Sub Macro1() ' ' Macro1 Macro ' ' Range("H3:K3").Select Selection.Copy Range("A50000").Select Selection.End(xlUp).Select ActiveCell.Offset(1, 0).Select ActiveSheet.Paste Application.CutCopyMode = False Range("J3").Select End Sub Ese es el codigo de la macro. Produccion.xlsm

Hola amigos tengo el siguiente código para cargar una imagen: Private Sub foto_Click() On Error Resume Next Dim Ruta, Lista As String Ruta = ThisWorkbook.Path nombre = Worksheets("MATRIZGENERAL").Range("b6").Value If Lista = "" Then Exit Sub marcofoto.Picture = LoadPicture(Ruta & "\prueba\" & nombre & ".jpg") End Sub [/CODE] y todo funciona el problema es que cuando las imagenes son muy grandes solo se ve una parte en el cuadro marcofoto (image), como puedo solucionarlo para que redimensione la fotografia antes de cargarlo al marco y poder ver la foto completa. espero puedan ayudarme. saludos

Buenas tardes, Tengo una tabla en la que capturo bastantes datos relativos a horarios de salida de vehículos y los retrasos que se producen en cada evento de salida. Registro cada retraso en franjas de 15 minutos (0:15), hasta un máximo de 4 horas. En la tabla tengo insertadas en la celdas destinadas a registrar éstos retrasos una lista desplegable que contiene cada uno de esos valores (0:15, 0:30,......,3:45, 4:00). El problema es que la tabla, para que muestre la mayor parte de los datos, tiene aplicado un zoom de 70% y la hora de desplegar la lista en esas celdas hace que los valores de lista se vean demasiado pequeños. Por ese motivo había pensado en que cada vez q…

Buenas tardes, Creo que este es el foro mas acorde a mi consulta, de no ser así, pido disculpas. Soy un usuario de Excel aficionado y tengo un nivel básico, no he trabajado nunca con macros ni programación, por lo que si mi consulta es muy absurda, tambien me disculpo. Ahora la duda. Tengo un Excel con una serie de datos ordenados en una lista (Digamosle Hoja1) con una columna de identificador y una segunda pestaña con una plantilla para imprimir (Digamosle Hoja2). En esta plantilla (Hoja2) introduzco el identificador y con formulas simples se me actualizan los campos necesarios con los datos de la fila correspondiente del identificador de la (Hoja1) y pulso imprimi…

Hola a todos. Acudo a ustedes con el animo de que me colaboren en la programación del formulario adjunto a este tema. La idea es programar tres combobox dependientes. El Combobox 1, debe filtrar y cargar los valores únicos de la comuna "Tipo" en la Tabla1, la cual está en la hoja "Equipos". El combobox 2, debe cargar y mostrar los elementos de la columna "Descripción", los cuales ya deben hacer sido filtrados de acuerdo al tipo de elemento, ya sea "Equipo" o "Periférico". Y finalmente el combobox 3, debe mostrar los seriales de esos elementos que están en el combobox 2. Una vez el operador de la aplicación seleccione un serial del elemento en el combobox 3, ese seri…

Buenas Tardes, Necesito extraer de una tabla que tengo en Access el valor máximo del campo "PEDIDO" y que lo deposite en la celda B2 de la Hoja1 de Excel al dar click en un CommandButton de un formulario de Excel.

Buenas, necesitaria ayuda con el siguiente codigo: If ComboBox1 = "Ingreso" Or ComboBox3 = "Efectivo" Then Cells(39, mes).Value = TextBox1.Value + ActiveCell.Offset(35, 0) End If If ComboBox1 = "Egreso" Or ComboBox2 = "Efectivo" Then Cells(39, mes).Value = Cells(39, mes).Value - TextBox1.Value End If Esta en un formulario con tres combobox y un textbox. La operatoria que busco es simple, si en determinado combobox hay una palabra, el dato del textbox se suma o se resta al valor de una celda. El problema me surge cuando en el combobox1 pongo Egreso, ya que no me hace la resta. Agradezco a quien tenga tiempo e intenciones de ayudarmeee.....

Hola. tengo un problema...al buscar en textBox no carga completamente en el listbox solo hasta cierta columna y no me permite llenar mas, ya lo revice muchas veces y no encuentro el error. ahi les dejo el archivo. gracias de antemano Libro1.xlsm

Buenas tardes, tengo el siguiente caso Ocurre lo siguiente, todo libro nuevo o viejo con intencional .xlsm se auto-cierra y borra los códigos programados en VBA. Al intentar volver abrir devuelta el archivo, salta un mensaje con lo siguiente "Hemos encontrado un problema con contenido de xxxxxxxxxxx.xlsm.¿Desea que intentemos recuperar el máximo de contenido posible? Si confía en el origen de este libro, haga clic en Sí" En todos los casos le doy Sí y me sale el siguiente mensaje = "Excel pudo abrir el archivo reparando o quitando el contenido que no se podía leer", Parte quitada: Parte /xl/vbaProject.bin. (Visual Basic para Aplicaciones (VBA)) Es all…

Hola. Solicito su apoyo para crear una macro que me permita copiar el contenido de una celda y pegarlo la cantidad de veces que se indique en otra celda. Espero ser claro.

hola buenos dias, tengo una macro que copia una hoja( ingreso), me copia el contenido y renombra la hoja con fecha del informe pero el problema que se me genera es cuando no modifico la fecha sigue corriendo la macro me crea otra hoja pero no renombra la hoja con la fecha porque ya existe en otra. mi consulta es ¿ cómo puedo hacer para que se detenga la macro y que me avise en un mensaje que la fecha del informe ya existe y no se puede guardar ? para solucionar el problema adjunto la macro Sub guardar() Application.ScreenUpdating = False Sheets("ingreso").Copy After:=Sheets(1) ActiveSheet.Name = Range("d13") Sheets("ingreso…

Hola gente de esta maravillosa comunidad, estoy llevando un curso de Office Avanzado y me tope con un problema en Macros Excel VBA, me han dejado un ejercicio que me ha dado dolor de cabeza (por lo novato que soy). En 1ra columna tengo el nombre de 5 empleados, en la 2da columna en un "cuadro de texto" escribo los días trabajados por los empleados, en la 3ra columna introduzco los pagos por día de cada empleado, en la 4ta columna necesito calcular los sueldos de cada empleado multiplicando la 2da y 3ra columna (mi idea brillante y poco sencilla fue el colocarle un "botón de comando" en cada una de las filas y multiplicarlas), pero lo que quiero es que no se vea ta…

Buenos días, Estoy realizando una aplicación en excel en la cual desde un TextBox escribo el elemento que quiero buscar en la base de datos. Según los caracteres que escribes mira en otra hoja (Base de Datos) toda una columna (10000 elementos) buscando coincidencias exactas. Todo funciona con el código adjunto lo que ocurre es que es lento ya que para cada carácter escrito realiza una búsqueda completa. ¿Tenéis alguna idea para darle mayor velocidad a la búsqueda? Interrumpir la búsqueda para coger el nuevo carácter escrito y comenzar la búsqueda... Private Sub TextBox_Producto_Change() Dim Producto As String Dim StringCoincidir As String Dim StringEscrito As String D…

Buenos días Tengo una duda de si se puede hacer un multiplicación con vba solo cuando aparezcan unos valores determinados. Me explico: En el combobox1 tengo una selección ( montar cabezal) en el combobox2 tengo seleccionado (0.75)y en el combobox3 tengo seleccionado (48). La idea es que la formula actuara solo cuando apareciera esa selección en el combobox1. " montar cabezal = 48*0.75*0.25"-(0.25 es una constante) . Este resultado se mandaría a una columna de un listbox Gracias de antemano

Desarrolle un sistema en PHP y MySQL para un negocio de audiocar. el caso es que ya habia deesarrollado sistemas para otro tipo de negocios como un lubricentro, y siempre los datos de los articulos(lista de precios), de los provedores vienen en archivos de excel. Aunque siempre en tablas comunes (con registros horizontales.). Pero este comercio tiene o le en via su provedor un excel como se ve en la imagen(El archivo pesa 40Mb): Y el caso es que necesito cargar esos datos en la base de datos. Como dije anteriormente teniendo una tabla comun yo lo paso directo con cualquier gestor. He probado transponer copiando y pegando el contenido pero me que…

Saludos, tengo un catalogo para piezas automotrices al que le agrege un motor de busqueda con VB. Soy nuevo en este proceso y las variables de mi tabla son muy amplias. La tabla tiene 12 columnas, A,B D es Marca, Modelo y Año y quisiera que el resultado de la busqueda me arrojara el resultado de las celdas correspondientes en las columnas F y H. Ejemplo de la tabla: Marca Modelo X año Y DEL Z TRAS Fiat 500 x1 2012 y1 D123 z1 T456 Fiat 500 x2 2012 y2 D456 z1 …

Buenas noches al foro, Os pido ayuda con un codigo que he encontrado y que no soy capaz de poder csmbiarlo para que me sirva. Os explico, el codigo que os muestro me realiza la siguiente operacion, me copia lo que tenga en la hoja 1 el la celda E2 en la hoja 8 en la colunma c y luego lo que tenga de la hoja 1 desde E11 a E 58 en la hoja 8 debajo de lo ultimo escrito en la columna C, hasta hay practicamente correcto( digo practicamente porque de E11 a E58 existen una serie de campos vacios que me gustaria que los obviara pero no se como), pero para el siguiente registro me vuelve a copiar todo el nuevo registro en la hoja 8 en la columna C a partir de la ultima celda va…

Cordial saludo, soy bastante nuevo en este medio de programacion, pero inicie un pequeño proyecto para una pequeña empresa la cual solo requiere lo basico que es ingreso mercancia, ventas, consultas; ya estan realizadas con formularios, lo que pasa es que no he podido realizar que en el formulario ventas cuando acepte la venta, me descuente automaticamente el valor de la tabla productos. ya busque foros de este tema sin resultados positivos. agradesco su ayuda. prueba.zip

que tal buenas tardes amigo quisiera saber como puedo extraer un varios xml en una celda toda la infornmacion que viene en el xml en una tabla de excel, por favor se lo agradeceria demasiado ya que son un buen de xml los que me falta de ver para hacer una cuenta de gastos, eh intentado exportar el xml en excel , pero me sale repetido muchas veces informacion del xml, simplemente lo que me intresa del xml es el rfc el nombre del proveedor el subtotal el iva retenciones de isr iva y sie esta en dolares la factura asi como lo mas importante la descripcion de la factura asi como si es ingreso o egreso para eso quisiera extraer el xml amigos, ya que eh visto muchos ejemplos y …

hola necesito ayuda con una macro que estoy adaptando a mis necesidades, pero no logro hacerlo ya que soy nuevo en esto, lo que necesito es: 1- que el listbox carge los datos de una hoja especifica que tengo en un combobox en listada por ejemplo si en el combobox dejo la hoja 1 que cargue los datos de la hoja 1 y si es la hoja 8 los de la hoja 8 y así sucesivamente 2- que cuando se filtre desde el listbox queden los títulos de las cabecera de antemano gracias por la ayuda y espero también poder ayudar en lo posible a quien lo necesite PRUEBA.xlsm

Muy buenos días compañeros del Foro Yo soy bastante nuevo en esto de BVA y lo poco que se lo he aprendido por mi cuenta investigando en internet y preguntando a personas que ya lo manejan. Estoy realizando un formulario en Excel 2007 en el cual voy a digitar los datos obtenidos en una encuesta en papel. El problema que tengo, debido a mis pocos conocimientos, es que no se como asignarle a un TextBox un rango de valores más un valor extra. Por ejemplo: el Textbox1 quiero que solamente acepte valores de 1, 2, 3, 4 y 99. Sé como hacer del 1 al 4, pero añadirle el 99 no tengo idea como hacerlo, ya probé varias formas pero no lo he logrado hasta el momento y les agradecería…

Muy buen día, Tengo una macro la cual busca datos de una columna y concatena todos los números, exceptuando el "6011". El problema es que los concatena desde abajo hacia arriba, necesito que sea al veres. Adjunto el archivo, dentro hay un cuadro explicando como funciona.Plani.xlsm Si existe una formula que simplemente tome ese concatenado y lo haga al revés, seria perfecto! Saludos.

Hola buenas, me gustaría saber cómo hacer una macro que me coloree una fila según el criterio de una celda. Tengo una columna "tipo" en la que puede haber diferentes valores, pero quiero que por ejemplo en la celda que aparezca la palabra "garantía" aunque luego haya más palabras me marque la fila de color rojo. ¿Es posible o tiene que ser el texto exacto? Muchas gracias. Saludos. color fila.xls

Estimados para la siguiente consulta adjunto programa de ejemplo Requiero ayuda para completar el programa de gestión de bodega que adjunto en este mensaje. En la portada del programa hay 3 enlaces para las distintas bodegas. Si vamos a una (cualquiera) les mostrara un listado de productos los cuales están hiper vinculados (hacemos clic en cualquiera de los productos) y nos llevará a su hoja respectiva. Hasta aquí esta todo bien. Ahora la idea es que el encargado de bodega respectivo complete la información de la fila correspondiente y haga clic en el enlace "Obtener Comprobante" y luego debiese aparecer una ventana consultando que número de comprobante es el que quier…