转换带有一个标题的excel工作表中的垂直数据

我在将一长串垂直地址数据转换成带有头文件的标准水平excel表格时遇到问题

我所拥有的是：

Name     Text Doe
Email    me@you.com
Operator     Someone
Product/Service  name of product
Phone   123 1234567
Company  ABC Company
Referrer URL     https://www.google.com.my/
Search Engine    Google
IP   210.186.133.177
Country/Region   Malaysia
State    Kuala Lumpur
City     Kuala Lumpur[Client Info]
Language     en-GB
Time Zone    GMT +08
Name     Text Doe
Email    me@you.com
Operator     Someone
Product/Service  name of product
Phone   123 1234567
Company  ABC Company
Referrer URL     https://www.google.com.my/
Search Engine    Google
IP   210.186.133.177
Country/Region   Malaysia
State    Kuala Lumpur
City     Kuala Lumpur[Client Info]
Language     en-GB
Time Zone    GMT +08
Name     Text Doe
Email    me@you.com
Operator     Someone
Product/Service  name of product
Phone   123 1234567
Company  ABC Company
Referrer URL     https://www.google.com.my/
Search Engine    Google
IP   210.186.133.177
Country/Region   Malaysia
State    Kuala Lumpur
City     Kuala Lumpur[Client Info]
Language     en-GB
Time Zone    GMT +08

我试图找到一些自动化的方法将其解析成一个标准的excel表格，其中侧面的标签与下面的信息在顶部水平，这样我就可以将其导入crm

Name     Email   Operator    Product/Service     Phone  Company  Referrer URL    Search Engine   Google    IP    Country/Region  State   City    Language    Time Zone

使用下面单元格中的信息。有没有一种简单的方法可以在VB脚本或任何其他方式中实现这一点

首先将所有数据保存到excel文件中

然后将字符串“”替换为“，”（使用Ctrl+h）

使用文本到列（在数据中）功能将其设置为列

复制所有内容

使用过去特殊按钮通过它Ctrl+Alt+V

标记转置，然后单击确定

---

我已经完成了我的任务。 我制作了一个简单的公式来解析单元格，并每14行重复一次，因为有14个标签在重复

我使用的公式是：

=INDEX($B:$B,ROW(B2)*14+COLUMN(B2))

因为A列是标签，B列是数据。

---

因此，这只是将每14行解析到列表中。

这很好理解，也很有用。然而，它并不完全满足我的需要。它确实把它转换成一条很长的水平线。但我有6000个条目，需要一个标题，标签名称为Email Operator Product/Service Phone Company referer URL搜索引擎Google IP Country/Region State City Language时区，而不是每行下有6000条记录。这样我就可以将它作为CSV文件导入到CRM中。让我解释一下我在哪里尝试使用它。但我的Excel公式技能有点有限。所以我想也许可以在一张纸上加上标题。然后用我的列表解析工作表（如果单元格A包含单词“Name”，则取单元格B的内容并将其复制到我的新工作表的Name下）以简单的英语表达。我发现了一些类似的东西，但我不能完全做到。我的基础是：理论上，这对我的情况也应该是类似的。我试着在A1中列出标签，B2中列出值，然后我使用：=IF（ISNUMBER（SEARCH（“Name”），B1，”），只要我用相同的标签词替换搜索值，这就行了。但它将有11个空单元格，因为每个单词每11个单元格只重复一次。