ExcelHome技术论坛

 找回密码
 免费注册

QQ登录

只需一步,快速开始

快捷登录

搜索
EH技术汇-专业的职场技能充电站 妙哉!函数段子手趣味讲函数 Excel服务器-会Excel,做管理系统 效率神器,一键搞定繁琐工作
HR薪酬管理数字化实战 Excel 2021函数公式学习大典 Excel数据透视表实战秘技 打造核心竞争力的职场宝典
让更多数据处理,一键完成 数据工作者的案头书 免费直播课集锦 ExcelHome出品 - VBA代码宝免费下载
用ChatGPT与VBA一键搞定Excel WPS表格从入门到精通 Excel VBA经典代码实践指南
查看: 2716|回复: 18

[求助] 如何在五线谱上写英文字母,输入时显示不全,浮于文字上方也是灰色的选择不了

[复制链接]

TA的精华主题

TA的得分主题

发表于 2021-1-6 18:16 | 显示全部楼层 |阅读模式
本帖最后由 zaoanshanghai 于 2021-1-7 12:27 编辑

麻烦问一下怎么处理。谢谢啦,非常感谢。我用的是OFFICE软件。谢谢啦
image.png
我想制作如何在五线谱上,规范的写字母。如何将某个字母写在五线谱上。如下图所示:麻烦哪位大神能不能帮帮我,能不能将我上传的模板,帮我处理一下,应该怎么操作,谢谢啦。非常感谢,我已经想了半年了,各种百度,也没有搜到该如何处理,麻烦哪位大神帮帮我,谢谢了。非常感谢。我还想比如讲某个字母放到五线谱的第几根线上,上下再稍微挪动微调一下。谢谢啦

image.jpg

五线谱.rar

24.11 KB, 下载次数: 18

模板

TA的精华主题

TA的得分主题

 楼主| 发表于 2021-1-6 21:11 | 显示全部楼层
麻烦问一下,如何操作。谢谢

TA的精华主题

TA的得分主题

发表于 2021-1-7 02:15 | 显示全部楼层
先画一个 5行1列表格,再在各行键入a/b/c/d;然后,布局/选定表格;布局/中部剧中;设置行高为1.5厘米固定值,再设置段落为0.65多倍行距;然后,在表格下面回车后面再打一回车;将表格连同回车一起选定,复制;光标定位于最后一个回车符上,粘贴(其中回车符可按 CTRL 键连选后再按 Ctrl + [(或])调整大小)。

TA的精华主题

TA的得分主题

发表于 2021-1-7 11:08 | 显示全部楼层
[广告] VBA代码宝 - VBA编程加强工具 · VBA代码随查随用  · 内置多项VBA编程加强工具       ★ 免费下载 ★      ★使用手册
楼主,可以把页面显示比例设置为 200%或500%,全部录入完毕再统一排版。

TA的精华主题

TA的得分主题

 楼主| 发表于 2021-1-7 12:22 | 显示全部楼层
413191246se 发表于 2021-1-7 02:15
先画一个 5行1列表格,再在各行键入a/b/c/d;然后,布局/选定表格;布局/中部剧中;设置行高为1.5厘米固定 ...

您好,我想制作如何在五线谱上,规范的写字母。如何将某个字母写在五线谱上。麻烦能不能将我上传的模板,帮我处理一下,应该怎么操作,谢谢啦。非常感谢,办法我已经想了半年了,各种百度,也没有搜到该如何处理,麻烦了,谢谢了。非常感谢。如下图所示:

TA的精华主题

TA的得分主题

 楼主| 发表于 2021-1-7 12:24 | 显示全部楼层
本帖最后由 zaoanshanghai 于 2021-1-7 12:28 编辑
413191246se 发表于 2021-1-7 02:15
先画一个 5行1列表格,再在各行键入a/b/c/d;然后,布局/选定表格;布局/中部剧中;设置行高为1.5厘米固定 ...

您好,我想制作如何在五线谱上,规范的写字母。如何将某个字母写在五线谱上。如下图所示:麻烦能不能将我上传的模板,帮我处理一下,应该怎么操作,谢谢啦。非常感谢,我已经想了半年了,各种百度,也没有搜到该如何处理,麻烦哪位大神帮帮我,谢谢了。非常感谢。我还想比如讲某个字母放到五线谱的第几根线上,上下再稍微挪动微调一下。谢谢啦。如下图所示:



image.jpg

TA的精华主题

TA的得分主题

 楼主| 发表于 2021-1-7 12:26 | 显示全部楼层
[广告] VBA代码宝 - VBA编程加强工具 · VBA代码随查随用  · 内置多项VBA编程加强工具       ★ 免费下载 ★      ★使用手册
413191246se 发表于 2021-1-7 11:08
楼主,可以把页面显示比例设置为 200%或500%,全部录入完毕再统一排版。

您好,我试了,还是不行。麻烦能不能将我上传的模板,帮我处理一下,应该怎么操作,谢谢啦。非常感谢,我已经想了半年了,各种百度,也没有搜到该如何处理,麻烦哪位大神帮帮我,谢谢了。非常感谢。我还想比如讲某个字母放到五线谱的第几根线上,上下再稍微挪动微调一下。谢谢啦
我想弄成如下图所示:
image.jpg

TA的精华主题

TA的得分主题

发表于 2021-1-7 21:44 | 显示全部楼层
真不清楚楼主要的是四线还是五线。但不管多少线,也不应以画表格的方式。可试试如下思路设计模板:
1.制作一个空白五线谱的图片,使其刚好占满一页的版心及版心与页眉间的位置,即图片上部留点空;
2.将该图片从页眉插入文档中,使其与文档版心位置对应,并将图片版式设置为衬于文字下方;
3.在页面设置的文档网格选项卡中指定每页行数,必要时相应设置文档默认字体大小等,使正文正常段落与五线谱的线位相一致;
4.返回文档正文部分,输入一些段落及少量文字,调整字符与段落格式以使文档段落与五线谱线位相一致;
5.调整完毕后删除正文的内容。
使用时,需要在五线谱外输入曲名等内容时,可用文本框输入,或用空白文本框覆盖其下的五线谱后在正文输入

TA的精华主题

TA的得分主题

发表于 2021-1-7 23:07 | 显示全部楼层
本帖最后由 413191246se 于 2021-1-8 09:25 编辑

* 严重同意 sylun 老师 的意见!楼主,请问你到底是要 5 线,还是 4 线呢?
* 如果是在线上加字母,可以考虑文本框。或将 字母提升位置 试试。

TA的精华主题

TA的得分主题

发表于 2021-1-8 13:34 | 显示全部楼层
[广告] VBA代码宝 - VBA编程加强工具 · VBA代码随查随用  · 内置多项VBA编程加强工具       ★ 免费下载 ★      ★使用手册
* 楼主,现在我用 VBA 宏代码画出了漂亮的四线格,但就是在 Word2019 中录制文本框时,一无所获!
* sylun 老师:用在 Word2003 中画文本框的代码,在 Word2019 中无效!不知 老师 有什么好办法?
  1. Sub EnglishLetter4LineTable()
  2. 'TEST-OK
  3.     Documents.Add
  4.     ActiveDocument.Tables.Add Range:=Selection.Range, NumRows:=3, NumColumns:=1
  5.     ActiveDocument.Tables(1).Select
  6.     With Selection
  7.         With .Borders(wdBorderTop)
  8.             With Options
  9.                 .DefaultBorderLineStyle = wdLineStyleSingle
  10.                 .DefaultBorderLineWidth = wdLineWidth150pt
  11.                 .DefaultBorderColor = wdColorBlue
  12.             End With
  13.             .LineStyle = Options.DefaultBorderLineStyle
  14.             .Color = Options.DefaultBorderColor
  15.         End With
  16.         With .Borders(wdBorderBottom)
  17.             .LineStyle = Options.DefaultBorderLineStyle
  18.             .Color = Options.DefaultBorderColor
  19.         End With
  20.         .Cells(2).Select
  21.         With .Borders(wdBorderTop)
  22.             With Options
  23.                 .DefaultBorderLineStyle = wdLineStyleDashLargeGap
  24.                 .DefaultBorderLineWidth = wdLineWidth050pt
  25.                 .DefaultBorderColor = wdColorBlue
  26.             End With
  27.             .LineStyle = Options.DefaultBorderLineStyle
  28.             .Color = Options.DefaultBorderColor
  29.         End With
  30.         With .Borders(wdBorderBottom)
  31.             .LineStyle = Options.DefaultBorderLineStyle
  32.             .Color = Options.DefaultBorderColor
  33.         End With
  34.         .HomeKey 6
  35.     End With
  36.     ActiveWindow.View.TableGridlines = False
  37. End Sub
复制代码
您需要登录后才可以回帖 登录 | 免费注册

本版积分规则

手机版|关于我们|联系我们|ExcelHome

GMT+8, 2024-11-24 00:59 , Processed in 0.040473 second(s), 11 queries , Gzip On, MemCache On.

Powered by Discuz! X3.4

© 1999-2023 Wooffice Inc.

沪公网安备 31011702000001号 沪ICP备11019229号-2

本论坛言论纯属发表者个人意见,任何违反国家相关法律的言论,本站将协助国家相关部门追究发言者责任!     本站特聘法律顾问:李志群律师

快速回复 返回顶部 返回列表