word文档顶端一条黑色横线，试试这样删除
Office讲师雅风
Word文档中有条黑色横线，无法删除怎么办？
04:20
#和秋叶一起学word# #技巧# #高效利用办公软件#
今天给大家分享几个高效办公的技巧！
第一个就是Word里面的分割线。
❶ 输入三个 --- ，回车，就是一条细直线；
❷ 输入三个 === ，回车，就是一条双直线；
❸ 输入三个 ~~~ ，回车，就是一条波浪线；
❹ 输入三个 *** ，回车，就是一条虚线；
❺ 输入三个 ### ，回车，就是一条隔行线。
第二个就是怎么拆分表格。
只需要将光标放在需要拆分的位置上，按【Ctrl+Shift+Enter】，方可一秒拆分成功！
【秋叶图书】和秋叶一起学秒懂PPT+Excel+Word 套装3册速查工具书
@南城动漫9B9D @vvgv
四川共青团中国共产主义青年团四川省委员会官方账号
【#团团告诉你# 超实用！9张图搞定word排版】删了页眉页脚，横线却怎么也去不掉？写论文改格式，大小标题要手动调？学期论文、工作报告、工作总结……都用得上的word排版技巧↓↓ 看图操作，转需！（人民网）#写论文不仅废学生还废导师#
你会用word画线吗？
①输入三个“=”，回车，输入一条双直线；
②输入三个“~”，回车，输入一条波浪线；
③输入三个“*”， 回车，输入一条虚线；
④输入三个“-”， 回车，输入一条细直线；
⑤输入三个“#”，回车，输入一条边框线；
好技能get√！
#我要上微头条##直言职场# #微头条日签#
word、ppt经常要制作图形，例如坐标图有许多纵横线，手工极不方便，需要批量制作，线间距也不好调节，还需要设置网格线的粗细、箭头、颜色等等，这时用VBA就可以发挥优势。
一、要求：
每间隔5格主刻度线加粗显示，组合成一个图；次刻度线较细，组合成一个图。便于批量设置主刻度和次刻度的格式。各条线间距相等
4个组合图形构成坐标图
主刻度线组合成一个
次刻度线组合成一个
二、程序
```vbnet
Sub coordinate()
Dim shp1 As Shape, shp2() As Shape, shp3() As Shape
//设置纵坐标
j = 1
k = 1
ReDim shp2(1 To 1)
ReDim shp3(1 To 1)
For i = 1 To 36
Set shp1 = addline(100 + 5 * (i - 1), 100, 100 + 5 * (i - 1), 275)
shp1.Name = "shp" & "i" & i
If (i - 1) Mod 5 = 0 Then
Set shp2(j) = shp1
With shp2(j)
.Line.Weight = 1
End With
j = j + 1
ReDim Preserve shp2(1 To j)
Else
Set shp3(k) = shp1
k = k + 1
ReDim Preserve shp3(1 To k)
End If
Next
For i = LBound(shp2) To UBound(shp2) - 1
ActiveDocument.Shapes.Range(Array(shp2(i).Name)).Select (msoFalse)
Next
Selection.ShapeRange.Group
For i = LBound(shp3) To UBound(shp3) - 1
ActiveDocument.Shapes.Range(Array(shp3(i).Name)).Select (msoFalse)
Next
Selection.ShapeRange.Group
// 设置横坐标
j = 1
k = 1
ReDim shp2(1 To 1)
ReDim shp3(1 To 1)
For i = 1 To 36
Set shp1 = addline(100, 100 + 5 * (i - 1), 275, 100 + 5 * (i - 1))
**************************************
****横坐标程序与上一步相同略去****
**************************************
End Sub
Function addline(x1, y1, x2, y2)
Set addline = ActiveDocument.Shapes.addline(x1, y1, x2, y2)
With addline.Line
.ForeColor.RGB = RGB(0, 0, 0)
.Weight = 0.5
End With
End Function
三、关键点
将所画直线编号并加上name属性，用可变数组存储，ActiveDocument.Shapes.Range(Array(shp2(i).Name)).Select (msoFalse)可以批量选择主刻度和次刻度线，不加“msoFalse”是无法多重选择的。
Selection.ShapeRange.Group组合所选直线，这样主刻度和次刻度都是组合图形，只要点一下鼠标就可以选中全部线条并编辑格式，直线再多也没有压力。
决战精准剖析中考数学二次函数与几何方法技巧:
求几条线段和的最值,如果不能用字母表示成函数形式,或者表示出的函数不好求最值,往往需要通过作对称、平移、旋转等变换后,进行边长的等量代换,利用“两点之间线段最短”或“点线之间,垂线段最短”求得最小值.
平分三角形的面积,转化为线段相等问题只需画中线所在直线即可;
平分规则四边形的面积,可以是过中心的直线,如:过平行四边形对角线交点的直线平分面积;
平分不规则四边形的面积,可以利用平行线进行等积变换将四边形面积化成相等面积的三角形,然后画中线所在直线即可,这里的平行线需要过四边形最大角的顶点,不然会出现中线的中点在四边形外部的情况.#学浪计划-教育创作者扶持计划#
——更多优质精准完整Word版复习资料已经发布个人专栏，欢迎关注，转发和收藏学习
