antosm

calvuch respondió: Veamos si los datos van desde la celda A1 hasta la A15000 entonces en B1 pon el numero 1 y en B2 pon esto: =SI(A2=A1;B1+1;1) Luego copias esta función hacia abajo y listo

calvuch respondió: En el evento Worsheet Change de la hoja utiliza este macro: Private Sub Worksheet_Change(ByVal Target As Range) Dim anterior As Variant Dim c As Long If Target.Column <> 1 Then Exit Sub If Target.Row = 1 Then Cells(Target.Row, 2) = 1 On Error Resume...

xicomosho respondió: Suponiendo que los datos están desde A2, hasta A6 Pongo la siguiente fórmula en B2, (En B1, escribes manualmente un 0) =+A2&"-"&DERECHA(B1;1)+1 Esto te generara la serie como la deseas.