[分享-好玩！]快来告诉我，这是什么？

守柔

有下面一组数字，请你告诉我，它们的意思？（免费破译密码） 69 88 67 69 76 72 79 77 69 44 109 121 32 108 111 118 101 114 44 109 121 32 104 111 109 101 33 11 104 116 116 112 58 47 47 119 119 119 46 101 120 99 101 108 104 111 109 101 46 110 101 116 用WORD最简单的方法，你会得到本版的加分哟，快来试试！ [em05]

konggs

天书，我看不懂。

konggs

想不要分都难。

译码是：

E X C E L H O M E , m y l o v e r , m y h o m e !
h t t p : / / w w w . e x c e l h o m e . n e t

守柔

KONGGS:

你的答案是正确的，我需要过程，越简单越好。

konggs

本来我是用excel完成的“=char(a1)”。

老大要用Word完成。

我只知道有一种笨方法。[em04]

一、通过插入符号，十进制，一个一个搞定。

本想可以先把这些数字放到表格中。一行多列。再添加一行，在添加的一行中，按ctrl+f9，输入=SUM(ABOVE)＋x-y，复制到全部。把按域结果复制出来。用alt+x，让其显示出来。无赖八进制与十六进制的转化关系没找到。

还是等老大的妙法吧。

konggs

先把这些数字放到表格中。一行多列。再添加一行，在添加的一行中，按ctrl+f9，输入SYMBOL {=sum(above) } \a ，复制到全部。刷新，OK？

sailorgg

将以上密码复制到一空白文档中，运行以下宏：

Sub test()
Dim mytext As String
Text = ThisDocument.Range
myarray = VBA.Split(Text)
For i = 0 To UBound(myarray)
mytext = mytext & VBA.Chr(myarray(i))
Next
Me.Range.Text = mytext
End Sub
得到码文：

EXCELHOME,my lover,my home!
http://www.excelhome.net

守柔

请再简单一点!

[em05]

c81

kongs，明天你可以到中情局上班了。呵呵

我一开始没有看到下面的跟帖，我以为是个方阵，然后用内码GB码来转换，，没想到还要用vba，那我这个赤脚医生不行了。。。

[此贴子已经被作者于2005-12-28 13:10:44编辑过]

办公之星

还真有点意思，学海尔兄弟动画片的吧？^0^