Aplicar a un textbox esta fórmula de una hoja del libro =max(E2:E1000)+1
Hola, mi idea es extraer el número mayor más uno de una columna y aplicárselo a un textbox al abrir el formulario. Gracias
1 respuesta
Respuesta de Luis Mondelo
1
Te mando mi solución
Con esta macro, justo al inicializar el formulario te pondrá el resultado de esa fórmula en el textbox1
Private Sub UserForm_Initialize()
TextBox1.Value = Application.WorksheetFunction.Max(Range("e2:e1000")) + 1
End Subno olvides finalizar la consulta
De nuevo agradecerte la atención prestada y decirte que era lo que necesitaba.
Se me olvidó decirte que estaba fuera de la hoja y lo completé indicándoselo asi :
Text1.value = Application.WorksheetFunction.Max(Sheets("hoja 1").Range("e2:e1000")) + 1
Gracias de nuevo
Un saludo
