档案标签中让文字自适应的问题

tangqingfu

413191246se 发表于 2019-7-26 01:16
* 楼主，我重新设计、编写了 VBA 代码，算法思路是：文本框中插入1行7列表格（各项指标均可调整）。
* VBA ...

谢谢413191246se兄。
能否让标签中的主体内容（如“师德建设”部分）做到：不论文本内容为多少，均设为指定高度（如8cm)，即等高,如果文本内容较少，则分散对齐；如果文本内容较多，则缩小字体，字符间距不宜太小，如果太小，感觉挤到一起.。
好像楼主也是这个意思，这样的标签看起来更美观。

413191246se

    谢谢 唐兄！ 我的代码也只是初步框架定好了，具体当然可以对每个单元格中的字数做条件判断，如：4字怎么样；5字怎么样；6字怎么样，现在暂时由 楼主 决定吧，因为我也不实际打印标签；我也说了，各项指标均是可调的，几厘米都可以；分散对齐可以考虑；也可以改为段前段后或左右缩进；比如纸张也可以改为横向；具体细微变化可以再议。个人感觉《标签名称》这部分字太多不好；另外，当中含英文/数字时，是否要斜体呢？这点不清楚。
    唐兄 如果有需求，我可以继续细化调整，请多指教。

liuchengyu

413191246se 发表于 2019-7-26 12:48
谢谢 唐兄！ 我的代码也只是初步框架定好了，具体当然可以对每个单元格中的字数做条件判断，如：4字怎 ...

谢谢。前几天有事情没法上网，现在刚回来。我把附件下载下来学习一下。有问题再来请教。

413191246se

* 楼主，你试用的是我的第 2 版本，我现在已经编写完毕第 4 版本，就是最新发布的《彩色标签》宏 2019-8-1，请自行下载试用（有需要可以自行修改）。——差点忘了！ 下载后，请在代码中按 Ctrl + Home 将光标置于文首，然后查找“_GB2312”全部替换为“”（无，空白）。因为，你的 WIN7 系统，楷体的字体名称是“楷体”，而 WINXP 系统的楷体字体名称是“楷体_GB2312"（GB意为“国标”）。

liuchengyu

413191246se 发表于 2019-8-1 14:33
* 楼主，你试用的是我的第 2 版本，我现在已经编写完毕第 4 版本，就是最新发布的《彩色标签》宏 2019-8-1 ...

大侠你好，我用第二版的时候可以生产，但是刚刚找到了8月3日第6版的。不管把“楷体_GB2312”替换成“楷体”还是其他字体，都不能生产标签。一运行宏就直接把源数据表格第一行修改了。

413191246se

楼主，建议重新测试。