作者：乔山办公网日期：
返回目录：excel表格制作
你公司用不用框架不影响你完成这个功能把,你以前用的是apache的poi，免费包。不是啥插件。
现在人家推荐你用jxl,之类的也是类似的免费包，只是简单点，jxl，但是好几年没新zhidao版本了。连官网都不存在了，这些小的功能，连myeclipse都不提供插件给你帮助，eclipse更不可能了，自己学习自己写吧。说句实话，你连poi都用过了，怎么要问问当初写这段使用代码的高手内把。
而且excel的编码格式，是你建excel时设的，在控制面板里的区域语言选项你选默认是中国北京的那个区域，这样一般打开文档就是中文简体了GB 2312就是一个简体中文字符集。然后除非你打字，特别转换过，比如用ultraedit转过到utf-8编码，否则一般你输入是容中文，都是ascII的gb2312的能读
我现在研究一下，怎么转，能否转，出乱码就没意思了
数据输入在a1
在b1输入
=code(a1)
转换了啊，你的是16进制的，我给你的公式得到的是10进制的
你要是非要16进制
那么这样
需要 点工具-加载宏-分析工具库(VBA函数)
然后数据输入在a1
在b1输入
="%"&DEC2HEX(CODE(A1))
一定要先加在分析工具，否则出错
另外一次只能转换1个汉字
输入多个也e799bee5baa6e59b9ee7ad94361只转换第一个字
如果不想加载数据分析工具
可以这样
数据输入在a1，比如 重
b1输入
="%"&LOOKUP(INT(CODE(A1) /4096),{0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15;0,1,2,3,4,5,6,7,8,9,"A","B","C","D","E","F"})&LOOKUP(INT(MOD(CODE(A1),4096)/256),{0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15;0,1,2,3,4,5,6,7,8,9,"A","B","C","D","E","F"})&LOOKUP(INT(MOD(MOD(CODE(A1),4096),256)/16),{0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15;0,1,2,3,4,5,6,7,8,9,"A","B","C","D","E","F"})&LOOKUP(MOD(MOD(MOD(CODE(A1),4096),256),16),{0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15;0,1,2,3,4,5,6,7,8,9,"A","B","C","D","E","F"})
结果是 %D6D8
其实就是10进制转换为16进制了
我们使用自定义函数吧e79fa5e98193e58685e5aeb9365：（首先将【工具】【宏】【安全性】设置为：低 或 中，关闭Excel）
再打开Excel ，按Alt +F11，点【插入】【模块】，在模块窗口粘贴下面的代码：
Public Function toHex(ran As Range) As String
chinese = ran.Value
A = ""
For i = 1 To Len(chinese)
Ch = Mid(chinese, i, 1)
A = A & "%" & Left(Hex(Asc(Ch)), 2) & "%" & Right(Hex(Asc(Ch)), 2)
Next
toHex = A
End Function
按Alt + F11，回到 Excel！
若B2=推推美，C2写公式：
=toHex(B2)
这是可得到：%CD%C6%CD%C6%C3%C0
按【龙井163】提问的要求，代码如下：
Public Function toHex(ran As Range) As String
chinese = ran.Value
A = ""
For i = 1 To Len(chinese)
Ch = Mid(chinese, i, 1)
A = A & "%" & Hex(Asc(Ch))
Next
toHex = A
End Function
您好，很高兴能帮助您，
PHP在开头写(若存在类似语zd句则该成):header("content-Type: text/html; charset=gb2312");或者在html的<head></head>之间写:<meta http-equiv="Content-Type" content="text/html; charset=GB2312" />如果html开头有类似:<?xml version='1.0' encoding='utf-8 '?>把utf-8改成gb2312
你的采纳是我前进的动力，还有不懂的地方，请你继版续“追问”！
如你还有别的问题，可另外向权我求助；答题不易，互相理解，互相帮助！