konggs版主，再麻烦您一下

hnyhny

konggs版主，再麻烦您一下，如果我是编这样的公式呢，我该怎么编： a/b+c/d=2/4+5/10=1 但是要求分数a/b写成正规的格式（不要意思，我不知道在这个论坛上如何把分数写成正规的格式） 麻烦你了！！！！

雨雪霏霏

　　楼主好！ 　　你的问题可以看本站热帖《[分享]用EQ域　再复杂的数学公式也能轻松做》，一楼的最后就有你要的答案： http://club.excelhome.net/dispbbs.asp?boardID=23&ID=136239&page=1&px=0 　　另外，请楼主注意一下标题，虽然论坛问答没有“级别”限制，但中国有一句“杀鸡焉用宰牛刀”，若非情况特殊，请少在标题中“叫板”版主，虽然楼主是“无心”的。 　　建议楼主看看置顶帖《在中文Excel应用论坛的最佳学习方法》，也不妨看看Konggs版主的《我的感慨之2006年的Excelhome的Word版块》（小弟建议浏览全帖）http://club.excelhome.net/dispbbs.asp?boardID=23&ID=165010&page=12&px=0，它们会给楼主带来许多“财富”。 　　小弟也是刚来这里一个月，不懂规矩，冒犯处，请楼主原谅。

konggs

何兄说的是。发贴不要指名要某人来答。这样，给大多数人感觉：这个与自己是无关紧要的，还有，就是你这样，可能冷淡了大多数想帮助你的人。同时，你指名的人本身也感到很大的压力。 请最后改一下，谢谢。 如果是2007可能很简单 如果是2003的话，少许复杂一些

[此贴子已经被作者于2006-6-16 10:55:46编辑过]

konggs

Sub Word2007的方法()
Dim objRange As Range
Dim objEq As OMath
Set objRange = Selection.Range
objRange.Text = "a/b+c/d=2/4+5/10=1"
Set objRange = Selection.OMaths.Add(objRange)
Set objEq = objRange.OMaths(1)
objEq.BuildUp
End Sub