FILA AUTONUMERADA CON VALOR INALTERABLE (CODIGO ÚNICO PARA CADA FILA)

Hola jdcano:
Lo que quieres es sencillo mediante un poco de código.
Vamos a suponer que la columna a la tú llamas Pos. es la A
y que la columna que llamas Ref. es la B
y que tu rango de filas a ocupar son de la 3 a la 10000

Entonces...

En A1 =MAX(A3:A10000)

En la Hoja donde trabajes pon este código:

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Count <> 1 Then Exit Sub
Application.MoveAfterReturn = False
If Target.Column = 2 And Target.Value <> "" Then
If IsEmpty(Target.Offset(-0, -1)) Then Target.Offset(-0, -1).Value = [A1] +
1
End If
End Sub


Espero que te sirva y tus comentarios.
Saludos.-


escribió en el mensaje de noticias
news:
Hola a ,

He estado buscando por ahí pero no he encontrado nada que me valga
exactamente.

Tengo una lista con diferentes productos en caca fila (descripción,
referencia, precio, etc..) y necesito que en primera columna se me
autonumeren las filas según introduzca datos en las siguientes. Este valor
deberá permanecer invariable y no se actualizará ya en ningún momento, como
por ejemplo al ordenar por otras de las columnas, ya que este número valdrá
como posición fija para localizar cualquier producto.

Ejemplo para una mejor comprensión:


Pos. - Ref. -- Descripción
1 - 012345 - Relé 6A
2 - 03254 - Conmutador 3P+N
4 - 98472 - Amperímetro[/list]

Una vez ordenado alfabéticamente por la columna "descripción" debería quedar
como sigue:

Pos. - Ref. -- Descripción
4 - 98472 - Amperímetro[/list]
2 - 03254 - Conmutador 3P+N
1 - 012345 - Relé 6A

Si no fuese "rizar el rizo" creo que sería mejor sin necesidad de ejecutar
ningún código y todo automático a la misma vez que se fueran introduciendo
datos en las diferentes filas, pero vamos... tampoco pasaría nada si ese
valor se asignase mediante un botón.

Quedo a la espera y agradezco de antemano vuestras sugerencias.