Macros y programación VBA

buenos dias al foro. por mi trabajo debo utilizar equipos de 32 o de 64 bits indistintamente. el problema se presenta cuando ejecuto macros en un sistema que no lee el otro. el aviso que se presenta es el que se ve en el archivo anexo. he cambiado la instruccion declare por ptrsafe para leer en 64 bits, pero cuando voy a 32, se presenta el error inverso. hay alguna manera de detectar si el tipo de sistema con el que trabaja el equipo para evitar el error? saludos desde venezuela.

Bueno como el titulo lo dice quisiera que el listbox mostrara solo el rango de datos filtrados en este caso la fecha. no quiero que considere en los datos que muestra la fecha 00-01-1900 el filtro ya esta aplicado en la hoja reporte naves espero haberme explicado bien. adjunto archivo para su revisión de ante mano muchas gracias. PRUEBA REPORTES.rar

Hola a todos! tengo esta macro: Sub loco() Dim CompareRange As Variant, x As Variant, y As Variant, contador As Double Dim RANGES As Range Set CompareRange = Sheets("PRECIOS").Range("B1:B1000") Set RANGES = Sheets("COMPRAS").Range("B1:B1000") Application.ScreenUpdating = False Sheets("PRECIOS").Select Range("A1").FormulaLocal = "=CONTARA(B1:B1000)" For Each x In RANGES For Each y In CompareRange If x = y Then contador = 1 Next y If contador = 1 Then contador = 0 Else Cells(Cells(1, 1…

Buenos días, Como bien dice mi nick soy totalmente novata en el tema macros, vba y programación pero en la empresa me han puesto a ello así que no me queda más remedio que buscar y preguntar, perdonadme si me pongo pesada Me gustaría saber como creo un historial con una macro para un libro de excell en el que quede registrado nombre de usuario, fecha y el cambio que ha hecho y que este no se borre cuando se hacen cambios nuevo, ni pasado x tiempo. El libro tiene 3 hojas (Informe, Datos, Historial). Gracias

Buenos días, Necesito poder mostrar una lista de datos en función de unos criterios elegidos. Estos criterios pueden ser elegidos a través de una lista o bien por un campo libre de busqueda. (Adjunto archivo) en la hoja3, estaría la consulta. los campos amarillos son los que el usuario tiene que poder rellenar según su necesidad de busqueda y no necesariamente se tienen que rellenar todos, es decir, puedo buscar unicamente por proveedor o familia de producto, o por 2, 3 ó todos los criterios de busqueda. Para complicarlo un poco más, he añadido un campo libre de busqueda por texto, p.e., por si no conocen ni el proveedor, la familia, etc... Muchas gracias de antemano, …

Buenos días, Al poner a prueba mi plantilla para generar .csv observo que en un trozo de un string que deseo crear no se me inserta del todo bien un hexadecimal. Me explico, el string que deseo crear tiene el siguiente formato: .1A.XX. Se puede observar en el ejemplo adjunto que en la segunda hoja, segunda columna hay una lista de números. En la primera columna de la misma hoja hay los números convertidos a hexadecimal. La macro únicamente genera el string en la primera hoja utilizando estos números en hexadecimal. Ahora viene el fallo. Si nos fijamos bien en el resultado obtenido en la Hoja1, observamos que los hexadecimales que terminan en "A", es decir, "1A", "2…

Ante todo, buenos dias. Necesito vuestra ayuda para poder tener la siguiente hoja de excel en plan. Se trata de una hoja de seguimiento de trabajos y necesitaria cumplir los plazos para entregar las cosas entonces querria tener: -Columna APERTURA, ahi simplemente se introduce la fecha en la que se inicia la obra -columna FECHA DE ENTREGA, simplemente se introduce la fecha en la que hay como limite maximo para entregar la obra. -Columna DESCRIPCION DEL MATERIAL, simplemente se describe de qué se trata. -Columna INCIDENCIAS, simplemente se especifica si esta pasando algo con esa obra. Y ahora viene lo dificil creo -Columna ALERTA 15 DIAS ANTES, necesito que 15 dias…

Buenas Noches: Mi duda es la siguiente, estoy realizando una macro que busque un valor tipo texto que se encuentra en una columna © dentro de otra columna de este tipo(, con el fin de copiar un código(columana a) que acompaña a ese valor encontrado. Es decir, si encuentra el valor, pegar ej: en la columna D el condigo que acompaña a este. El problema radica en que no encuentro una fución que simplemente me diga si ese valor esta en la columna y en q posición para asi copiar el código, como lo hace la función VLookup o buscarV, espero me entiendan, adjunto un ejemplo de como deberia quedar la columna resultado D A B C D 1 1 pe pe 1 2 1 pe l…

Hola, quisiera que pudieran ayudarme con este proyecto, se trata de automatizar y hacer mas simple el registro de los usuarios que ingresan a mi centro de informática.... Quisiera un código, de preferencia en macros que me ayude con la inserción de un dato numérico que a su ves me guarde la fecha y la hora en que fue ingresado, y tiempo mas tarde, ingresar el mismo código y que de nuevo me ingrese la hora final, para después ser restados y me den el tiempo transcurrido... adjunto el archivo original de mi registro para que se puedan dar una idea de que es lo que busco. Nota: tengo un código grabado en mi hoja, que cuando ingreso un dato en numero de cuenta, me regresa la …

Estimados amigos: Aprovechando vuestra amabilidad y conocimientos, lanzo otra petición de ayuda por si alguno puede echarme un cable. En la hoja de Excel que estoy diseñando (la misma que he enviado en otra consulta anterior), los datos vienen agrupados en items de cuatro filas (esto se ve mejor en el archivo que adjunto). El caso es que necesitaría alguna macro que me permitiera insertar un nuevo item (las cuatro filas) entre otros dos items. Además, las fórmulas, lógicamente, deben conservarse y hacer referencia al nuevo ítem insertado. Por último, al haber incluido ese nuevo elemento, será necesario reorganizar el resto de items para que cada uno haga referencia a su…

Estimados amigos: me permito solicitar su colaboración con respecto a lo que me esta sucediendo con el archivo (2)_Devoluciones.xlsm el cual fue un excelente aporte que realizo otra persona en el foro y que permite llevar un control de devoluciones, lo que sucede es que el funciona correctamente en una pc que tengo pero cuando trato de ejecutarlo en otra pc diferente sucede algo que no he podido identificar a que se debe, los valores de en el formulario se multiplican x 100 cada vez que selecciono la celda del formulario. espero que me puedan ayudar solucionado este inconveniente. mil gracias por su ayuda. (2)_Devoluciones.rar

Estimados amigos: Vuelvo a abusar de los conocimientos de este foro para ver si alguien puede echarme una mano con una macro que me permita importar los datos de un archivo TXT tabulado a una hoja de Excel, pero con desplazamiento de referencias. Es decir, los datos importados no se copiarán en celdas contiguas, sino que lo harán en filas y columnas distintas (aunque con un patrón determinado). Adjunto un archivo que espero aclare lo que necesito. Agradezco de antemano cualquier ayuda que puedan prestarme. Cordialmente. Macro TXT2XLS.zip

Estoy haciendo una busqueda con macro en base a 2 criterios por dni o por apellido utilizando el siguiente codigo: Private Sub btn_buscardata_Click() Dim contador As Integer Dim s As String Dim i As Integer s = txt_criterio.Text contador = 2 Dim flg As Boolean If rb_dni.Value Then contador = 1 End If If rb_apellidos.Value Then contador = 4 End If lbx_datos.ListIndex = -1 If txt_criterio.Text = "" Then Exit Sub End If For i = 0 To lbx_datos.ListCount - 1 If UCase(lbx_datos.List(i, contador)) Like UCase(s & "*") Then lbx_datos.ListIndex = i fl…

Saludos estimados Tengo un archivo el cual esta vinculado con el software SAP, al exportar los datos de este programa mediante una maro en cierto momento me sale un mensaje emergente el cual dice "Excel esta esperando que otra aplicacion complete una accion OLE" al cual le tengo que dar en aceptar (unica opción) reiteradas veces para que mi programa continue ejecuntadose. Quisiera saber como suprimir este mensaje o en todo caso un comando para poder aceptar este, probe con application.displayalerts pero no me dio resultado, disculpen si no subo el archivo pero es muy pesado.

buenas e visto aqui en el foro como enviar nombre y contraseñas a una web yo tengo el mismo problema incluso e podido abrir con el internet explore pero aquien mi pais el explore demora mucho en cargar quisiera saber si también se puede abrir con el google chrome y me dejen su comentario

Hola amigos quisiera que me ayuden nesecito guardar los datos ingresados en el formato que adjunto, para luego buscarlos por codigo de cliente y poder modificar los datos si es nesesario, podrian ayudarme con un ejemplo en mi mismo formato con las primeras celdas solamente, que guarde solo los primeros datos luego que busque el cliente por nombre o codigo, y luego que pueda modificar los datos, para luego imprimirlos, gracias de antemano. EVACRED FENIX S.A.rar

Buenos días, amigos del excel. Los molesto un minuto para ver si me pueden ayudar con el siguiente tema. Quisiera crear una macro que me permita copiar una serie de datos, en función de una cantidad de veces. La idea es que me copie tantas filas como le orden a la macro. Dejo un archivo con algunos datos esperando que ayude a enteder lo que necesito. Ej para macro.xls

buenos dias al foro. he estado trabajando con formularios en vba 6.3 y por mas que reviso mi codigo y los temas que ya ha tratado no encuentro como solucionar el error que me arroja a la hora de "ejecutar" el segundo de los cuatro formularios que utilizo. basicamente la idea es que al terminar de capturar un numero en un textbox aparezca en otro el nombre asociado a ese numero que describo en una hoja del archivo de excel, como se que en el textbox pueden capturar cualquier cosa escribí codigo para forzar a que se capturen solo numeros y despues coloque cdigo para saber que hacer en caso de error y ahi es justamente donde "truena" mi formulario. anexo el archivo y col…

Buenas Tardes Tengo un archivo con una macro para abrir un documento de word con excel y la macro funciona bien. Pero me pregunto cómo debería escribirse el código vba para que se abriesen varias hojas incluyendo la ruta de cada documento. En mi ordenador podría colocar todos los documentos en la misma carpeta para simplificar la ruta de acceso. Pero cómo hacerlo en este caso y en aquellos casos en los que los archivos están en carpetas directas. También querría saber cómo hacerlo con accesos directos que requieren la introducción de usuario y contraseña. ¿Podría alguien ponerme o añadirme algún ejemplo en el archivo que adjunto. gracias por adelantado. Borja abri…

Buen dia para todos los moderadores y todos los que deseamos aprender de este humilde foro, mi inquietud es la siguiente, tengo algunos comentarios en el formulario: 1 - Buscar la ruta de los libros y cargar el listbox.(001-2013.xls) 2 - Seleccionar los libros que se copiaran los valores en el libro seleccionado. (001-2013.xls) 3 - Copiar los valores del libro seleccionado. No se si estare bien explicado en base a las normas. slds, Fernando 006-2013.xls ORDIMPORTAR.xls

Buenas noches, por motivos de trabajo estoy intentando utilizar excel para abrir toda una serie de archivos para mi trabajo. Aquí adjunto un zip con una hoja excel en la que se incluye una macro para abrir un documento de word. Creo que es correcta pero no sé si falla alguna linea de codigo. Me podeis ayudar? Tb quería plantear la duda de como abrir accesos directos de aplicaciones con introducción de usuario y contraseña de modo que se pueda programar en vba la introduccion de estos datos de forma automática, si es posible. Espero vuestra ayuda. Gracias abrir_documentos_word.zip

Estimados amigos Luego de algún tiempo solicito su ayuda Tengo un reporte el cual me genera una fila por cada paso que da determinado proceso, lo que quisiera que me ayuden es crear un resumen a partir de este reporte que enliste en 1 FILA por cada procesos y que mientras el mismo cogido HR se repita tome información de este reporte (Fecha en que se recibe cada paso y usuario que recibe cada paso) y la ponga en columnas por cada paso que el proceso avance, hasta N pasos según el reporte (usuario que recibe, fecha que recibe, número de días que se tomó ese paso, que no será otra cosa que la fecha en que sale menos la fecha que llego). Tomando en consideración que la fe…

Etiquetas Twitter (HashTags): Quisiera ver quien me puede ayudar en mi libro, lo que necesito es poner la cantidad de articulos vendidos y que se valla descontando automaticamente de las existencias de mi inventario de verdad agradeceria me ayuden 1.xls

Hola ojala q alguien me pueda ayudar, necesito una macro que me guarde un archivo adjunto de Outlook, pero que sea de un dominio especifico ej. @ssss.com y que sea guarde cuando reciba el mail, osea que no lo tenga q ejecutar yo q se ejecute automaticamente cuando me llegue dicho mail de dicho dominio, ya tengo un Scrip Este es mi codigo, y la verdad es que lo encontre, ya qu no se programas , espero q puedan ayudarme.... Sub GetAttachments() Dim ns As NameSpace Dim Inbox As MAPIFolder Dim Item As Object Dim Atmt As Attachment Dim FileName As String Dim i As Integer Dim SubFolder As MAPIFolder Dim strInter As String 'Abajo pongo el nombre o parte del nombr…

Alguien me puede explicar como pasar un word a pdf desde vba?? Estoy probando con el siguiente código Dim wrdApp As Word.Application Dim wrdDoc As Word.Document Set wrdApp = CreateObject("Word.Application") wrdApp.Visible = True Set wrdDoc = wrdApp.Documents.Open("pathtoFile\Plantilla.doc") wrdDoc.ExportAsFixedFormat OutputFileName:="pathtoFile\wordtest.pdf", _ ExportFormat:=wdExportFormatPDF[/CODE] [/font][/color] [color=#141414][font=Georgia]Es lo que he encontrado googleando un poco, el problema esta en que la opcion ExportAsFixedFormat no me aparece por lo tanto en esa línea…