Pues eso... Digamos que tengo una hoja repleta de botones con macros y quiero dejarla estática, es decir, que el usuario no se pueda desplazar a través de ella haciendo uso de la ruleta del mouse. Supongo que existirá alguna manera más sencilla de programarlo, pero pienso que lo más lógico sería anular la propiedad SmallScroll del objeto Windows. Muchas gracias de antemano por vuestro tiempo.

Hola. Tengo un listbox desde el cual quiero copiar un item seleccionado con doble click. El contendfio lo copia bien pero al pegarlo siempre me pega "??", dos interrogantes. He utilizado varios codigos y siempre ma pasa. Alguien podria decirme que hago mal?. Este es el codigo que utilizo: Private Sub ListBox_CONCEPTO_DblClick(ByVal Cancel As MSForms.ReturnBoolean) Dim DMyData As New MSForms.DataObject 'Dim MyData As DataObject Dim copia As String Set MyData = New DataObject copia = ListBox_CONCEPTO.Text MsgBox copia MyData.Clear MyData.SetText copia MyData.PutInClipboard End Sub Gracias. MJ

Hola buenos días a todos. Soy nuevo en el foro y aunque he leído las normas, espero no estar haciendo nada mal por lo que pido disculpas de antemano. Tengo una cierta experiencia con VBA y actualmente intento reproducir un archivo GIF o video pero con fondo transparente en un Form, pero no llego a ver como hacer para que no se vea el formulario del control en el que se reproduce. Me explico mejor, se que se pueden reproducir utilizando un control WebBrowser para el gif o un control WindowsMediaPalyer, llegando a cambiar el fondo para el WebBroser, pero no soy capaz de hacer que se reproduzca con el fondo transparente (video o gif en general) de form que se vea lo que…

Buenas tardes, expertos para decirlo que recurro a su ayuda tengo una aplicacion en una hoja cuando pulso el boton buscar me muestra la ventana de inputbox para ingresar el codigo y buscar, pero que pasa cuando lo cancelo y/o pongo un codigo erroneo o que no exista no sale va buscando en toda la hoja y se repite muchas veces y no hay cuando terminar. Por favor si me pueden apoyar en que estoy fallando. Adjunto el archivo. Grupo 5_Holiday Inn Lima Airport Room Division Management (1).xlsm

Estimados Maestros de este foro quisiera por favor preguntar si alguien tiene conocimiento del porque ya no se puede abrir documentos pdf en formulario, tengo algunas aplicaciones creadas en vbproject de excel y visual basis y en ninguna me deja abrir pdf en formulario

saludos maestros. Tengo dos hojas una "mes" donde en la celda D1, se ingresa el nombre de el mes y sus datos específicos a ese mes ; y la otra "Mes general" con una tabla en la cual se van a trasladar los datos de la hoja mes. Lo que requiero es una macro para validar el nombre de el mes , que lo busque en la tabla y se registren los datos correspondientes a su columna.. De antemano mis agradecimientos por su pronta colaboración. buscarmes.xlsm

Buenos días tengo un formulario que me muestra el proceso de mis solicitudes de mantenimiento por porcentaje necesito que el me diga que la tarea esta terminada al momento que se habrá el formulario y detecte el 100 en el textbox con un msgbox pero no se como hacerlo soy muy nuevo en esto alguien que me explique por favor. GESTION DE MANTENIMIENTO.xlsm

Buenas tardes a todos; -Tengo un procedimiento para crear una marca de agua en el encabezado. -¿Sería posible que dicho encabezado esté centrado en la hoja? Gracias de antemano y saludos a todos. MAgua.zip

Buneos dias y muchas gracias de tod@s de antemano, tengo una base de datos de personal en la cual tienen asignado un puesto de trabajo asi como un material que se le asigna , me gustaria que cuando finalicen su periodo de trabajo el mateiral asignado , casco, chaleco, linterna, taquilla, se les quitaran y aparecieran como que estan disponibles para poder asignarlos a otra persona. pero si me gustaria que los datos de la persona permanecieran , sin tener asignado material. Muchas gracias por vuestra ayuda. tabla de material.xlsx

Buenas qué tal gente. Una consulta, hay alguna ruta o comandos para que pueda abrir WhatsApp desde excel? Desde ya muchas gracias!

Buena tardes, ¿me podrían ayudar a resolver este problema? - Soy nuevo en esto de las macros y esta vez san google no me ayuda :( Estoy tratando de poder copiar la unica hoja del archivo INDICADORES.xls al archivo recién abierto formado por los datos que se toman de la variable IN26, el problema es que cada mes cambia el nombre del archivo y su carpeta, el abrirlo no hay problema ya que la variable "IN26" se forma de los datos obtenidos de las celdas en la hoja y libro indicadores, pero al copiar la hoja,si no especifico el nombre del libro IN26U202106350114.xls la macro no funciona, intente en lugar de poner IN26U202106350114.xls la variable "archivo" y no funciono,…

Hola buen día!! No he podido hacer con un bucle que se cambie la ubicación de referencia relativa para copiar desde otra hoja. El programa que he hecho (adjunto) funciona como quiero pero quisiera hacerlo en dos líneas y con un bucle que haga que la ubicación de las celdas para copiar la información vayan cambiando. Use contadores, uno disminuyendo de uno en uno (R) y el otro de cuatro en cuatro (C) pero no me funcionó. Al mismo tiempo quisiera ir recorriendo hojas diferentes en el libro. 'Corrida 10 años Lote 171, 173', etc. Esta es una fracción del código: ActiveCell.FormulaR1C1 = "='Corrida 10 años Lote 170'!R[-132]C[-140]" ActiveCe…

Buenas tardes. Tengo una macro hecha para que copie los datos de una hoja y los pegue en otra. (nombrehoja1 es una variable que recibe el nombre de la hoja en la que se desea copiar los valores) Adjunto el código: Sub Copiar() Sheets(nombrehoja1).Range("G25").Copy Sheets("Hoja administrador2").Range("A2").PasteSpecial xlValues Application.CutCopyMode = False Sheets(nombrehoja1).Range("G42").Copy Sheets("Hoja administrador2").Range("A3").PasteSpecial xlValues Application.CutCopyMode = False Sheets(nombrehoja1).Range("G59").Copy Sheets("Hoja administrador2").Range("A4").PasteSpecial xlValues Application.CutCopyMode = False Sheets(nombrehoja1).Range("G76").Copy Sheet…

Hola amigos de excel una consulta. tengo una base de datos el cual me piden unos datos de algunas columnas. son facturas que tienen muchos codigos vendidos y lo que le interesa es que encuentre el total vendido por factura. lo hago con sumaproducto , despues hallo el igv y sumo , despues resto si en la columna de descuento hay algun descuento al final borro las filas que ya no necesito y me quedo con la factura unica. lo tedioso es estar copiando y ordenando las columnas para el reporte que me solicitan. en el ejemplo puse como termino haciendo el reporte que me piden . muchas gracias por su ayuda. SUMAPROPUCTO Y BORRAR DUPLICAD…

Hola de nuevo. Envío un ejemplo de lo que necesito, no se si esto es posible. Tengo unos datos en una hoja y en una celda calculo el % entre dos celdas. Hasta ahí es sencillo, pero lo que necesito es que en la celda donde se hace el calculo aparezca la fórmula como si no estuviera hecho con VBA. Por ejemplo, Sub ejemplo() lColumn = Hoja1.Cells(13, Columns.Count).End(xlToLeft).Column For x = 2 To x Hoja1.Cells(13, x) = Hoja1.Cells(12, x) / Hoja1.Cells(3, x) Next End Sub Sub ejemplo() lColumn = Hoja1.Cells(13, Columns.Count).End(xlToLeft).Column For x = 2 To x Hoja1.Cells(13, x) = Hoja1.Cells(12, x) / Hoja1.Cells(3, x) Next End Sub Es un eje…

Hola de nuevo. Hace tiempo que no molestaba pero he retomado algun proyecto que tenía aparcado y ya tengo problemas. Creo que es fácil, pero no logro salvar el error. Es con la combinación de Range y Cells. .Sheets("RES_Origen").Range(Cells(61, Val(mMes) + 2), Cells(84, Val(mMes) + 2)).Copy wdatos.Cells(5, col + 2).PasteSpecial xlPasteValues Con este código me salta un error. Sin embargo si lo hiciera con Range no da error. .Sheets("RES_Origen").Range("G61:G84").Copy wdatos.Cells(5, col + 2).PasteSpecial xlPasteValues He de usar la combinación con Cells porque está dentro de un bucle que va copiando diversas coumnas y no puedo fijar el Range. …

Buenos días; Estoy intentado hacer lo siguiente y corregirme si es que no se puede, adelanto un poco el tema. He adjuntado una macro con dos hojas y sus correspondientes encabezados en la fila 1. -He configurado una macro que borra todos los datos de ambas hojas. -También he creado otra que copia los datos de la primera hoja y los pega a partir de la fila diez creo recordar. Lo que necesito conseguir es copiar los datos de las dos hojas en una variable antes de que los borre y si los he borrado por error con la macro recuperar que pegue los datos que se hayan almacenado en la variable en cada una de las hojas. Igual lo que se pretende …

Buenos días a todos, a ver si alguien me puede ayudar en este asunto, a ver si soy capaz de explicarme. Queremos hacer una hoja de Excel para usarla como base de datos y controlar periodos de contratación de personal. Esta hoja consta de 2 pestañas. En la primera pestaña se encuentran los datos a tratar y en la segunda donde se trasladan los datos. Necesito que se busque en bucle en la hoja 1 el número de la columna A "id" y lo busque en la columna A de la hoja2 y.. -Si lo encuentra que pegue los datos de su misma fila que se encuentran en las columnas E y F que son fechas de inicio y final de contrato en la hoja 2 en las primeras celdas contiguas va…

Saludo a todos. Solicito el favor de que me ayuden con un error que me salta al correr una macro con la cual pretendo registrar datos en una hoja de Excel. El error se produce cuando se ejecuta la línea de código "Hoja5.Range ("E9"), ClearContents". Sin embargo, cuando comento el bloque de las líneas siguientes (son 12 similares), el error que salta es el 13 en tiempo de ejecución, No coinciden los tipos. Les agradecería enormemente su ayuda. Subro el archivo para una mayor comprensión de lo que expongo. PLANTILLA CONTROL DE CAJA-2021_v2.xlsm

Buenas a tod@s, Os adjunto un calendario al que quiero hacer lo siguiente: como veis tengo una celda que es la E22 en color rojo que usaré para los dias festivos. Justamente debajo incluiré los dias festivos (1 de enero, 6 de enero, etc) estos dias al incluirlo en el listado querria que cambiaran el color segun el relleno de la Celda E22. Tambien busco la forma de que si cambio el año estos dias se actualicen Luego tengo la celda I18 que tiene el color amarillo y querria que al incluir los dias del calendario me cambiaran al color de relleno de dicha celda. Es posible? 2021.xlsm

Saludos espero me puedan ayudar, he intentado todo y no lo consigo. estoy tratando de descargar datos de una web la cual es "post" y posteriormente es "get" redirecciona a otra pagina, solo lo he logrado con el navegadro explorer pero el detalle que es muy tardado ya que son 170mil datos y con explorer es como si fuera navegando, abrir explorador, poner url, bucar las etiquetas donde se hace la cosulta y despues click en un boton, esperar a que cargue la pagina y extraer los datos de esa consulta. me gustaria poderlo hacer mediante xmlhttp anexo link de la pagina https://serviciosfinanzas.villahermosa.gob.mx:8800/serviciosfinanzas/dp/busqueda…

Buenos Días Soy Nuevo En El Foro Y Quisiera Saber Si Me Pueden Ayudar Con Esta Barra De Estado Que Necesito Que Se Actualice Con Un Textbox al escribir Me Gustaría Que Me ayudaran el formulario esta en el apartado desarrollador de macros. Barra de Progreso.xlsm

Hola amigos de excel tengo un inventario que el sr. antoni me ayudo con el codigo para hallar el stock. estaba modificando para hallar el resultado deseado pero no he podido ya que mis conocimientos de vba son limitados. yo lo hago con formulas, pero me gustaria que sea automatico ya que estar copiando y pegando formulas es algo estresante ya que varia los rangos y puse 4 de ejemplo pero en realidad es mucho mas. deje el antes y despues de como quedaria lo que busco espero que se entienda. muchas gracias por su gentil ayuda de antemano. PRUEBA.xlsm

Buenos dias expertos, en un canal de youtube encontre un archivo para consultar dni y ruc desde la pagina de sunat y/o reniec pero funcion creo solo en plataforma de 32 bits y no en 64 bits, alguien tendra una manera de poner un codigo que funcione en las dos plataformas, por favor adjunto el archivo, por favor lo voy agraceder infinitamente. Consulta DNI y RUC.xlsm

Estimados amigos del foro, Agradecer de antemano su tiempo en la ayuda que me puedan dar. A ver si alguien me puede ayudar con este fichero en el que necesito crear una macro que recorra cada celda el rango L4 hasta el final donde hay dato (esta columna es la primera operación), por calda celda que recorra de la columna L con valor, mire hacia la celda derecha : Si la celda de la derecha M4 está vacía ponga la palabra GV Si no está vacía mire hacia la derecha N4 Si N4 está vacía ponga la palabra GV Si no está vacía mire hacia la derecha O4 Si O4 está vacía ponga la palabra GV Si no está v…