寻求 Word2003 标题格式
要不在word里一个个地看,要不用vba搞出来。
直接运行下面的程序就可以在一个新文档中显示所有标题的样式。
Sub stylelist()Documents.AddSet doc = ActiveDocumentn = 1Do Until n > Styles.CountIf ActiveDocument.Styles(n).NameLocal Like "*标题*" Then doc.Content.InsertAfter vbCr & vbCr & "样式" & n & ":" & vbCr doc.Content.InsertAfter "Name Local= " & ActiveDocument.Styles(n).NameLocal & vbCr 'doc.Content.InsertAfter "Application=" & ActiveDocument.Styles(n).Application & vbCr 'doc.Content.InsertAfter "AutomaticallyUpdate=" & ActiveDocument.Styles(n).AutomaticallyUpdate doc.Content.InsertAfter "BaseStyle=" & ActiveDocument.Styles(n).BaseStyle & vbCr 'doc.Content.InsertAfter "Borders=" & ActiveDocument.Styles(n).Borders & vbCr doc.Content.InsertAfter "BuiltIn=" & ActiveDocument.Styles(n).BuiltIn & vbCr 'doc.Content.InsertAfter "Creator=" & ActiveDocument.Styles(n).Creator & vbCr doc.Content.InsertAfter "Description=" & ActiveDocument.Styles(n).Description & vbCr doc.Content.InsertAfter "Font=" & ActiveDocument.Styles(n).Font.Name & vbCr doc.Content.InsertAfter "Fontsize=" & ActiveDocument.Styles(n).Font.Size & vbCr doc.Content.InsertAfter "Fontunderline=" & ActiveDocument.Styles(n).Font.Underline & vbCr doc.Content.InsertAfter "Fontbold=" & ActiveDocument.Styles(n).Font.Bold & vbCr doc.Content.InsertAfter "Fontlitalic=" & ActiveDocument.Styles(n).Font.Italic & vbCr 'doc.Content.InsertAfter "Frame=" & ActiveDocument.Styles(n).Frame & vbCr doc.Content.InsertAfter "InUse=" & ActiveDocument.Styles(n).InUse & vbCr 'doc.Content.InsertAfter "LanguageID=" & ActiveDocument.Styles(n).LanguageID & vbCr 'doc.Content.InsertAfter "LanguageIDFarEast=" & ActiveDocument.Styles(n).LanguageIDFarEast doc.Content.InsertAfter "LinkStyle=" & ActiveDocument.Styles(n).LinkStyle & vbCr 'doc.Content.InsertAfter "ListLevelNumber=" & ActiveDocument.Styles(n).ListLevelNumber & vbCr 'doc.Content.InsertAfter "ListTemplate=" & ActiveDocument.Styles(n).ListTemplate.Name & vbCr 'doc.Content.InsertAfter "Locked=" & ActiveDocument.Styles(n).Locked & vbCr 'doc.Content.InsertAfter "NextParagraphStyle=" & ActiveDocument.Styles(n).NextParagraphStyle & vbCr 'doc.Content.InsertAfter "NoProofing=" & ActiveDocument.Styles(n).NoProofing & vbCr 'doc.Content.InsertAfter "NoSpaceBetweenParagraphsOfSameStyle=" & ActiveDocument.Styles(n).NoSpaceBetweenParagraphsOfSameStyle & vbCr doc.Content.InsertAfter "ParagraphFormatAlignment=" & ActiveDocument.Styles(n).ParagraphFormat.Alignment & vbCr 'doc.Content.InsertAfter "Parent=" & ActiveDocument.Styles(n).Parent & vbCr 'doc.Content.InsertAfter "Shading=" & ActiveDocument.Styles(n).Shading & vbCr 'doc.Content.InsertAfter "Table=" & ActiveDocument.Styles(n).Table & vbCr 'doc.Content.InsertAfter "Type=" & ActiveDocument.Styles(n).Type & vbCr & vbCr & vbCr & vbCrEnd If n = n + 1LoopMsgBox "done"End Sub
word2003怎么把题目和答案匹配起来,即一道题对应一个答案
编辑本段Word2003文档结构图的使用查阅结构图文档◎在【常用】工具栏中单击【文档结构图】按钮。
◎单击【文档结构图】中要跳转的标题。
该标题及其内容就会显示在页面顶部。
调整结构图大小◎将鼠标指针指向窗格右边,当指针形状变化时,向左或向右拖动即可。
◎如果标题太长,超出文档结构图宽度,不必调整窗格大小,只需将指针在标题上稍作停留,即可看到整个标题。
展开或折叠子标题◎凡是隐藏了子标题的上一级标题,前面会有一个展开符号“+”,单击“+”即可展开所有子标题。
同时“+”号变成“-”号,即折叠符号。
◎如果要隐藏某一标题下的子标题,则单击标题旁的 “-”号,所有的子标题即被折叠隐藏起来。
显示特定级别标题◎可在【文档结构图】的标题上单击鼠标右键,然后单击快捷菜单中的一个数字(例如,单击【显示至标题3】可显示标题级别1至3)。
求几个关于word2003选择题的答案
1.C2.C3.d4.题目描述不够清楚:若输入新文本,插入点右侧文本照常显示,则是“插入”模式;若如果输入新文本,插入点右侧文本逐字被覆盖,则是“改写”模式
word2003中怎么加入标题
1. 打开word2003,在页面上输入特定的文字内容;2. 点击“格式”,选择“样式和格式”;3. 在界面的右边调出了“样式和格式”之后,需要哪种标题点击选择即可;4. 若是需要新的样式,可以点击上面的“新样式”;5. 在弹出来的“新建样式”上设置好特定的格式,再点击“确定”即可。
word2003的问题?没一个标题前本可以放一个例如前置标符的东
首先将光标置于Word2003表格的标题行中,然后在Word菜单栏依次单击“表格”→“标题行重复”菜单命令。
经过设置后,第2页的Word表格顶端会出现与第1页中标题完全相同的标题。
转载请注明出处51数据库 » word2003题目
黄埔云儿