在Excel中复制一个唯一的标识符

我有一个包含多个地址行的大型Excel电子表格。 许多这些地址行包含重复的邮政编码,具有不同的地址地址。

我需要把这些重复的每一个分离到不同的展示区,以便没有人展示包含相同的邮政编码。 我正在使用一个= if()语句来识别重复,然后剪切和poasting,并重复几乎无限,把它们拼出来

举个例子:

address 1 postcode 1 address 2 postcode 1 address 3 postcode 1 address 4 postcode 2 address 5 postcode 2 address 6 postcode 3 address 7 postcode 3 address 8 postcode 3 address 9 postcode 3 

将提供4个电子表格:

 1) address 1 postcode 1 address 4 postcode 2 address 6 postcode 3 2) address 2 postcode 1 address 5 postcode 2 address 7 postcode 3 

等等

任何关于VB脚本的提示?

非常感谢

缺口

如果这是一次性的事情,那么我会考虑在工作表和批量剪贴上做。 我会尝试这样的事情:

  1. 在邮政编码列上sorting我的数据
  2. 在一个新列中,添加一个函数来计算当前行下面的邮编数量,该行数是该行代码的重复数(见下文)
  3. 保存(复制/粘贴特殊值)获得的值
  4. 按重复号码sorting
  5. 将块按重复编号剪切并粘贴到新工作表

假设我在G列中有1到5之间的20个值。我在H1中把下面的公式:

 =SUM(IF(G1:$G$20=G1,1,0)) 

…和(重要位)使用Control + Shift + Enter将其作为数组公式 input 。 现在我复制下来的公式(速度,双击单元格右下angular的“填充手柄”)。 这是我的结果:

 1 2 1 1 2 2 2 1 3 8 3 7 3 6 3 5 3 4 3 3 3 2 3 1 4 2 4 1 5 6 5 5 5 4 5 3 5 2 5 1 

现在我可以复制列H和编辑…select性粘贴…值来修复值。 按Hsorting得到这个:

 1 1 2 1 3 1 4 1 5 1 1 2 2 2 3 2 4 2 5 2 3 3 5 3 3 4 5 4 3 5 5 5 3 6 5 6 3 7 3 8 

现在我有一套logging要复制到我现在知道需要的8张纸上。

当然,如果你要这么做,那么macros将是有用的。 它不需要比自动化上述更复杂。