当前位置: 首页 > 常见问题 > Excel表格

excel表格中如何提取汉字

  • Excel表格
  • 2024-04-10

excel表格中如何提取汉字?那么,excel表格中如何提取汉字?一起来了解一下吧。

把表格复制,然后到Word里粘贴,选定表格,表格菜单,转换,表格转换为文字

表格转换的分隔符,可以自选。

处理之后,文字也可以再转换为表格

见截图
B1输入
=IF(ISNUMBER(--LEFT(A1)),SUBSTITUTE(A1,LOOKUP(9^9,--LEFT(A1,ROW($1:$10))),),LEFTB(A1,SEARCHB("?",A1)-1))
下拉

1.通过搜索引擎,找到国家旅游局的网站,点击主菜单的【政务公开】——【统计数据】,则可以看到一系列包含数据的网页。
2.打开一个网页,确认该网页包含了数据表。
复制该网页的网址,备用。
3.启动excel文件,在一个工作表中,点击【数据】——>【自网站】
4.按ctrl+v键,粘贴刚才上一步复制的网址;
点击网址栏右侧的【转到】;
网页显示后,单击数据表格左上角的【横箭头】,变为绿色的【对号】;
点击整个窗口右下角的【导入】。
5.选择一个工作表位置,导入数据。
6.结果如下图所示。
虽然已经导入了数据,这实际上相当于建立了excel文件与网页间的连接,这个excel文件复制到别处,因为连接关系破坏,所以数据可能无法显示。
建议复制导入的数据到一个新的excel文件,【选择性粘贴】为纯数值,这样就万无一失了。

在EXECL中,按ALT+F11,插入---模块复制下列代码:Functionhztopy(hzpyAsString)AsStringDimhzstringAsString,pystringAsStringDimhzpysumAsInteger,hziAsInteger,hzpyhexAsIntegerhzstring=Trim(hzpy)hzpysum=Len(Trim(hzstring))pystring=""Forhzi=1Tohzpysumhzpyhex="&H"+Hex(Asc(Mid(hzstring,hzi,1)))SelectCasehzpyhexCase&HB0A1To&HB0C4:pystring=pystring+"A"Case&HB0C5To&HB2C0:pystring=pystring+"B"Case&HB2C1To&HB4ED:pystring=pystring+"C"Case&HB4EETo&HB6E9:pystring=pystring+"D"Case&HB6EATo&HB7A1:pystring=pystring+"E"Case&HB7A2To&HB8C0:pystring=pystring+"F"Case&HB8C1To&HB9FD:pystring=pystring+"G"Case&HB9FETo&HBBF6:pystring=pystring+"H"Case&HBBF7To&HBFA5:pystring=pystring+"J"Case&HBFA6To&HC0AB:pystring=pystring+"K"Case&HC0ACTo&HC2E7:pystring=pystring+"L"Case&HC2E8To&HC4C2:pystring=pystring+"M"Case&HC4C3To&HC5B5:pystring=pystring+"N"Case&HC5B6To&HC5BD:pystring=pystring+"O"Case&HC5BETo&HC6D9:pystring=pystring+"P"Case&HC6DATo&HC8BA:pystring=pystring+"Q"Case&HC8BBTo&HC8F5:pystring=pystring+"R"Case&HC8F6To&HCBF9:pystring=pystring+"S"Case&HCBFATo&HCDD9:pystring=pystring+"T"Case&HEDC5:pystring=pystring+"T"Case&HCDDATo&HCEF3:pystring=pystring+"W"Case&HCEF4To&HD1B8:pystring=pystring+"X"Case&HD1B9To&HD4D0:pystring=pystring+"Y"Case&HD4D1To&HD7F9:pystring=pystring+"Z"CaseElsepystring=pystring+Mid(hzstring,hzi,1)EndSelectNexthztopy=pystringEndFunction比如在A1输入小燕子耳坠子7.8则在其他空白单元格输入=hztopy(A1)回车执行即可.

如果你的内容放到G13里,则在G14里输入以下公式
=LEFT(G13,(SEARCH("-",G13))+(SEARCH("-",(RIGHT(G13,LEN(G13)-(SEARCH("-",G13))))))-1)

以上就是excel表格中如何提取汉字的全部内容,ml内容来源于互联网,信息真伪需自行辨别。如有侵权请联系删除。

猜你喜欢