Formulario

Espero, que la pregunta sepa hacer la bien:
Necesito una fórmula en la cual no solo me de un numero en el rango, sino que a ese numero se le añada una letra y hacer posible la inicial del mes en curso.
Es decir yo tengo la siguiente formula .....ActiveCell.FormulaR1C1 = "=R[-1]C+1" ....
Pues bien como podéis ver cada vez que ejecuto una acción me va sumando un numero al siguiente fila.Lo que necesito es que junto con ese numero se añada la inicial del mes en curso.
Espero que no sea muy difícil el tema, si tenéis alguna otra ayuda para anexar al numero y que no sea un mero numero el que se me quede en el rango estoy a la espera...
Gracias desde la tierra del aceite...
{"Lat":37.7185903255881,"Lng":-3.1640625}

1 respuesta

Respuesta
1
Coloca la siguiente fórmula para Añadir la primera letra del Mes.
ActiveCell.FormulaR1C1 = "=Left(R[-1]C,1)+1 & """ & Left(Format(Date, "mmm"), 1) & """"
Leone, gracias por tu ayuda me ha servido de mucho, y me ha quitado muchas horas de trabajo.
Te hago otra pregunta si puede ser.
Necesito algo para que los datos introducidos con el formulario, no se puedan modificar, al igual que también no se puedan modificar la programación de VISUAL BASIC.
Yo lo tengo protegido el libro y las hojas pero se pueden hacer algunas modificaciones.
A la espera de tu respuesta, gracias desde la tierra del aceite.
Para Proteger la información debes proteger las hojas, las celdas deben estar también bloqueadas(Por defecto las celdas ya están bloqueadas) su bloqueo se activara al proteger la hoja(Menu Herramientas->Proteger->Proteger Hoja).
Para Proteger tu código de Visual basic debes ir al editor de Visual basic, ir al Menu->Herramientas->Propiedades de VBAProjet. En el cuadro que aparece debes seleccionar la pestaña "Protección", allí chequeas la opción loquear proyecto para visualización, y estableces una contraseña.
Con respecto a la solución del caso del numero con la letra te envío una mejora:
ActiveCell.FormulaR1C1 = "=Left(R[-1]C,Len(R[-1]C)-1) +1 & """ & Left(Format(Date, "mmm"), 1) & """"

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas