在Excel裏能否进行简繁体转换?

可以!!
上个星期的电脑报上就有这篇文章。

Private Declare Function LCMapString Lib "kernel32" Alias _ "LCMapStringA" (ByVal Locale As Long, ByVal dwMapFlags As _ Long, ByVal lpSrcStr As String, ByVal cchSrc As Long, _ ByVal lpDestStr As String, ByVal cchDest As Long) As Long Private Declare Function lstrlen Lib "kernel32" Alias "lstrlenA" _ (ByVal lpString As String) As Long Dim STf As String, 繁体字符串 Dim STj As String, 简体字符串 Dim STlen As Long, 待转换字串长度 Sub Test1() 'Gb码简体转繁体 STj = "中华人民共和国" STlen = lstrlen(STj) STf = Space(STlen) LCMapString &H804, &H4000000, STj, STlen, STf, STlen Debug.Print STf End Sub Sub Test2() 'Gb码繁体转简体 STf = "中华人民共和国" STlen = lstrlen(STf) STj = Space(STlen) LCMapString &H804, &H2000000, STf, STlen, STj, STlen Debug.Print STj End Sub

或者使用工具。Microsoft Excel档案简繁转换工具 V2.0
http://www.skycn.com/soft/177