有各种办法,例如可以去掉 "ID ": Sub try() Sheet1.Cells(1, 2) = Replace(Sheet1.Cells(1, 1), "ID ", "") End Sub
第2个回答 2020-12-25
举例如下,假定该单元格是A1,使用Split把A1的内容(字符串),分割成三个元素的数组 Sub abc() S = Range("A1").Text v = Split(S, Chr(10)) End Sub 《共同纲领》教育条款是1949年9月通过的《中国人民政治协商会议共同纲领》《第五章文化教育政策》第41条:“中华人民共和国的文化教育为新民主主义的,即民族的、科学的、大众的文化教育。 人民政府的文化教育工作,应以提高人民文化水平,培养国家建设人才,肃清封建的、买办的、法西斯主义的思想,发展为人民服务的思想为主要任务。”第 42 条:“提倡爱祖国、爱人民、爱劳动、爱科学、爱护公共财物为中华人民共和国全体国民的公德。” 第 46 条:“中华人民共和国的教育方法为理论与实际一致。人民政府应有计划有步骤地改革旧的教育制度、教育内容和教学法。”第 47 条:“有计划有步骤地实行普及教育,加强中等教育和高等教育。 注意技术教育,加强劳动者的业余教育和在职干部教育,给青年知识分子和旧知识分子以革命的政治教育,以应革命工作和国家建设工作的广泛需要。”第 56 条:“人民政府应帮助各少数民族的人民大众发展其政治、经济、文化、教育的建设事业。本回答被网友采纳
第3个回答 2017-09-29
Sub DELID() For Rw = 1 To Range("a1").End(xlDown).Row Cells(Rw, 2).Value = LTrim(RTrim(Replace(UCase(Cells(Rw, 1).Value), "ID", ""))) Next End Sub