Elsa Matilde

Esta consulta está duplicada y te acabo de responder en la otra entrada. El problema no está en el modelo del formulario sino en el formato de los datos entre la col y la tabla o matriz. Sdos!

Esta sería la macro que necesitas con el agregado del ajuste de formato. Observa que en la búsqueda también se coloca el formato de 4 dígitos para que coincida y no te salte el error que me mencionaste. Sub buscar_reemplazar_colorear() Set DATOS =...

Dejo macro iniciada... debes completar con el resto de rangos. Private Sub Worksheet_Change(ByVal Target As Range) 'x Elsamatilde 'solo se controla el contenido del rango B1:F2 y B3 If Intersect(Target, Range("B1:F2, B3")) Is Nothing Then Exit Sub...

¿Podrías dejar una imagen para comprender tu consulta? ¿El formulario... está diseñado en la hoja o es un Userform? ¿Qué significa que no está en la 'programación'?

Fíjate si de este modo te sirve para imprimir. Solo estoy pegando valores, ni formatos ni fórmulas, ni objetos. Sub copiaScra() 'x Elsamatilde 'limpia hoja IMPRIMIR de datos anterioes Sheets("IMPRIMIR").Cells.Clear Sheets("SCRA_1").Select...

Si la hoja está protegida con las opciones 'Aplicar formato' a celdas, filas y col no es necesario desproteger la hoja para ocultar/mostrar col, sino habrá que desprotegerla al inicio y volverla a proteger al finalizar. Dejo las instrucciones...

Te estoy devolviendo libro con las macros explicadas como para que ajustes al resto de los botones. Sdos!

Podés utilizar Formato Condicional con fórmulas. Para tu ejemplo, seleccioné el rango desde F4 hasta el último día. Desde menú Formato Condicional, Nueva regla y opté por 'Utilizar una fórmula'. La fórmula es: =Y(F$3>=$C4;F$3<=$D4) Es importante...

Este puede ser un modo de controlarlo, al salir del textbox donde se ingresa la cantidad . Private Sub TextBox1_Exit(ByVal Cancel As MSForms.ReturnBoolean) 'x Elsamatilde canti = Application.Max(ActiveSheet.Range("F:F")) If Val(TextBox1) > canti Then...

Voy a comentar algunos detalles, porque al seleccionar la hoja como bien dice James sucederán 2 cosas: - Que probablemente la instrucción te de error. En algunas versiones Sheets(hoja). Range(rgo).Select da error y requiere que sean separadas:...