Sé que con un archivo adjunto todo sería más fácil, pero en estos momentos no lo tengo conmigo.... Tengo un archivo de texto que contiene caracteres de ancho fijo y un rango de celdas en un libro de Excel que contiene valores Mi deseo (que no consigo encontrar la forma de hacerlo) es crear una macro que busque en el archivo de texto todas las líneas que comienzan por la palabra "FORCE", compruebe si los caracteres de esa linea contenidos entre las posiciones 8 y 17 coinciden con el valor de alguna celda del rango en la hoja y, si coinciden, copie toda la línea del archivo de texto en un archivo nuevo .dat. Si tenéis una respuesta rápida, lo agradeceré. Saludos

Buen día estimado grupo, Estoy teniendo un problema que no logro encontrar solución. La cuestión es que el archivo que estoy trabajando, me está dando un problema al cargar un formulario de búsqueda de información. Este form lo que hace es únicamente una búsqueda en una base de datos, en el cual hay un combobox, que se llena con "datos únicos" de la base de datos. El código que uso para cargar el combobox es el siguiente: Private Sub cbx_Cliente_Enter() Dim Fila As Long, Final As Long Dim Registro As Integer Dim i As Long For Fila = 1 To cbx_Cliente.ListCount cbx_Cliente.RemoveItem 0 Next Fila Final = Hoja2.Range("A" & Rows.Count).End(xlUp).Ro…

hola amigos por politicas del foro tengo que publicarlo como otro tema estoy trabajando con un listbox que carga los datos que solicito pero dentro de este tengo otro modulo que es el de modificaciones este aparece cuando le das doble click a la linea pero cuando carga los datos en el campo que es el importe (textbox1) pone coma en vez de punto y esto esta ocasionando un error al mandar a imprimir ese listado,les solicito de su experiencia para poder corregir este detalle, que cabe bien mencionarlo nuestro amigo pajuma me ayudo en ello, adjunto el macro completo Este es el archivo: Private Sub CommandButton1_Click() Dim m As String m = MsgBox("Desea Guardar Las Modi…

Espero y me puedan ayudar con lo siguiente: Tengo un libro llamado Reportes con muchas hojas con distinto nombre cada una de ellas (ventas enero, ventas febrero, cobros marzo, etc), exisitira la manera de ejecutar una macro para que a la hora de imprimir me imprima el numero de pagina consecutivamente de todo el libro, es decir que si la primer hoja contiene 8 paginas la hoja 2 que contiene 13 paginas me la numere apartir del numero 9, por consiguiente la hoja 3 iniciaria apartir de la numero 22 ( 8 + 13 = 21 ) Esto lo realizo manualmente configurando en el menu Diseño de pagina/Pagina e indicandole apartir de que numero quiero que la imprima (primer numero de pagina) p…

Buenos días, estoy intentanto hacer un filtro avanzado en vba y no consigo que funcione. Estuve viendo un ejemplo que solucionaba Antoni pero ni así... Os paso el código para ver si podeis darme un poco de ayuda. Lo que me gustaría conseguir es un autofiltro avanzado donde pueda filtra las filas entre dos fechas que yo introduzca con un "inputbox" Sub filtrarfecha() Dim FechaIni As date, Dim FechaFin As date FechaIni = InputBox("Ponga fecha inicio") FechaFin = InputBox("Ponga fecha fin") ActiveSheet.Range("a5:a13").AutoFilter field:=1, _ Criteria1:=">=" & FechaIni, _ Operator:=xlA…

buenas tardes, me he decidido a crear un nuevo hilo porque no encuentro una solucion a mi problema... Necesito crear todas las combinaciones posibles de 24 letras agrupadas en grupos de 6... he leido mucho y probado muchos macros que he encontrado por ahi, pero no encuentro una solucion adecuada... Generar la lista de combinaciones En este hilo hay una macro pero tengo dos problemas, 1 no me deja combinar mas de 16 elementos y el segundo problema es que cuando pasa a introducir un elemento nuevo no repite los primeros... os pongo la muestra porque no se si me he explicado bien, un ejemplo de la combinacion resultante con 4 letras es el siguiente... AAAAAA AAAAAB A…

Estimados amig@s me sale el siguiente mensaje cuando llamo a un formulario: "Se ha producido el error '404' en tiempo de ejecución: No se puede mostrar un formulario modal cuando se muestra un formulario modal " Este formulario lo llamo desde otro formularioque lo uso como "MENU" el cual tiene un pagina múltiple y en una de las paginas tiene tres commandbutton un commandbutton funciona bien porque lo uso para llamar a otro formulario pero el segundo commandbutton le di la orden para llamar a otro formulario pero me sale el mensaje de arriba. Com pudo solucionarlo? Saludos Jesús

Hola amigos, buenas tardes. Trabajando desde Excel 2003, necesito crear un botón para que al hacer click, me abra el formulario “Presu01” de Access y que pueda ingresar datos en él. He visto algunas cosas por ahí pero no he encontrado lo que busco. Si alguien puede ayudarme, por favor, se lo agradeceré. Saludos

Se podría mediante código VBA en Excel posicionar el cursor en un sitio en concreto dentro de un Textbox?

¡Hola! Me encuentro trabajando con un archivo ubicado en un servidor Sharepoint. Deseo obtener la ruta local de dicho archivo en vez de la URL de SharePoint. He utilizado la función CELDA ("nombrearchivo") pero siempre me devuelve la URL También lo he intentado con una macro: Sub sss() FilePath = ThisWorkbook.FullName FileOnly = ThisWorkbook.Name pathonly = Left(FilePath, Len(FilePath) - Len(FileOnly)) [a3] = pathonly End Sub Pero también me devuelve la URL. Ni que decir tiene que el archivo está alojado en OneDrive empresarial y ubicado en mi equipo (con la opción de mantenerlo siempre en mi equipo). ¿Alguna idea para obtener la ruta…

tengo un formulario en excel con tres CheckBox, me gustaría que al seleccionar, ejemplo: 1.- si CheckBox1 esta seleccionado, en celda "q9" me coloque "si" y si no esta seleccionado,"no" 2.- si CheckBox2 esta seleccionado, en celda "r9" me coloque "si" y si no esta seleccionado,"no" 3.- si CheckBox3 esta seleccionado, en celda "s9" me coloque "si" y si no esta seleccionado,"no" espero puedan ayudarme con esta consulta, soy novato.:02.47-tranquillity: de antemano mil gracias por el apoyo.

Navegando por la red he encontrado un código para seleccionar objetos de autocad, es el siguiente: Public AcadDoc As Object Public AcadUtil As Object Dim objLinea As AcadObject Dim Punto As Variant Sub MacroSeleccion() Set AcadDoc = GetObject(, "Autocad.Application").ActiveDocument Set AcadUtil = GetObject(, "Autocad.Application").ActiveDocument.Utility AcadDoc.Utility.GetEntity objLinea, Punto, "Selecione objeto: " End Sub Sin embargo, al ejecutarse en autocad sólo me pone que designe los objetos. No me los selecciona automáticamente. He encontrado otro código similar, pero no me funciona. Creo que es más adecuado que el otro: es el siguiente: Dim SS As AcadS…

Buenas tardes amigos, Necesito ayuda por favor. Necesito hacer un buscarv() de la hoja "Base de Datos" de lo que ingrese en el textbox1: "RUC" del Useform3 y que aparezca en Razón Social(Label18) Creo que es algo sencillo pero a mi no me sale , soy novato. Ayudenme siii? Gracias de antemano Buscarv en vba.zip

tengo en un form de visual 6.0 un combobox el cual tiene 4 items (planilla1, planilla2 planilla3 y planilla4) tengo un botón en el cual quiero agregar que al darle click al buton en el cual quiero que ejecute un código dependiendo de la planilla seleccionada en el bombo ejemplo di es la planilla 1 ejecute el código plani1, planilla dos y ejecute plani2 y así sucesivamente.

¡Hola! Estoy creando un macro que contiene un formulario para llenar las celdas consecuentes a la selección del combobox que es la fecha. Me he detenido en un punto, donde no se como hacer referencia a la celda seleccionada en el combobox (Fecha Legal). Con esa Fecha lo único que necesito es que al dar clic al botón capturar, vacié esos datos. El formulario ya esta prácticamente completo. Estuve buscando como hacer refencia a la celda que contiene la fecha seleccionada en el combobox pero nada. Muchas gracias. SIGNOS.xlsm

Hola . Podria alguien decirme como dar formato a unos labels. pasa que en la validacion de mi trabajo, antes de imprimir, aparcen los datos cargados en unos texbox, a un label, pero quiero que los labels tengan formato "$ ###,###.00" ya puse el codigo y solo aparece en uno. estare haciendo mal lo demas¿???? agradecere la ayuda que me puedan dar,, este esl codigo ke escribi! Dim BuenoPor As String Dim Dia As String Dim Nombre As String Dim Domicilio As String Dim Telefono As String Dim lineacredit As String Dim FechaDeCorte As String Dim notass As String Dim ReemCapital As String Dim IntOrdianrios As String Dim IntMoratorios As String Dim CantRecibida As St…

Necesito copiar los datos de varias hojas de un mismo libro que se encuentran en la columna E y tenerlos los datos de cada columna, juntas en otra hoja nueva, después yo le agregaria los datos que se encuentran en las primeras columnas que siempre son las mismas. es *******..gracias

Hola compañeros, hace rato no ingresaba a participar del foro, pues las ultimas ayudas que tuve fueron de excelente utilidad; en esta ocacion vengo con otro interrogante: tengo un combobox con varios elementos (1-Acetaminofen, 2-Loperamida, 3-Omeprazol, 4-Timolol, 5-Loratadina, etc....) mi inquietud es, como puedo hacer para poder seleccionar dos o mas elementos de ese combobox??, o que otra herramienta puedo usar que me permita seleccionar dos o mas elementos??? Agradezco la colaboracion que me puedan brindar.

Hola buenos días Mi pregunta es la siguiente Lo que pasa es que soy principiante en esto de excel como desarrollador he creado mi primer proyecto el cual se insertan datos consulta y eliminar an estos en fin Lo que quiero es que al cerrar dicho proyecto también se cierre el proceso de excel Tengo un formulario "frmPrincipal" el cual tiene un boton salír # este boton al darle click cierra y guarda # Pero al dale salír cierra mi proyecto pero me voy al administrador de tareas y aun sigue en proceso *excel* Lo que quiero es que al darle click al botón salir me cierre, y también mate ese proceso de excel El código que tiene ese boton es el siguiente Private su…

Tengo una macro que me abre ie y me abre una web https logueandome con user y password, pero después de eso necesito que navegue dentro de la pagina a otra dirección, el primer paso me lo hace con la web que adjunto pero el siguiente paso no, me echais una mano. Es decir despues de .Navigate range("I4").Value tengo que ir a .Navigate range("j4").Value, como construyo esta macro. (puedo jacerlo con ie o con cualquier otro navegador). Un saludo. IR() Set obj = CreateObject("InternetExplorer.application") With obj .navigate Range("I4").Value End sub

Buenas tardes. Recuro a ustedes nuevamente, por que no puedo lograr hacer una simple suma de textbox que tienen formato de moneda, lo que quiero hacer es como un corte de caja, donde yo el numero de monedas y billetes y que me aparezca en otro texbox el total de cada moneda, y despues sumar los totales de los textbox de monedas y billtes. Ya tengo una idea pero la verdad no me funciona. El problema es que la macro funciona si meto los numero manuales, no funciona si los numeros me los da ya sumados. Espero me haga entender, o por sino, les dejo mi archivo. Si alguien desea ayudarme a resolver esta duda, que no encuentro yo la solucion. Gracias. Corte Caja.zip

Hola chikos, estoy acá craneandomelas para crear una macro que me tome el rango con datos y me cree los archivos. segun lo indique el rango. adjunto un ejemplo donde ya he logrado que un for me tome los datos del rango en una variable pero lo que me tiene complicada es como le indico que me cree 1 archivo con la cantidad de hojas que indica el rango. es complicado de explicar pero en el ejemplo seguro que entenderán mi problemática. desde ya le agradezco a cualquiera que quiera aportar un granito de arena a este caso y así poder entender. lo importante es que si yo el día de mañana quiero agregar una hoja nueva al archivo frutas por ejemplo pueda intertar u…

Hola a todos; He estado viendo si hay alguna macro que pueda convertir un archivo a pdf a Excel. He encontrado algo pero necesita tener instalada una librería de adobe acrobat para que funcione. No se si conocéis alguna otra forma. Saludos. Adjunto la macro MPdf-Excel.xlsm

Hola, como estan? estoy tratando de utilizar una macro para realizar búsquedas en internet (google específicamente), pero no logro dar con el texto del código fuente para insertarlo en la linea de código. agradecería mucho que me dieran una mano, gracias Sub LoginGOOGLE() Dim IE As Object Set IE = CreateObject("InternetExplorer.Application") With IE .Top = 0 .Left = 0 .Height = 1000 .Width = 1250 .Visible = True .Navigate "https://www.google.com/" Do While .Busy Or Not .ReadyState = 4: DoEvents: Loop .Document.getelementbyid("gLFyf gsfi").Value = "buscar lo que sea en goog…

Saludos Amigos Necesito realizar mediante macros de excel utilizando VBA solucionar problemas de transporte (costo mínimo, esquina noroeste). Pero estoy algo crudo con ese tema, alguno de ustedes me podría ayudar con algun documento como guía o si tienen un ejemplo que realice lo que estoy pidiendo, se los agradeceré. de antemano gracias por el apoyo.