求一个PQ的解法

一点的爱

案例.rar (6.95 KB, 下载次数: 18)

2021-3-20 09:08 上传

点击文件名下载附件

EXECEL解法。。由于量比较大，几百W行，表格要拆开处理，比较麻烦。PQ没有解法。

简单来说，就是A2是一个16进制数，先转成10进制 除256取整数 得到 数字X，然后再用这个10进制除256 取余数 数字Y  然后用460-00-X-Y

我走我流

仅供参考。。

一点的爱

我走我流 发表于 2021-3-20 13:35
仅供参考。。

1. let
   
2.     源 = Excel.CurrentWorkbook(){[Name="表1"]}[Content],
   
3.     转换 = Table.AddColumn(源, "自定义", each List.Generate(()=>[a=[16进制],b=Text.Length(a),c=(if List.Contains({"A".."F"}, Text.Range(a,0,1)) then Character.ToNumber(Text.Range(a,0,1))-55 else Number.From(Text.Range(a,0,1)))*Number.Power(16,b-1)] ,each _[b]>0,each [a=Text.Range(_[a],1),b=_[b]-1,c=(if List.Contains({"A".."F"}, Text.Range(a,0,1)) then Character.ToNumber(Text.Range(a,0,1))-55 else Number.From(Text.Range(a,0,1)))*Number.Power(16,b-1)],each _[c])),
   
4.     结果 = Table.AddColumn(转换, "结果", each List.Transform({List.Sum([自定义])},each  Text.Format("#{0}-#{1}-#{2}", {"460-00",Number.IntegerDivide(_,256),Number.Mod(_,256)})){0})[结果]
   
5. in
   
6.     结果

复制代码

我这个错在哪？

我走我流

一点的爱 发表于 2021-3-20 14:01
我这个错在哪？

按照提示令牌COMMA 一般来说 就是符号没对应上，，比如{}少半天，，（）少半边 或者非英文字符

deadzlq

PowerQuery参考解法

一点的爱

deadzlq 发表于 2021-3-20 14:52
PowerQuery参考解法

1. let
   
2.     源 = Csv.Document(File.Contents("C:\Users\h\Desktop\20210318\4g\1-qry_srv_5gsacalldur_4gcell_daily20210318.csv"),[Delimiter=",", Columns=4, Encoding=936, QuoteStyle=QuoteStyle.None]),
   
3.     更改的类型 = Table.TransformColumnTypes(源,{{"Column1", type text}, {"Column2", Int64.Type}, {"Column3", Int64.Type}, {"Column4", Int64.Type}}),
   
4.     重命名的列 = Table.RenameColumns(更改的类型,{{"Column1", "16进制"}, {"Column2", "用户数"}, {"Column3", "驻留"}, {"Column4", "日期"}})
   
5.    <font color="Red">  Result = Table.AddColumn(Source, "转换", each [dec=Expression.Evaluate("0x" & [16进制]),
   
6.         X=Number.IntegerDivide(dec,256),Y=Number.Mod(dec,256),r = Text.Format("460-00-#{0}-#{1}",{X,Y})][r])
   
7. in
   
8.     Result</font>

复制代码

为什么抄过来就不行了

我走我流

deadzlq 发表于 2021-3-20 14:52
PowerQuery参考解法

居然能直接16进制，，，，，。。。。。

一点的爱

deadzlq 发表于 2021-3-20 14:52
PowerQuery参考解法

1. let
   
2.     源 = Csv.Document(File.Contents("C:\Users\h\Desktop\20210318\4g\1-qry_srv_5gsacalldur_4gcell_daily20210318.csv"),[Delimiter=",", Columns=4, Encoding=936, QuoteStyle=QuoteStyle.None]),
   
3.     更改的类型 = Table.TransformColumnTypes(源,{{"Column1", type text}, {"Column2", Int64.Type}, {"Column3", Int64.Type}, {"Column4", Int64.Type}}),
   
4.     重命名的列 = Table.RenameColumns(更改的类型,{{"Column1", "16进制"}, {"Column2", "用户数"}, {"Column3", "驻留值"}, {"Column4", "日期"}}),
   
5.     已添加自定义 = Table.AddColumn(重命名的列, "转换", each [dec=Expression.Evaluate("0x" & [16进制]), X=Number.IntegerDivide(dec,256),Y=Number.Mod(dec,256),r = Text.Format("460-00-#{0}-#{1}",{X,Y})][r])
   
6. in
   
7.     已添加自定义

复制代码

谢谢。。一顿瞎改，，似乎OK了

一点的爱

我走我流 发表于 2021-3-20 14:43
按照提示令牌COMMA 一般来说 就是符号没对应上，，比如{}少半天，，（）少半边 或者非英文字符

谢谢指导。