wps word怎么设置图片位置？，word 对象位置。这个问题金纳莱为您提供更多相关信息让你了解。

1、打开WPS，建立空白文字word 对象位置。

2、在文档中插入一张图片。

3、选中图片，设置图片环绕方式为【浮于文字上方】。

4、在图片上点击鼠标右键，点击右键菜单中的【其他布局选项】。

5、在打开的【布局】设置窗口中，在【位置】选项卡中，设置图片在水平和垂直方向上的绝对位置参考对象为【页面】。

6、然后设置【绝对位置】的数值。

7、同时还要注意绝对位置的单位。

8、点击【确定】，完成设置，则图片的位置就变动到了设置的位置。

9、需要注意的是，绝对位置的参考对象如果更改了，得到的效果是不一样的。比如，把参考对象设置为【页边距】，位置的数值保持不变。

10、再看，图片在文档中的位置就变化了。

word设置对象模式在哪

  用户在Word中操作的每一个东西都是一个对象，如文档、对话框、文本框、图形、图表甚至Word本身都是对象，这些对象都有自己的属性和方法。因此，用户可以通过编程来访问这些已有的对象，改变它们的属性，以完成某些较特殊的操作。在对象模型中，还有一个重要的概念是集合（Collections）。
  所谓集合，就是一组相近对象的组合，属于一个更大的对象，例如Sentences、Words和Characters对象，就可看成一个集合，它们隶属于Range对象，集合的重要属性是可以对其进行整体操作。本文以改变Word文档属性来说明Word对象模型的应用。
  

Word文档属性的整体改变

我们有时想将Word文档的属性（如字体、字号等）作整体改变，最常见的例子是将整篇文档的字体都按比例增大或减小一号，如果整篇文档都采用同一属性，那么就可全选整个文档，然后改变属性即可；如果文档中的不同部分的属性不同，我们就很难对其进行整体操作，唯一的办法是选择文档的不同部分进行分别操作，这样做不仅费时，而且容易出错。
  若借助Word的对象模型，我们就可轻易地对整个文档中的每一段、句和单词甚至是单个字的属性进行准确控制，下面以字号属性为例（其他属性类似），将文档中的所有字的字号都减小一号。

1。以Paragraphs（段）为操作对象，将文档中的每一段的字号都减小一号

如果Word文档中的各段落的字号不相同，但段落内部的字号都相同，则可以通过改变段落对象的字号属性来达到我们的目的。
  代码如下。

Sub paragraph()

On Error Resume Next

Dim myParagraph As paragraph

\’对每一段落进行操作

For Each myParagraph In ActiveDocument。
  

Paragraphs

\’如果该段落中的字号不尽一致或有其他格式，

Word段落字号属性的返回值将为99999，

此时使用段落对象模型不能改变该段落的字号，故退到下一段

If myParagraph。Range。Font。Size >1000 Then Exit For

\’将该段的字号减小一号

myParagraph。
  Range。Font。Size=myParagraph

。Range。Font。Size－1

Next myParagraph

End Sub

2。以Sentences（句子）为对象，将文档中每一句的字号都减小一号

……

Dim I, J As Integer

\’统计每一段中句子的总数

J = myParagraph。
  Range。sentences。Count

For I = 1 To J

\’防止同一句中出现不同的字号

If myParagraph。Range。sentences(I)。Font。Size

>1000 Then Exit For

\’将每一句的字号减小一号

myParagraph。
  Range。sentences(I)。Font。Size=

myParagraph。Range。sentences(I)。Font。Size －1

Next I

……

3。以Words（单词）为操作对象，将文档中的每一单词的字号都减小一号

……

For Each myParagraph In ActiveDocument。
  Paragraphs

\’统计每一段中总单词数

J = myParagraph。Range。words。Count

\’将每一个单词的字号减小一号

For I = 1 To J

myParagraph。Range。words(I)。Font。
  Size =

myParagraph。Range。words(I)。Font。Size － 1

Next I

……

4。以Characters（单字）为操作对象，将文档中的每一个字的字号减小一号

……

For Each myParagraph In ActiveDocument。
  Paragraphs

\’统计每一段中总字数

J = myParagraph。Range。characters。Count

\’将每一个字的字号减小一号

For I = 1 To J

myParagraph。Range。characters(I)。
  Font

。Size=myParagraph。Range。characters(I)。Font。Size－1

Next I

……

带格式单词的替换

Word自身有替换命令(ctrl＋h)，但该命令的不足之处是，不能对带格式的单词进行替换，例如，要将整篇文档中的H2CO3替换成H2CO3，该命令就无能为力了。
  下面介绍如何借助Word中的对象模型来实现替换。

Sub ReplaceWord()

On Error Resume Next

\’对文档中的H2CO3进行格式替换

Dim myParagraph As Paragraph

Dim I, J As Integer

Dim tmpStr As String

\’对每一段进行操作

For Each myParagraph In ActiveDocument。
  Paragraphs

\’统计该段的单词数

J = myParagraph。Range。words。Count

For I = 1 To J

\’比较字符串，查找所有替换的单词

If (LCase(myParagraph。Range。words(I))

= “h2co3\”) Then

\’选择所替换的单词

myParagraph。
  Range。words(I)。ｓｅｌｅｃｔ

\’替换单词，写入字母H

Selection。TypeText Text:=“H\”

\’将其格式变为下标

Selection。Font。Subscript = True

\’写入下标2

Selection。
  TypeText Text:=“2\”

\’字体变为正常体

Selection。Font。Subscript = False

\’写入字母CO

Selection。TypeText Text:=“CO\”

\’将其格式变为下标

Selection。
  Font。Subscript = True

\’写入下标3

Selection。TypeText Text:=“3\”

\’字体变为正常体

Selection。Font。Subscript = False

End If

Next I

Next myParagraph

End Sub

上面程序段运行后，即可将文档中所有的H2CO3全部替换成H2CO3。
  而且，我们还可在VBA中插入窗体，编写出同Word替换命令类似的窗口界面，来进行带格式单词的替换。

以上就是金纳莱网»word 对象位置，wps word怎么设置图片位置？的相关内容了，更多精彩请关注金纳莱号公众号。