把第10个段落后的东西用以下代码藏起来让别人看不到。
Sub 藏() Selection.WholeStory Selection.Font.Size = 1 Selection.Font.Color = wdColorWhiteEnd Sub第10个段落之前的不藏，任何人都能看到，如何修改以上代码？
其他答案
看一看是不是你需要的alt + f11显示呀Sub 藏()Dim oPara As ParagraphDim ii = 0For Each oPara In ActiveDocument.Paragraphsi = i + 1If i >10 ThenoPara.Range.Font.Size = 1oPara.Range.Font.Color = wdColorWhiteEnd IfNe 展开
2011-01-08 02:25
来自北京市
评论(0)赞(0)点赞赞(0)
免责声明：问答内容均来源于互联网用户，房天下对其内容不负责任，如有版权或其他问题可以联系房天下进行删除。
