Elsa Matilde

Acaba de llegarme tu aviso. En el objeto Hoja, digamos que se llame 'NvaHoja", debes colocar el siguiente código ajustando el nombre o rango de tus columnas: Private Sub Worksheet_Deactivate() Sheets("NvaHoja").Columns("C:G").EntireColumn.Hidden =...

Entiendo que tendrás diferentes equipos y cada uno puede tener un texto predeterminado que lo estás ubicando en col G. Y seguramente tu botón de guardado limpiará todos los campos de la fila 4... incluyendo la celda E4. Debieras tener un código, que...

Si tu columna de Importes estará así ordenada, de mayor a menor, el siguiente ajuste te resolverá el problema: Sub insertaFilas() 'ajustada x Elsamatilde Dim men As Long For men = Range("E" & Rows.Count).End(xlUp).Row To 2 Step -1 If Range("E" &...

Viendo que no se están entendiendo, te hago llegar mi punto de vista. Empezando con que necesitas: usar un botón en donde al dar click me pase el valor resultante Esto me lleva a pensar que quizás quieras actualizar una celda por vez, y no todo el...

NO veo que tengas alguna columna de saldo final... para tomarla como saldo inicial del próximo mes. Por lo tanto, lo que tendrías que sumar son todos los movimientos de la hoja Bdvoucher anteriores a la fecha buscada. Por ejemplo, agregando 2...

Seguramente en alguna columna de tu hoja se indica el valor del checkbox. Entonces al traer todos los datos, debes hacer una evaluación. Algo así: If range("H" & x) = "SI" then Checkbox1.value = True Espero te sirva la aclaración, sino tendrás que...

Al iniciar el proceso y recién luego de hacer los controles de contenido, se agregó la opción de mostrar la hora de inicio: Private Sub CommandButton8_Click() 'buscar coincidencias canti = 0 For Each ct In Frame2.Controls If TypeName(ct) = "TextBox"...

Con la propiedad EnterKeyBehavior en True lo que sucede es que al dar Enter pasas a la línea siguiente dentro del mismo control Textbox. Si la dejas en False, lo que sucederá es que con Enter se sale del control para pasar al que le sigue según la...

No queda claro dónde están y cuáles son las fechas a comparar. Simplemente me gustaría que las fechas que falten 1 semana para llegar a ese día (día actual incluido) Te dejo un ejemplo para que puedas adaptarlo a tu modelo. Aquí se compara la celda...

Dejo la macro ajustada al tema bordes, reemplazando las líneas inhabilitadas por éstas nuevas: En lugar de: 'Range("A:SZ").Interior.Color = xlNone Coloca ésta: Range("A:SZ").Borders.LineStyle = xlNone Y en lugar de: 'Celda.Interior.Color = vbYellow...