如何在excel单元格中添加数字?

时间:2014-03-20 13:31:57

标签: excel function numbers

我在A栏中列出了100个名字。例如John,Jacob,James。

我想将数字1-99999添加到A列中的每个单元格。

我有数字列表,我如何将它们添加到每个单元格以输出这样的? John1 John2 约翰3 ... Jacob1 Jacob2 Jacob3

3 个答案:

答案 0 :(得分:0)

如果您将以下公式放在单元格B1中并向下复制约100万行,您应该得到所需的答案:

=INDEX(A:A, INT((ROW() - 1) / 99999) + 1) & (MOD(ROW() - 1, 99999) + 1)

答案 1 :(得分:0)

这是一个关于复制作为答案的评论,因为我没有足够的声誉

如果将Phylogenesis提供的公式放入列中与您的数据相邻的列中的第一个单元格,则将鼠标移动到突出显示的单元格的右下角,光标将变为十字形。双击鼠标,这将自动将公式添加到所有适当的单元格 - 假设没有空格

答案 2 :(得分:0)

试试这个小宏:

Sub NumberNames()
    Dim jacob As Long, john As Long, james As Long
    Dim i As Long
    jacob = 1
    james = 1
    john = 1
    For i = 1 To 100
        With Cells(i, 1)
            v = .Value
            If v = "John" Then
                .Value = .Value & john
                john = john + 1
            End If
            If v = "Jacob" Then
                .Value = .Value & jacob
                jacob = jacob + 1
            End If
            If v = "James" Then
                .Value = .Value & james
                james = james + 1
            End If
        End With
    Next i
End Sub

如果您的数据开头如下:

James
Jacob
John
James
John
John
James
John
James
John
Jacob
John
James
James
John
John
James
John
James
James

它最终会像:

James1
Jacob1
John1
James2
John2
John3
James3
John4
James4
John5
Jacob2
John6
James5
James6
John7
John8
James7
John9
James8
James9