在 Excel 中按原子序数对 H、He、Li、Be 等化学元素进行排序

Mar*_*tin 3 sorting microsoft-excel

我有一个长表格,其中列有样品、分析编号、测试方法等,重要的是,还包括分析的化学元素。我想首先按样品对表格进行排序,然后按化学元素进行排序。元素符号应按原子序数递增的顺序排列:H < He < Li < Be < B < C < N 等,一直到 Pb。这可以在 Excel 中完成吗?

Fle*_*ata 6

按原子序数对数据进行排序。这是一个从维基百科返回一些数据的查询:

\n
let\n    Source = Web.Page(Web.Contents("https://en.wikipedia.org/wiki/List_of_elements_by_atomic_properties")),\n    Data0 = Source{0}[Data],\n    #"Changed Type" = Table.TransformColumnTypes(Data0,{{"Z", type text}, {"Name", type text}, {"Symbol", type text}, {"Average atomic mass", type text}, {"Electronegativity (Pauling)", type text}, {"First Ionization Energy (eV)", type text}, {"Radii (pm) Atomic", type text}, {"Radii (pm) Van der Waals", type text}, {"Radii (pm) Covalent", type text}, {"Valence electrons", type text}}),\n    #"Filtered Rows" = Table.SelectRows(#"Changed Type", each ([Z] <> "Z")),\n    #"Changed Type1" = Table.TransformColumnTypes(#"Filtered Rows",{{"Z", Int64.Type}, {"Valence electrons", Int64.Type}}),\n    #"Replaced Value" = Table.ReplaceValue(#"Changed Type1","\xe2\x80\x94","",Replacer.ReplaceText,{"Radii (pm) Van der Waals"}),\n    #"Replaced Value1" = Table.ReplaceValue(#"Replaced Value","\xe2\x80\x94","",Replacer.ReplaceText,{"Radii (pm) Covalent"}),\n    #"Replaced Value2" = Table.ReplaceValue(#"Replaced Value1","\xe2\x80\x94","",Replacer.ReplaceText,{"Radii (pm) Atomic"}),\n    #"Changed Type2" = Table.TransformColumnTypes(#"Replaced Value2",{{"Radii (pm) Atomic", Int64.Type}, {"Radii (pm) Covalent", Int64.Type}, {"First Ionization Energy (eV)", type number}}),\n    #"Replaced Value3" = Table.ReplaceValue(#"Changed Type2","\xe2\x80\x94","",Replacer.ReplaceText,{"Electronegativity (Pauling)"}),\n    #"Changed Type3" = Table.TransformColumnTypes(#"Replaced Value3",{{"Electronegativity (Pauling)", type number}}),\n    #"Renamed Columns" = Table.RenameColumns(#"Changed Type3",{{"Z", "Atomic Number"}})\nin\n    #"Renamed Columns"\n
Run Code Online (Sandbox Code Playgroud)\n

您可以使用数据>获取数据>从其他来源>空白查询,然后当Power Query编辑器打开时,您可以打开高级编辑器,然后将上面的查询粘贴到高级编辑器窗口中。当您单击“关闭并加载”时,它会将数据放回工作簿中的新工作表中。然后您可以:

\n
    \n
  1. 用于XLOOKUP将原子序数添加到数据中,然后按该列排序,或者如果您想要变得更复杂但更强大,
  2. \n
  3. 将两个数据集加载到 PowerPivot 数据模型,在元素名称上创建联接,然后设置元素列的排序属性以使用原子数。如果这样做,则从 Power Pivot 数据模型创建的所有数据透视表中的元素将按原子序数排序
  4. \n
\n

顺便说一句,如果将该查询加载到 Power Query 中,您还可以选择“名称”列,然后使用“转换”>“创建数据类型”选项,如下所示:

\n

在此输入图像描述

\n

这可以让你做一些有趣的事情,比如:

\n

在此输入图像描述

\n