estoy creando un formulario para registrar datos pero en diferentes hojas.
Dentro del formulario ya he agregado un campo para la seleccion del nombre (nombre de la hoja donde debo ingresar los datos capturados) y funciona bien
pero dentro de cada hoja en la columna A tengo los consecutivos actuales, este corresponde al ultimo registro.
con la funcion de: Me.txtCons = Application.WorksheetFunction.Max(Range("A:A")) + 1 , puesto en: UserForm_Activate me mostraba el ultimo consectivo de una sola hoja.
Pero ahora que he agregado el cambio de hojas ya no lo toma.
Mi necesidad seria que al cambiar el nombre de la hoja me diera el consecutivo siguiente de esa hoja. y que el registro se haga con ese número.
Hola buenas tardes:
estoy creando un formulario para registrar datos pero en diferentes hojas.
Dentro del formulario ya he agregado un campo para la seleccion del nombre (nombre de la hoja donde debo ingresar los datos capturados) y funciona bien
pero dentro de cada hoja en la columna A tengo los consecutivos actuales, este corresponde al ultimo registro.
con la funcion de: Me.txtCons = Application.WorksheetFunction.Max(Range("A:A")) + 1 , puesto en: UserForm_Activate me mostraba el ultimo consectivo de una sola hoja.
Pero ahora que he agregado el cambio de hojas ya no lo toma.
Mi necesidad seria que al cambiar el nombre de la hoja me diera el consecutivo siguiente de esa hoja. y que el registro se haga con ese número.
Muchas gracias
registro consul.xlsm