如何將數字添加到Excel單元格？

Question

我在A列中列出了100個名稱。例如John，Jacob，James。

我想將數字1-99999添加到A列的每個單元格中。

我有數字列表，如何將它們添加到每個像元中以進行輸出？ 約翰1約翰2約翰3 ...雅各布1雅各布2雅各布3

Answer 1

如果將以下公式放在單元格B1中並向下復制大約一百萬行，則應獲得所需的答案：

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

Answer 2

這是評論，因為我沒有足夠的聲譽而抄寫下來作為答案

如果將“系統發育”提供的公式放置在包含數據的列旁邊的第一個單元格中，則將鼠標移至突出顯示的單元格的右下角，光標將變為十字形。 雙擊鼠標，這將自動將公式添加到所有適當的單元格中（假設沒有空格）

Answer 3

試試這個小宏：

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