用前缀生成唯一标识的代码

请帮助我生成带有前缀的唯一ID。 我正在Excel中开发一个小型项目来存储客户数据库。 我有一个用户窗体中的文本字段。 点击率，我想要一个代码，每当我添加一个带有前缀的新客户资料时，它就会生成一个唯一的ID。

Answer 1

有很多种方法。 假设您将您的客户名称存储在A2单元格的某个表格的A列中。 每次添加客户时，将他们的名称添加到列A列表中。 要指定一个唯一的客户ID，请在B2单元格中input：

 =IF(A2="","","CTR" & ROW()-1) 

并抄下来：

如果你想让代码生成新的ID，那么：

 Sub dural() Dim LastId As String, NewId As String Dim N As Long N = Cells(Rows.Count, "B").End(xlUp).Row LastId = Cells(N, "B").Value NewId = "CTW" & CLng(Mid(LastId, 4)) + 1 MsgBox NewId End Sub