Buenas tardes y gracias de antemano por la ayuda. tengo un libro de excel que lo quiero usar para controlar el flujo de documentos dentro de la empresa y mi consulta es la siguiente. la hoja 2(recepcion callao) se ingresan los datos de la factura en la celda L4 con cabecera area de envio va a tener 3 valores los cuales son contabilidad, costos y tesoreria. lo que necesito es que en base a una función macro si en la celda L4 dice contabilidad toda la fila desde A4 hasta K4 pase a la hoja 5 (contabilidad), o si dice costos que pase a la hoja de costos, este procedimiento se debe repetir conforme se vaya agregando mas items en las filas osea con cada documento que llega y e…

Muy Buen Dia, agradesco su ayuda. El problema es que tengo un UserForm con 40 ListBox, en los cuales con el evento Exit deben de ir Armando un "Where" que quiero usar para SQL, los primeros 20 ListBox lo hacen perfectamente, pero los Siguientes 20, no hace nada cuando se cumple el evento. Estube revisando paso a paso y primero cierra el UserForm y al final se va al Exit del Listbox(21-40) correspondiente. Este es el Codigo de ListBox1, que funciona bien. Private Sub F_1__Exit(ByVal Cancel As MSForms.ReturnBoolean) Dim F As New Collection For i = 0 To F_1_.ListCount - 1 If F_1_.Selected(i) = True Then F.Add ("Base.A1 = '" & F_1_.List(i) & "…

Hola a todos; Una duda que no soy capaz de resolver. Tengo dos textbox en un formulario y en el evento beforeUpdate una validación simple. También estoy usando en el evento KeyDown la tecla "F12" que una vez pulsada me retrocede y borra lo que tenía en el anterior textbox Si la validación no se cumple en el textbox2 me arroja un error porque no puede salirse del cancel=true y llevar el foco al textbox1. ¿Es posible salirse de ese cancel=true pulsando la tecla F12, o como podría depurar ese error?. Saludos a todos. MCancel.xlsm

Buenos días a todos, explico brevemente mi problema: Estoy intentando copiar las datos (solo los datos) de una celda (que contiene una fórmula Condicional) concreta de la Hoja "Tesorería" y pegarlo como un valor en la Hoja "Saldos Banco" en una celda concreta. No se exactamente cual es el código que hay que poner para hacerlo, paso el código de la macro a ver si me podéis ayudar con el problema. Sub CopiarDiciembre2021() 'Desactivar eventos pantalla Application.ScreenUpdating = False 'Importe INGRESO (Pagos BANCO) '.... Sheets("Tesorería").Activate '.... i = 8 'comienzo el bucle For i = 8 To 8 'compruebo que el valor…

Hola a todos. Con la siguiente problemática en el adjunto se encuentra una relación con indices de inflación. las cuales necesito para todos mis archivos, ya que son indices que utilizo con mucha frecuencia. Ya que siempre necesito el indice de determinado año y de determinado mes. Esto lo determino con la función buscarv hasta ahora, pero ahora este archivo va a estar disponible para muchas personas las cuales muchas manejan el excel a nivel básico. Lo que necesito es mediante un listbox en un userform me muestre los indices y también un botón para que el indice seleccionado me lo pega en cualquier celda. Espero haber sido claro de antemano muchas gracias. Indices_…

Resulta lo siguiente: Tengo muchos datos (5000) y aparecen datos que no me interesan. Estos datos que no me interesan los quiero eliminar de la siguiente forma: Pongamos que por ejemplo hay 100 filas en total, de esas 100 filas aparecen 40 que dicen Q, 20 que dicen W y 40 que dicen E, todas están en orden hacia abajo sin celda vacías de por medio. De ahí quiero que por ejemplo solo queden las últimas 10 que dicen Q, las ultimas 10 que dicen W y las últimas 10 que dicen E. Póngamoslo de otra forma: Ocupo que de las 100 filas me elimine las primeras 30 que dicen Q y me mantenga 10, que me elimine 10 de la que dicen w y me queden 10 y que de las 40 que dicen E me borre la…

Hola, buenas Tengo una recta (msoConnectorStraight) en posición vertical, y necesitaría, que a la altura de la mitad del tamaño de dicha recta, se acople, fusione, añada o como sea la palabra correcta, otra recta pero en posición horizontal, de tal manera que si modifico el tamaño de la primera, la segunda también modifique su posición para continuar en la ubicación correcta. Es decir, una macro que me muestre en pantalla dos rectas con la forma de un "T" pero, digamos, con la "t" de lado, y que si agrando o reduzco el tamaño de la recta vertical, la forma en sí se agrande pero que no pierda la forma. muy agradecido de antemano, saludos.

Hola comparto con ustedes una archivo de excel con una hoja, que tiene botones flotantes. Al iniciar la hoja los botones se pondran de color rojo (significa que no han sido usados) una vez se de click sobre uno, en la secuencia el siguiente se pondra en color amarillo (significa que es el que sigue de usarse), el anterior se pondra de color verde (significa que se ha utilizado ya y si se da click en el mostrara un mensaje diciendo que no es posible repetir la accion de este boton, ya que ha sido utilizado), despues de usar el boton amarillo, este se pondra de color verde y el que sigue cambiara a amarillo y asi sucesivamente. Donde de un click con el raton los botones le …

Buenas foro. Acabo de darme cuenta de que internet explorer desaparece y lo va a sustituir microsoft edge. Tengo muchas macros con las cuales hago scraping, abro internet explorer y relleno formularios, descargo paginas web, etc. Hay algo respecto a este cambio? En referencias de vba no he visto nada para microsoft edge, y ya que estoy aqui, hay algo para hacer scraping con firefox mozilla que no sea selenium?

Hola a todos, La duda que tengo es como hacer recorrer un rango por ejemplo (A1:A5) en el siguiente ejemplo: Function Revo(A1:A5, y) For f = 1 To 100 Tiwr = (1 + f * (A1 / y))*(1 + f * (A2 / y))* ... *(1 + f * (A5 / y)) If Tiwr > wer Then wer=Tiwr If wer=Tiwr Then t=f Next f Revo = t End Function Lo que quiero es que me de la f que hace maximo el valor de Tiwr que depende del rango A1:A5 y y. Gracias

Hola, me estoy metiendo en esto de las macros y me he econtrado un problemilla. Tengo un libro con un montón de datos que de hecho són vínculos a otros muchos libros. Se llama "Offers". Filtro estos y copio las columnas que me interesan hacia un nuevo libro, "Report". Funciona bastante bien pero en dos casos ("Margenes" y "Precio") sólo me copia la primera fila de entre las filtradas y no el resto. Cómo puede ser que funcione bien en algunas columnas y no en otras cuando és exactamente el mismo código? Y los origenes son todos vínculos y el destino tiene formato general de celda. Muchas gracias por vuestra ayuda, os pego lo que tengo hecho. Sub filtrar_offers() 'F…

Buenas Noches, trabajo en un empresa x en la cual hargo las facturas las cuales se asocian con un documento de salida que se llama guia de remision, normalmente los datos de la factura son los mismo que la guia, mas que no van los precios, para esto tengo este archivo, el cual es mi plantilla, lo que deseo es que de la hoja fact. se copien los item asi como las cantidades y toda la descripcion par no estar copiando de una en una a la hoja ejemplo. Muchas Gracias. ejemplo.xls

Buenos días a todos; -Llevo un buen rato a vueltas con un error y no consigo saber donde me estoy equivocando. Me explico un poco: Tengo un formulario creado con una serie de textbox y unos botones de desplazamiento para mostrar los registros. Para mostrar los registros hago una consulta a una BD de Access y por medio de la consulta me los devuelve a los textbox. ¿Lo que no sé es porque no me respeta los campos vacíos?. Adjunto macro de ejemplo. Saludos gracias anticipadas . Consulta.zip

Buenas Tarde a Tod@s soy Nuevo con VBA y hablo español muy mal quiero Vuestra ayuda para aprender un poco para mis tareas diarias. lo que necesito de momento es lo siguiente: tengo 2 hoja en el libro de excel y "Sheet1" es hoja principal y "sheet2" es solamente para tareas terminadas en la sheet1 tengo todos los datos (Tareas pendientes") y en esta hoha"Sheet1" en la columna "H" pongo datos cuando esta treminada. lo que quiero, es un codigo que me haga lo siguiente. 1- cuando pongo algo en la columna "H" esta fila me corta de la sheet1 y pega en el "SHEET2" en la ultima fila disponible 2- y de la sheet1 se borra dicha fila de momento eso es todo lo que…

Hola a todos: Estoy intentando manejarme con las macros.. y bueno he conseguido por ahí algún código semejante a lo que quiero hacer pero con el problema de no entenderlo en su totalidad, a la hora de buscar información me cuesta mucho, eso si lo consigo (puede que sea por torpeza) averiguar qué significa el código y quería preguntar si existe en algún sitio alguna especie de guía o referencia para los distintos objetos, métodos, etc.. donde quede reflejado su uso y significado de sus parámetros. Pongo un ejemplo de lo que no he sido capaz de encontrar en el siguiente código: With ActiveSheet.QueryTables.Add( _ Connection:="TEXT;" & sPath, _ …

Hola, espero estén bien. Me surge el siguiente inconveniente en mi trabajo. Tengo una base de datos de artículos (unos 500.000) el cual necesito "depurar" ya que el sistema de gestión tiene varias condiciones que hay que cumplir para su importación desde un libro de excel. La primer columna (Código) tiene las siguientes condiciones: Máximo de caracteres (16) Acepta letras mayúsculas y minúsculas de A - Z y números de 0 - 9 Acepta SOLAMENTE el carácter especial / NO admite espacios La segunda columna (Descripción) tiene las siguientes condiciones: Máximo de caracteres (255) Acepta letras mayúsculas y minúsculas d…

Buenos dias a todas, Lo primero agradecer a la plataforma el acceso gratuito en estos momentos. Espero y deseo que todos esteis bien Paso a detallar mi problema, me baje un archivo de la comunidad del gran maestro Antoni,he intentado adaptarlo a mis necesidades y he resuelto algunas cosas y otras no. Detallo los fallos que no soy capaz de sacar: 1º En columna C no me salen los datos bien 2º En la columna D Tengo que poner los nombres con numero porque sino los graba todos en la misma fila 3º En el cronograma si empieza la actividad en el mes siguiente al elegido aparece en el mes selecionado Por ultimo cada vez qu…

Tengo una hoja de datos y quiero crear un tablero con botones y que con cada botón se crea un tabla dinámica distinta tomando distintos datos, y que cada tabla dinámica vaya a una hoja especifica con su nombre. Pero grabo las macros y no logre que puedan funcionar.

Buen dia. Quiero que al seleccionar una celda aparezca una calendario Emergente, la tabla la tengo por mes en 12 columnas, el calendario que aparezca si estoy en la columna junio, por ejemplo, solo me muestre los dias de este mes y no me deje cambiar a otro mes, ademas en la parte de arriba va una celda para el año, y el calendario emergente solo pueda mostrar el calendario correspondiente a ese año y claro al mes de la columna seleccionada De ante mano agradezco su gran apoyo Adjunto archivo ---------------------------------------------- Excelente, agradezco mucho el apoyo de los 2, ya logre instalar office de 32 bits y ya puedo ver el calendario de tese1969, y es el…

Hola, es mi primer pregunta en este sitio web, pero he leído muchas respuestas que me han ayudado a aprender mucho. Tengo un formulario que almacena datos de unos usuarios, y necesito que se mediante un botón se pueda tomar una foto (donde una web cam y también de otros dispositivos) y la guarde en el disco. Estoy trabajando en un formulario creado en excel y uso vba para la programación. Muchas gracias por adelantado.

Buenas. En un rango de celdas (en este caso C2:C12), me da el resultado de busquedas. También lo tengo condicionado a que el relleno de la celda de color cambie. Lo que necesito es que si alguna celda del rango cambiara el color de relleno, me saltara un msgbox como advertencia, indicandome que se ha producido un cambio de color y un boton para aceptar la advertencia. En el ejemplo adjunto, he dejado las macros que contiene la hoja hasta ahora. Muchas gracias. AVISOS1.xlsm

Buenas, adjunto un fichero de ejemplo donde tengo en la columna A el id. Lo que hago es filtrar por Id = 1 y exporto a csv, luego por id = 2 y exporto a csv, etc. ¿Hay alguna forma de automatizar esta descarga con macro independientemente del nº de Ids distintos que haya? Gracias! Ej_Exportar.xlsm

Hola, cada semana debo enviar una presentación con la información que tengo en excel, pero tengo que presentarla en ppt,y los datos no los quiero vinculados sino como mapa de bits, no se cómo hacerlo, si alguien me puede ayudar mil gracias. Adjunto un archivo base de excel, el real tiene unas 15 hojas con datos y gráficos. datos.zip

Hola Expertos. Mi idea es esta: En la hoja 1, tengo en las celdas A2:C2 informacion ya sea en numeros o no. la idea es que cuando toque un boton en la hoja 1, este haga lo siguiente: 1-Borre las celdas A2:C:2 en la Hoja1 (Con el Fin de Volver a Crear en estas filas otro registro) 2-Que lo copiado de las celdas de la Hoja1, se peguen en la hoja2 al final de la lista ya existente, sin borrarme lo que tengo en ella, o sobre escribir en cima de la celda. Ejemplo: --- Hoja1--- (A) ( © (1) # Det Det (2) 8 I R --- 1:Borra la lista y suma un 1= Dejando un 9---- (Boton) ---0: Al precionar--- ---Hoja2--- (A) ( © …

Buen día, Solicito su colaboración con lo siguiente: Tengo que traer una información de una base de datos con clientes para ajustar un informe con las ejecutivas manejan cada cliente. Yo tengo la información que que cliente mueve cada ejecutiva. Estaba extrayendo ya de la información pegada, con una macro los clientes de la ejecutiva "A" por medio de un filtro avanzado con los datos que tengo previamente de que clientes maneja esta ejecutiva "A" en el rango de selección del filtro avanzado. Hasta ahí no hay problema. Los datos que debe traer para este ejemplo son: Cliente de la ejecutiva "A", Semana del año "2015-8", Fecha de paz y salvo "0000-00-00" Tipo "Liq".…