[求助]:vba中设置页宽是对PageWidth进行设置，那我要设置行距的话要对哪个变量进行

hhb4251

vba中设置页宽是对PageWidth进行设置，那我要设置行距的话要对哪个变量进行设置呢？还有另起一行是Selection.TypeParagraph命令，那另起一页呢？虽然可以用n个Selection.TypeParagraph达到令起一页的目的，但是n值很难确定。所以请教各位高手有另起一页的命令吗？

konggs

录个宏，找找。

hhb4251

版主指的从是“工具”-->"宏“-->"宏”里面的word命令里面找吗？我已经找到跳到下一页的命令是nextpage但是在vba中这个命令是没用的，不知道是不是还要变换一下用，还有找不到设置行距的变量，版主能帮我找一下吗？谢谢！

konggs

Sub 设置()
Selection.InsertBreak Type:=wdPageBreak '插入分页符
Selection.ParagraphFormat.Space2 ' 以2倍行距
With Selection.ParagraphFormat
.LineSpacingRule = wdLineSpaceExactly '固定值模式
.LineSpacing = 20 '20磅
End With
End Sub

hhb4251

我已经找到了，但是还是要谢谢版主。

插入分页符的方法是跟你一样的，行距的设置跟你的不一样，我是这样的.LineSpacingRule = wdLineSpaceMultiple
.LineSpacing = LinesToPoints(1.1) '1.1倍行距

不过道理是一样的换碳不换药。