WS作为一款功能强大的办公软件，其自动**功能在演示、教学等场景下尤为实用。如何设置WS的自动**功能呢？我将为您详细解答。

一、开启自动**功能

1.打开WS文档，点击“工具”菜单，选择“宏”。

2.在弹出的“宏”窗口中，点击“创建”按钮。

3.在“宏名称”框中输入“自动**”，在“位置”下拉菜单中选择“Normal”，点击“确定”。

4.在弹出的“宏编辑器”中，将以下代码复制粘贴到代码编辑区：

Su自动**()

DimdocAsDocument

Setdoc=ActiveDocument

doc.SaveAs"D:\自动**.ws"

doc.Close

EndSu

5.修改代码中的路径“D:\自动**.ws”，将其改为您的WS文档保存路径。 6.点击“宏编辑器”窗口上的“运行”按钮，运行宏，此时您的WS文档会自动保存并关闭。

二、设置自动**时间

1.打开“宏编辑器”，将以下代码添加到“自动**”宏中：

Alication.OnTimeNow+TimeValue("00:00:10"),"自动**"

2.修改“00:00:10”中的时间，设置您希望的自动**时间。 3.保存并运行宏，此时您的WS文档将在设定的时间后自动**。

三、设置自动**内容

1.在“自动**”宏中，将以下代码替换原有内容：

Su自动**()

DimdocAsDocument

Setdoc=ActiveDocument

Withdoc

Views(1).SlideShowSettings.SlideShowWindow.ViewTye=SlideShowNormal

Views(1).SlideShowSettings.StartAtSlide=1

Views(1).SlideShowSettings.EndAtSlide=.Slides.Count

Views(1).SlideShowSettings.EnaleHand=msoFalse

Views(1).SlideShowSettings.ShowDigits=msoTrue

Views(1).SlideShowSettings.ShowNotes=msoTrue

Views(1).SlideShowSettings.ShowSlideNumer=msoTrue

Views(1).SlideShowSettings.ViewTye=SlideShowNormal

Views(1).SlideShowSettings.Start

EndWith

EndSu

2.保存并运行宏，此时您的WS文档将按照您设置的内容自动**。

通过以上步骤，您可以在WS中设置自动**功能，使您的演示或教学更加生动有趣。希望**能为您解决实际问题，如有疑问，请随时留言。