Buenas tardes, el tema es así, en un mismo libro tengo muchas hojas, en una de las cuales tengo una tabla con datos que se está "expandiendo" en filas, diariamente, para evitar que la tabla se ponga "pesada" quisiera mensualmente yo activar una macro que corte el contenido de esta tabla y la pegue en la parte superior de otra tabla igual, que está en otra hoja, así usar de almacenamiento esta segunda tabla. No se como armar una macro, con el grabador armé algunos que dan vergüenza y no funcionaban juntas Subo un ejemplo, el orden es cortar todos los datos de la tabla (BDVentas) y pegarlos en la parte superior de la tabla (Tabla9) osea a partir de la celda A3 …

Hola compañeros, Me gustaría dejar desactivadas (o quitar, si es posible) las opciones que están marcadas dentro del cuadro rojo de la imagen adjunta, y dejarlas desactivadas tal y como aparecen en el cuadro azul. No he realizado nunca nada así, y toda la información que encuentro por Internet me aconseja realizarlo desde código XML. Pero estoy convencido de que debe de existir una sentencia algo parecido a la siguiente: ... Application.CommandBars.Controls("Eliminar").Enabled = False ... Un saludo, y muchas gracias por vuestro tiempo.

Necesito ayuda para capturar una imagen desde cámara web CommandCam.exe Formulario_Avanzado.xlsm

Hello everyone as always when it comes to evaluating by column; I lose myself in a glass of water. My problem is this: 1) In Column (A2: A200) I should enter dates 2) I would like you to write me only the day of the week of that date every time I enter the dates in the column (B2: B200). 3) While in column (C2: C200) he wrote me the same thing as in column (B) but taking only the first letter. As for example: If in Column (B) it is written (Monday) in Column (C) it should only show the letter (L) that's all! Thanks as always for all the help you want to give me about it. Greetings from Maurizio Modificare_Giorni_Set_e_Giorni_Set_Solo_Prima_Lettera.xlsm

Hola Foreros!! Tengo un macro que hace parpadear el fondo de un rango de celdas si en una determinada celda hay cualquier valor numérico. Pero sólo me funciona cuando introduzco directamente el valor en la celda; cuando el valor proviene de una fórmula no se ejecuta el macro. Además me gustaría que no solo reconociera el valor numérico sino cualquier texto en general. He probado con Private Sub Worksheet_Calculate() pero no me funciona El código que me funciona es el siguiente: Private Sub Worksheet_Change(ByVal Target As Range) If Not Intersect(Range("AR5:BB19"), Target) Is Nothing Then If WorksheetFunction.Count(Range("AR5:BB…

Buenas noche, expertos necesito una yuda tengo un formulario que funciona bien, pero el detalle es cuando la hoja socios esta vacia solo con los encabezados y registro los datos con el formulario se debe agregar en la fila 2 pero este se registra en la tercera fila, solo eso de ahi adelante segistra una tras otra, lo que pido ayuda es que empiece registrar desde la fila 2. El otro tema es al momento de filtrar con la caja de texto buscar por apellidos me filtra bien pero cuando selecciono la casilla no funciona, pero si selecciono la casilla sin filtrar me selecciona la fila del ListView y los datos me muestran en los campos de texto. Por favor me podrian ayudar que…

Buenas Noches estimados amigos, hace algún tiempo atrás me solucionaron mi vida en relaciona a que me modificaron un macros para distribuir deuda equitativamente , el tema que ahora por favor, necesito que me ayuden nuevamente. En resumen, yo trabajo en una empresa de cobranza, la que debo distribuir equitativamente : en monto de la deuda y según el % que se entrega a cada trabajador, es decir, según la tabla que me entreguen es el % que se distribuye segun el total, y además para cada uno debe ser equitativo en relacion al monto de la deuda, ya que a veces a algunos se les entrega muchos casos de monto bajo , por eso lo hago manual, llevamos 3 semanas de esta fo…

Buenas tardes estimados/as, quisiera pedir de su ayuda, estoy creando una macro que me identifique las diferencias pero lo que quiero es que me resalte solo los caracteres diferente en la columna 1 , hasta el momento solo he podido que me resalte todo el texto, así que adjunto mi planilla, le agradecería su ayuda me estoy desesperando!! Nuevo Hoja de cálculo de Microsoft Excel (2).xlsm

Hola a todos por aqui Ya tengo un macro que me realiza un Ping a una lista de IP que aqui muy amable me ayudaron a corregir unos errorsillos que me ayudo a perfeccionarlo, pero ahora estoy intentando hacer que la prueba me la realice el tiempo que uno le ingrese, pero me me marca el siguiente error tengo 3 botones, 1 corre la prueba de PING, 2 inicia el autoping, 3 detiene el autoping y el codigo que tengo es el siguiente Dim Tiempo As Variant Dim contador As Long Private Sub PingLista_Click() Call EnviarPing_CSR_Concent End Sub Private Sub Fin_AutoPing_Click() On Error Resume Next Application.OnTime Tiempo, Procedure:="Inicio_AutoPin…

Hola buen día masters! He seguido avanzando con una macro que me ayudaron a construir en el foro pero ha crecido el alcance y de tener 2 filtros por medio de "Combobox´s" ahora son 3 filtros pero no funciona del todo bien porque la intención es que al seleccionar cada combobox filtre los datos y los vaya mostrando en el listbox. 1er combobox_año: OK si lo filtra y muestra los datos en el listbox 2do Combobox_mes: FAIL desaparecen los datos del listbox 3er Combobox_area: OK si lo filtra y muestra los datos en el listbox La función encargada de filtrar se llama Consulta dentro del UserForm llamado "Solutek". Por otra parte una vez filtrada la…

Estimados amigos. Me surge una duda, existe una forma de saber si se ha deseleccionado un Item de un ListBox ¿? Es decir, si tengo el primer item de un ListBox seleccionado, y lo destildo, hay manera de registrar esta acción para poder ejecutar una macro ¿? Agradecido de antemano por vuestra ayuda.

Un saludo al foro, para solicitar un favor especial al foro .... ayuda grabar datos del ListView3 a una hoja3 Deseo controlar 3 procesos de producción de unas secciones a través de un el ListView3 , Llevo varias semanas sin exito, tratando de registras los datos, del ListView3 a la hoja BADEDATOS desde la Columna E hasta la columna AB sin tener éxito, he realizado varias pruebas en algunas me graba solo un dato, en otra me repite el mismo dato en todas las celdas Busco Concreto : Grabar del ListView3 Columna MEDIDA, Columna CANTIDAD me grabe los datos a la Hoja BASEDATOS desde la columna E hasta Columna AB en ese orden (Anexo link imagen .jpg) agrad…

Hola amigos de AE, quería hacer una consulta por favor. Tengo una hoja oculta con 1000 filas y 16 columnas (A1:P1000) que se actualiza de otras hojas a través de fórmulas y macros. Nunca se mete dato manual. ¿Es posible ejecutar en dicha hoja una macro, cada vez que se actualice el valor de una celda del rango indicado? He intentado por el evento Change pero no lo logro. Agradecido de antemano.

Buenos días, Soy muy nueva en el mundo de la programación VBA, y necesitaría ayuda en una macro que estoy haciendo, los datos el usuario los introducirá a traves de un formulario, la cuestión es que quiero que no deje poner introducir fechas anteriores al día de hoy, estoy probando con el siguiente código If Cells(ultimafila + 1, 13) <= Date Then 'No se puede poner fechas anteriores a hoy MsgBox "La fecha es anterior a hoy" Exit Sub Pero me sigue añadiendo la información. ¿Podéis indicarme cual es el error?Gracias

Buenos días; Hoy necesito ayudaexcel ? Adjunto una macro que envía por mail tabla en el cuerpo del mensaje de forma automática si necesidad de abrir el outlook. En la hoja excel tengo datos de facturas con vencimientos y lo que no se como hacer es que la macro valore las facturas cuyo vencimiento se haya cumplido y las envíe por mail. En dicha hoja estarán los vencimientos de varios clientes y solo debe enviar las facturas vencidas de todos los clientes a cada mail. -Adjunto macro explicativa. Saludos a todos y a ver si se logra entender bien MAlertaVencimiento(e).xlsm

Hi Everyone My new problem is this: On an Excel sheet in Column (C) 1) I would like that every time I enter a word like ("btp fut") or write ("btp ital") the letter (L) should appear in Column (P) 2) While If in Column (D) I enter a Date less than 5 days compared to today's date We will have to create the lettara (D) in the column (P) 3) If in Column (I) the Writing ("change balance") is shown and in Column (J) it does not contain (0), the Letters (CS) in column (P) should appear 4) If in column (K) I write the word ("square *") Write the letter (Q) in Column (P) Let's say I don't expect you to do all the work for me But that you help me …

Buenas noches amigos necesito una ayudita para los que les gusta comparatir su conociemtiento en VBA, estoy tratando de desarollar un formulario que carga o enliste en una hoja de excel archivos pdf con sus caractieristicas generales y a su vez luego poder visualizar en un Web Browser. Este formulario cuenta con un textbox donde se visualiza la ruta del archivo a cargarce en la lista de la hoja1, el boton examinar buscará el archivo a enlistar, una vez que tengo mis archivo estos se visualizar en un combobox y al escoger puedo visualizar, no se si el boton Cargar PDF esta demás para visualizar porque simplemente se elegiria del combobox. Me intereza también poder extraer …

buen dia en el archivo adjunto se organiza en cada hoja l ainformacion del producto entrada salida y existencia con formulas pero tengo problemas ya que el archivo que manejo es de mas de 30 productos y mucha informacion por lo cual aveces se me bloquea el excel. por esta razon busco ayuda para pasarlo a macros gracias EJEMPLO DE CAPTURA Y ORDEN DE KARDEX.xlsx

Hola a todos, Quiero usar la variable ( .List ) en mi macro pero VBA pare ser que no la encuentra como si no existiera. No entiendo nada. Os adjunto las capturas de pantalla. Como podéis ver en la lista desplegable de VBA no aparece esta variable que acabo de escribir. Pero he seguido escribiendo el código a mano, esperando que me saltara algún error o que se pusiera en rojo el código ( como cuando lo has puesto mal ) pero no es el caso parece ser que está bien aparentemente. Pero cuando ejecuto la macro me salta ese error. Creo que porque no reconoce la variable .List Creo que no he cometido errores en e…

Hola, buenos dias Tengo un codigo el cual pido que me copie de una hoja llamada SOLICITUD_DE_RMA´S del rango B28:J37, lo copiara a una hoja concentradora llamada CTRL_RECTIFIC iniciando en B4 y luego pase a la siguiente linea par seguir agregando mas , pero me marca un error, mi codigo es el siguiente: Agradeceria muchisimo su valioso tiempo y apoyo, ya que no logro dar con el error............... saludos amigos SUB COPY_DAT() ' Dim strTitulo As String Dim Continuar As String Dim TransRowRng As Range Dim NewRows As Long 'te cambié esto porque a medida que crezca el Integer no te va a servir Dim IColum, J As Integer ' strTitulo = "RECTIFICADORES - CONTROL D…

Buenas tardes y agradezco el tiempo de quienes puedan ayudarme, veo que ya hay soluciones a macros las cuales copia el contenido de varios libros y los pone en uno solo en la hoja1, sin embargo quisiera saber si se puede lo siguiente: tengo tres libros con cierto número de hojas, el 1° tiene las hojas a,b,c, el 2° tiene c,d,e, y el 3° tiene las hojas f,g,h, a partir de aquí quisiera saber si se puede lo siguiente, al momento de ejecutar la macro me cree un libro con las hojas de todos los libros anterios pero si en un dado caso como es la hoja "c" que hay en el libro 1 y 2 se combine mientras que los demás solo se almacene es decir al finalizar la macro debe quedar un lib…

Hola compañeros, Tengo un módulo de login que me mantiene ocultas las hojas del libro, siempre y cuando el usuario no se haya identificado previamente. El caso es que cuando abro el libro en otro equipo (evento Workbook_Open > Abrir FormularioDeAcceso), me aparece el típico mensaje de "Habilitar las macros". El problema es que YO NO QUIERO QUE EL USUARIO PUEDA VISUALIZAR EL CONTENIDO DE ESAS HOJAS SI NO ESTÁ LOGUEADO. Y claro... Simplemente, con cerrar el mensaje de habilitar las macros y un click derecho "Mostrar hojas" es suficiente para visualizar el contenido de las hojas, sin necesidad de tener que loguearse. Por eso mi pregunta es: ¿Sabéi…

Hola amigos. En una hoja con AutoFiltro quiero usar una macro para borrar una o varias selecciones de filtrado de forma que restablezca la totalidad de la tabla. He probado con la siguiente instrucción: ActiveSheet.ListObjects("datos").Range.AutoFilter Cumple con la función de borrar la selección y restablecer la tabla pero quita el modo de Autofiltro, lo cual no interesa. ¿Alguien me puede ayudar con otra opción que permita borrar la selección manteniendo el modo AutoFiltro? Gracias. ejemplo.xls

Hola a todos, Tengo un problema a la hora de renumerar asientos de contabilidad en excel. Copio listado para que se vea más fácil ademas de explicarlo. Cada asiento tiene un número de documento, y cada asiento tiene varias líneas, que están numeradas a partir del 1. Si elimino algunas de estas líneas, necesito que la numeración se haga de nuevo. Por ejemplo, el asiento 20000 tiene 5 lineas, numeradas del 1 al 5. Si elimino la línea 4, necesito que el resto de lineas se numeren del 1 al 4. Veis posible hacerlo con fórmulas de excel, o sería necesaria una macro? En el ejemplo, si elimino la linea 2 del asiento 21003434, necesitaría que los números de línea se nu…

Hola amigos tengo mi reporte que agregue activeprinter.show que me muestra la caja con las impresoras en red el cual al momento de imprimir lo hace, el problema es que cuando doy cancelar no lo hace y me manda la impresión, en el adjunto les detallo mas el problema que tengo es lo ultimo que me falta y solo es una parte de todo el sistema Se les agradecería cualquier ayuda Gracias... Formato Final.xlsm