1.WPS文字里怎么设置A2的纸啊
1打开WPS文字的一个新的文档。
选择页面布局---纸张大小。 2点击纸张大小进入纸张大小设置页面。
比如我们需要纸张的大小为16开,这个时候选择纸张大小,选项16开。 3如果我们需要的不是16开,并且在纸张大小里没有合适的选择,而是要制定的大小,比如宽度为200毫米,高度为150毫米。
应该怎么设置呢。选择纸张大小为自定义在宽度栏输入200、高度栏输入150. 4在纸张下方有一个默认选项。
这个按钮是以后你新建文档,默认的就是这个设置。 5点击确定,我们可以看到我们新设置的页面是什么样子的了。
希望能帮助到你,麻烦点击“有用”,谢谢。
2.word里面怎么把数字设为千分位
手动输入个英文逗号就行,如有你非要高难度的,我转一个文章给你,你看看吧
采用了vba编写了一个小程序来实现这一功能,以方便有这方向烦恼的读者,程序如下:
sub 改变数字格式为千分位格式 ()
dim strwithth as string '用于保存处理后的数字
dim inti as integer
'循环给定的数字
dim intlen as integer '求数字长度
dim intcount as integer '保存改变个数
with selection
.homekey unit:=wdstory '回到文章开头
.find.clearformatting
do
.find.text = "^#^#^#^#" '查找4位数字
'如果没有找到,退出
if .find.execute = false then
msgbox "长春崔宇的程序:千分位设置完毕!共改变 " & intcount & "个数字。", vbinformation
exit sub
end if
intcount = intcount + 1 '计数器增加
.moveleft '移到整个数字的左边
.moveright unit:=wdword, count:=1, extend:=wdextend '选择整个数字
intlen = len(.text)
strwithth = "" '清空
for inti = intlen to 1 step -3
if inti > 3 then
strwithth = "," & mid(.text, inti - 2, 3) & strwithth
else
'对于长度为3的倍数的数字特别处理
strwithth = left(.text, iif(intlen mod 3 = 0, 3, intlen mod 3)) & strwithth
end if
next
.text = strwithth
.moveright '右移一个来取消选择
loop
end with
end sub
将上面的代码,保存在normal模板中,需要运行时,按alt+f8选择该宏运行就可以了,当然也可为这个宏分配一个按钮。
程序的实现方法:程序是以word的查找为基础,找到四位以上的数字,然后选择这个数字,将其变为千分位格式后写回,循环到查找结束。当然代码中并没有对数字进行细致的分析,所以对“2002年”这样不应加千分位的数字也会处理。代码在office9,office10,office11,office12上运行通用。