Hola amigos os envío esquema por si me podéis ayudar. Es un fichero .xlsm aplicación Vba Excel con formularios y código. Se trata de compartir el libro para que dos usuarios puedan trabajar en una oficina aparte donde está el servidor. Dos problemas: Al empezar a trabajar cada usuario debe actualizar el libro. Utilizo el ThisWorkbook.Save. ¿Hay alguna opción más "liviana" ? He visto por algún sitio "ThisWorkbook.Refreshall. El otro problema es que cuando intentan guardar o actualizar al mismo tiempo genera un error. ¿Se puede tratar ese error para avisar a uno de los usuarios para que espere mientras el otro haga lo suyo. La gestión es corta porque se trata d…

hola estimados compañeros: tengo un problemilla con un archivillo de Excel que uso en mi computadora de manera perfecta pero al copiarlo y ejecutarlo en otra maquina de mi trabajo me sale este error: "se ha producido el error '424' en tiempo de ejecución: se requiere un objeto" y al depurarlo la línea de amarillo que se posiciona sobre el siguiente código: userform1.show me imaginé que se trataba de alguna referencia dado las configuraciones de las instalaciones de los Offices pero la verdad al estar viendo las referencias no logré encontrar de cual se trataba. Yo uso office2007 y la maquina donde trato de abrirlo también pero la verdad no se a que se pueda deber es…

Hola, a todos estoy tratando de crear un formulario algo simple en la cual ingreso datos en textbox, y lo visualice en un listbox a traves de un boton que dice agregar, y que todos los datos agregados en el listbox, lo guarde en una hoja a traves de otro boton que dice guardar. pero en el combobox que tengo y son dos se pueda agregar datos desde las celdas de la hoja2. tengo otro formulario que tiene 3 combobox, que busque por fecha, codigo, nombre, indempendiente de cada uno y lo muestre en el listbox cuando precione el boton buscar. de antemano muchas gracias. estare pendiente a los resultados guardar datos.zip

hola que tal¡?, me gustaria saber como puedo hacer para pasar un dato (que para este caso es la cadena de caracteres "POSITIVO") de una columna dada a otra que yo le especifique?? en este ejemplo tengo la columna negativo y la columna positivo dentro de la columna negativo debe de estar la palabra "NEGATIVO" y dentro de la columna de positivo debe estar la palabra "POSITIVO" pero resulta que tengo ese problema y quiero separarlos porque dentro de la columna negativo tambien existe muchos palabras "POSITIVO" y quiero quitarlo como le hago?. Saludos y gracias Copiar un dato de una columna a otra.rar

Saludos, tengo este macro Sub nuevos() Dim ultimafila As Long Dim Origen As Worksheet, Destino As Worksheet Set Origen = Sheets("FORMATO") Set Destino = Sheets("Hoja2") ultimafila = Sheets("Hoja2").Range("B20000").End(xlUp).Row ultimafila = ultimafila + 1 PERO POR ESTE LADO QUISIERA VERIFICAR SI LO QUE SE VA A INSERTAR EN LA CELDA K12 DE Origen YA EXISTE EN LA COLUMNA D DE Destino, PARA NO REPETIR LOS VALORES, si no esta repetido ps que inserte los siguientes datos, si no q muestre un mensaje de error y no ingrese los datos. Destino.Range("B" & ultimafila) = Origen.Range("K10") Destino.Range("D" & ultimafila) = Origen.Range("K12") Destino.Range("E" &amp…

Pues trato de entrar a la web y el unico enlace que funciona es este, la pagina principal fue hackeada por un tal "fateh Uka Plus", por lo que le doy todo mi apoyo a los admin y estoy seguro que van a poder resolver este altercado y espero no sedan ante las peticiones de estas personas inescrupulosas. Desde Costa Rica todo mi apoyo para que puedan poner nuevamente a flote este estupendo foro.

Hola, quería saber si alguien podría ayudarme con lo siguiente. Tengo una hoja de excel donde cada fila corresponde a datos de un paciente. Lo que deseo hacer es que tras realizar la buqueda de este, poder añadir 5 campos de textbox a partir de la primera columna vacia en esa fila mediante un boton de comando. Adjunto archivo. PD: Lo que me interesa hacer es que se añadan los datos a la hoja sin especificar ne el codigo la columna ya que esta se modifica en función de los datos que se vayan añadiendo, aunque siempre tengan la misma secuencia (5 campos textbox). Un saludo y gracias. cmdagregar.zip

Buenas noches, nuevamente recurro a su ayuda se me ha presentado un problema quisiera ordenar por el tercer dígito ejemplo El primer numero es 105 le sigue 1051 luego sigue 1052, luego sigue 106 luego 1061 y después 1062 así sucesivamente con diferentes dígitos, sera posible hacerlo mediante una macro. Adjunto un archivo el cual explica como quisiera ordenar Gracias por sus comentarios y sus aportes. ordenar.rar

Buenas tardes, me gustaría añadir un progress bar con porcentaje a una macro que estoy haciendo, he intentado todo lo que encuentro en internet pero no he encontrado ejemplos con macros "normales", me gustaría saber cómo puedo poner un progress bar a mi macro. Hice un ejemplo X el cual adjunto, con el fin de observar dónde se pone el código para la progress bar y luego ponerla en mi macro original. Tengo entendido que la macro se debe dividir en varias partes para indicarle a la macro qué porcentaje debe avanzar, por eso dividí la macro en dos. Y de favor si me pueden indicar cómo la puedo crear en los objetos de vb. Muchas gracias por su atención. ejemplo ayuda excel.xl…

Buenas tardes, Tengo un problema estoy tratando de sumar los valores decimales de un listbox pero solo considera los enteros por ejemplo si en el listbox tengo 25.48, 20.36, 30.58 al momento de sumar y enviarme el resultado a aun textbox me devuelve 75 osea la suma de 25,20,30 no toma en cuenta los decimales les dejo el codigo a ver si pueden ayudarme gracias. Dim i As IntegerDim total As Long total = 0 For i = 0 To lstimporte.ListCount - 1 total = total + Val(lstimporte.List(i)) Next i TextBox4.Text = total TextBox5.Text = Val(TextBox4) * 18 / 100 TextBox6.Text = Val(TextBox4) + Val(TextBox5)[/CODE] en el textbox4 es donde recibo la suma de los valores. ade…

Saludos tengo un gran problema y es que debo hacer que un Userform de un libro1 con un spreadsheet en este Userform me envie unas filas a otro libro(libro 2).. por ahora es solo esto. Tengo el spreadsheet ya montado pero aun no el codigo porque no se que poner. adjunto el libro uno con el formulario y el spreadsheet en él y el libro 2 el cual recibira los datos organizados que esten dentro del spreadsheet. advierto que se podrian necesitar librerias que permitan mostrar el spreadsheet en el userform, aun no lo se, ya que desde el equipo de la empresa lo puedo ver pero desde el de mi casa no(supongo que es por eso) gracias Desktop.zip

Hola amigos una aplicación hecha en Excel 2007, con 12 formularios, una interfaz con todas las hojas ocultas y extenso código después de estar funcionando 5 años en Excel 2007 si error. Al abrirla con Excel 2013 todo funciona bien y no da ningún error, pero al cerrar un formulario con el código al final SaveWorkbook para que guarde cambios , da un error en el evento MouseMove de una etiqueta (label) del interfaz. Una etiqueta que al aparecer al pasar el puntero del ratón encima y hacer click, se visualiza un Formulario. El error es: Error en tiempo de ejecución: Error definido por el objeto. Mi pregunta es por qué vuelca un error en un objeto que no tiene nada que ve…

Llevo dando vueltas sobre esto un tiempo pero no doy con la tecla/codigo despúes de buscarlo. Lo que quiero conseguir es que tras hacer una búsqueda, en un listbox me liste los datos, en mi caso son todos de una fila de una hoja de Excel, sin embargo quiero que cada 5 columnas (partiendo de una determinada) se correspondan a una fila (con numeración por orden) en el listbox siempre que tengan datos estas celdas. En cuanto al encabezado de las columnas del listbox sería siempre el mismo. Adjunto archivo Sería la hoja "cambiotar" despúes de localizar un paciente. En concreto las columnas desde la A a la H estarían vinculadas a la hoja "basal". Un saludo listbox filas…

lo que quiero que me ayuden a hacer es que deacuerdo al archivo de que mando, del contenido de la celda A2 (hoja 1) me busque el contenido de la celda A2 (hoja 2) y el resultado lo ponga en la celda C2 (hoja 1) y lo mismo con la celda B2(hoja 1), eso digamos es facil con un simple =buscarv, pero al revisar el "titulo" donde dice TOTAL (si lo hago con el buscarv) solo me va a poner el primer argumento que busca esdecir me va a poner "5" pero si yo tengo "15" como puedo hacer yo para que me ponga el total de las dos celdas tanto el total de la celdas como el "numero" espero y me entiendan, pero es que no se como explicalo bien dejo el archivo de antemano muchas gracias eje…

Buenas Dias amigos, Pues ahora vengo con otro temita, lo que sucede es que en el archivo que adjunto, tengo un registro para pedidos, el cual al ingresar no hay problema el tema es al actualizar. En la pestaña CANTIDAD DE OC se debe mostrar la cantidad total de ordenes, que claro, al momento de registrar la primera entrada si se muestra, pero da el caso que al momento que Debo complementar mas información de un pedido (Userform4), y se guarda, resulta que la cantidad antes mostrada se reduce, osea que si modifico/actualizo todas las ordenes queda en “cero”, alguien podría apoyarme con esto??? para que asi sea que actualice se mantenga la misma cantidad? Muchas Gracias …

Saludos, intento simplemente crear un macro para copiar y pegar celdas de dos hojas diferentes desde la ultima celda vacia.. "es mi primer macro" Sub nuevos() Dim ultimafila As Long ultimafila = Sheets("Hoja2").Range("B20000").End(xlUp).Row ultimafila = ultimafila + 1 Sheets("FORMATO").Range("K13").Copy Sheets("Hoja2").Cells(ultimafila, 2).Select en esta linea presenta el error Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _ :=False, Transpose:=False Sheets("FORMATO").Range("K15").Copy Sheets("Hoja2").Cells(ultimafila, 4).Select Selection.PasteSpecial Paste:=xlPa…

Estimadísimos amigos, este seria mi primer post, luego de meses de sacar soluciones, hoy me veo obligado a molestarlos...les cuento, estoy confeccionando un sistemita de controlde facturas y cotizaciones para el negocio de un amigo, pero al ejecutar una macro, en ocasiones me arroja el error de comando de seleccion multiple, el problema es que incluso al seleccionar solo 1 celda copiada en libro2 y pegarla en libro1 me arroja dicho error...no logro entender el por que de esto...les agradeceria si me pudiesen ayudar con esto. Aprovecho de subir los archivos por si los quieren ver, el problema esta en la Hoja Facturas del libro Formulario en el Boton Ver pagos Formulario…

Hola, necesito ayuda, con el boton de guardar de este userform no consigo que guarde desde el listbox a la hoja 1 como se puede mostrar en el archivo que subo y tambien que cuando agrego un articulo se borre automaticamente y no quede pegado para que no siga agregando, gracias [ATTACH]40623.vB[/ATTACH] libro1.zip

Hola, tengo una tabla en la quiero que se impriman solo aquellas filas en las que el valor de la columna A no esté vacia y también aquellas en que la columna D esté llena. Gracias a una macro que encontré en el foro consigo que se impriman las filas que cumplen la primera condición, que la columna A no esté vacia, pero no consigo hacer que también se impriman aquellas filas con la columna D llena. Os adjunto la macro que encontré para imprimir con una condición de celda llena y un modelo de la tabla que manejo. Mucha gracias un saludo a este gran foro pruebas_macro_imprimir.xls LUISFECAB - luisfichelson_Imprimir Factura de servicios.zip

Hola, si me pueden ayudar para crear una macro que lea los valores de la segunda columna (B1:B"X") en Excel y separe en otra hoja los valores que encontró repetidos. Me piden un informe de cuáles son los valores que están repetidos en una BD muy extensa. Les agradecería su colaboración.

Hola. Nos ha surgido un problema. Un compañero de trabajo que ya no está, confeccionó una hoja de Excel para llevar un control del mantenimiento de vehículos. Dominaba bastante la ofimática y realizó la misma con varias macros. Yo he tenido que adaptarla, eliminando previamente las macros, de las cuales no tenía la clave, siguiendo algunos tutoriales, pero necesito ayuda para poder terminarla, si puede ser sin necesidad de macros, pues no las domino. Seguramente existe la manera. El problema que quiero solucionar es, que una vez rellenado el formulario con la fecha correspondiente (Hoja “Vehículos”), los datos se introduzcan en la Hoja “Esta1” y se queden ya grabados. E…

Oculte el libro tratando de cargar un formulario y ahora no lo puedo abrir... Se que hice una tonteria pero necesito ver el libro ayuda

Hola, Antes de nada saludar a todos los usuarios. Acabo de vincular varias tablas dinámicas a un mismo filtro de informe con el código que vi en este foro y funciona perfectamente, el problema viene al seleccionar varios elementos dentro del filtro, si marco la opción "seleccionar varios elementos" deja de funcionar. Me podríais ayudar con el código para poder hacer filtros de varios elementos, por ejemplo si tengo el campo trimestres que pueda seleccionar T1, T2 y T3. Este es mi código: Private Sub Workbook_SheetPivotTableUpdate(ByVal Sh As Object, ByVal Target As PivotTable) Dim TablaDinamica As PivotTable Const Filtro1 As String = "Trimestre" Appli…

Hola amigos en el fichero .xlsm adjunto podéis que creé en Excel 2007 una aplicación en Excel con una interfaz a base de etiquetas (label) ocultas y visibles para cuando hacer click en ellas visualizar los formularios del Proyecto. Para lograr pantalla completa, ya que la Cinta de Opciones no me ha gustado nunca, el método Fullscreen me ha ido muy bien, pues es una ocultación "no violenta", pues haciendo doble click arriba en la ventana aparace otra vez la cinta. El problema ha venido cuando se ha cambiado a Office 2013 y en Excel 2013 el código corre sin dificultad pero en FullScreen y DisplayFormulabar=false, no se puede escribir en las celdas en otro proyecto en el …

Buenas tardes : Esta es la cuestión a ver si la explico bien , como lo puedo hacer ???? 1.Archivo excel con tres columnas A:Referencia producto ( Siempre sera el mismo) B:Descripcion del producto C: Precio, Cada referencia del producto corresponde a un fabricante y el problema es que no me mandan la columna con el fabricante para poder hacer una tabla dinamica con el fabricante para hacer listas de precios en libros aparte por fabricante para presentar al cliente, son mas de 2.000 códigos , lo que quiero conseguir es : 1.Asignar a cada referencia su fabricante : por ejemplo 880000 = Fabricas Pérez ( puede haber 100 ref.de fábricas Pére z )y se muestran Fabricas Pérez …