I occasionally make word documents available from an Internet page. I’ve been berating a friend who uses tabs instead of tables, but when I replace all those tabs with tables, there seems to be no way to remove the table grid lines from the screen view (I know how to remove the borders). Also, if the document opens with paragraph marks showing, that looks tacky. I do not want to control the view with macros, since I don’t want people to feel they’re assuming any risk by opening the documents. Other than converting to Acrobat, is there any way to make sure a document opens with paragraph marks off (is there a non-macro-controlled setting that stays with the document) and is there a way to make the grid lines invisible – such as they (don’t) appear in print preview?
![]() |
There are isolated problems with current patches, but they are well-known and documented on this site. |
SIGN IN | Not a member? | REGISTER | PLUS MEMBERSHIP |
-
Clean View of document?
Home » Forums » AskWoody support » Productivity software by function » MS Word and word processing help » Clean View of document?
- This topic has 4 replies, 3 voices, and was last updated 24 years, 1 month ago.
Viewing 1 reply threadAuthorReplies-
WSwcutler
AskWoody Lounger -
Andrew Lockton
AskWoody_MVPApril 5, 2001 at 11:02 pm #521771 -
WSwcutler
AskWoody LoungerApril 6, 2001 at 2:56 pm #521869Andrew, exactly what I wanted to understand. Thanks. And I’m entired pleased with the white lines.
Gary and Crudd, thanks for the suggestions. Since the readers could be people I don’t know, I wanted to avoid depending on a macro (which might cause them to not open the document or to disable the macro), and I couldn’t depend on their having a particular configuration on their computer.
-
-
-
WSGary Frieder
AskWoody LoungerApril 5, 2001 at 11:40 pm #521773Hi Wendy,
Last fall I played around with developing code to do this (never got implemented though). If I recall it correctly, what it would do was: on Document_Open store all of the user’s View preferences as DocVariables, and apply the “clean view” settings, and on Document_Close restore all the View settings back to what the user originally had. I believe the idea was that this code had to sit in the document’s attached template (which means we would have needed to atach a special ‘Web View’ template to these documents).
This never got implemented or developed further but you’re welcome to make any use of this (if it’s of any use) (it does work though!):
Private Sub Document_Open() Dim bShowAnimText As Boolean Dim bShowPictHolders As Boolean Dim bShowFieldCodes As Boolean Dim bShowBmks As Boolean Dim bShowTabs As Boolean Dim bShowSpaces As Boolean Dim bShowParaMarks As Boolean Dim bShowOptHyph As Boolean Dim bShowHiddenTxt As Boolean Dim bShowAll As Boolean Dim bShowDrawings As Boolean Dim bShowObjAnch As Boolean Dim bShowTextBounds As Boolean Dim nUserView As Integer Dim objDocVar As Variable If LCase$(Right$(ActiveDocument.FullName, 4)) ".dot" Then With ActiveDocument For Each objDocVar In .Variables objDocVar.Delete Next objDocVar With .ActiveWindow.View bShowAnimText = .ShowAnimation bShowPictHolders = .ShowPicturePlaceHolders bShowBmks = .ShowBookmarks bShowTabs = .ShowTabs bShowSpaces = .ShowSpaces bShowParaMarks = .ShowParagraphs bShowOptHyph = .ShowHyphens bShowHiddenTxt = .ShowHiddenText bShowAll = .ShowAll bShowDrawings = .ShowDrawings bShowObjAnch = .ShowObjectAnchors bShowTextBounds = .ShowTextBoundaries nUserView = .Type .Type = wdPageView End With With .Variables .Add "UserView", nUserView .Add "AnimText", bShowAnimText .Add "PictHolders", bShowPictHolders .Add "Bmks", bShowBmks .Add "Tabs", bShowTabs .Add "Spaces", bShowSpaces .Add "ParaMarks", bShowParaMarks .Add "OptHyph", bShowOptHyph .Add "HiddenTxt", bShowHiddenTxt .Add "ShowAll", bShowAll .Add "Drawings", bShowDrawings .Add "ObjAnch", bShowObjAnch .Add "TextBounds", bShowTextBounds End With With ActiveWindow.View .ShowAnimation = False .ShowPicturePlaceHolders = False .ShowBookmarks = False .ShowTabs = False .ShowSpaces = False .ShowParagraphs = False .ShowHyphens = False .ShowHiddenText = False .ShowAll = False .ShowDrawings = True .ShowObjectAnchors = False .ShowTextBoundaries = False .ShowHighlight = True End With .Saved = True End With End If End Sub '========================== Private Sub Document_Close() Dim objDocVar As Variable If LCase$(Right$(ActiveDocument.FullName, 4)) ".dot" Then With ActiveDocument With ActiveWindow.View .Type = ActiveDocument.Variables("UserView") .ShowAnimation = ActiveDocument.Variables("AnimText") .ShowPicturePlaceHolders = ActiveDocument.Variables("PictHolders") .ShowBookmarks = ActiveDocument.Variables("Bmks") .ShowTabs = ActiveDocument.Variables("Tabs") .ShowSpaces = ActiveDocument.Variables("Spaces") .ShowParagraphs = ActiveDocument.Variables("ParaMarks") .ShowHyphens = ActiveDocument.Variables("OptHyph") .ShowHiddenText = ActiveDocument.Variables("HiddenTxt") .ShowAll = ActiveDocument.Variables("ShowAll") .ShowDrawings = ActiveDocument.Variables("Drawings") .ShowObjectAnchors = ActiveDocument.Variables("ObjAnch") .ShowTextBoundaries = ActiveDocument.Variables("TextBounds") End With For Each objDocVar In .Variables objDocVar.Delete Next objDocVar .Saved = True End With End If End Sub
Viewing 1 reply thread -

Plus Membership
Donations from Plus members keep this site going. You can identify the people who support AskWoody by the Plus badge on their avatars.
AskWoody Plus members not only get access to all of the contents of this site -- including Susan Bradley's frequently updated Patch Watch listing -- they also receive weekly AskWoody Plus Newsletters (formerly Windows Secrets Newsletter) and AskWoody Plus Alerts, emails when there are important breaking developments.
Get Plus!
Welcome to our unique respite from the madness.
It's easy to post questions about Windows 11, Windows 10, Win8.1, Win7, Surface, Office, or browse through our Forums. Post anonymously or register for greater privileges. Keep it civil, please: Decorous Lounge rules strictly enforced. Questions? Contact Customer Support.
Search Newsletters
Search Forums
View the Forum
Search for Topics
Recent Topics
-
KB5058379 / KB 5061768 Failures
by
crown
2 hours, 27 minutes ago -
Windows 10 23H2 Good to Update to ?
by
jkitc
5 hours, 6 minutes ago -
At last – installation of 24H2
by
Botswana12
5 hours, 51 minutes ago -
MS-DEFCON 4: As good as it gets
by
Susan Bradley
1 hour, 6 minutes ago -
RyTuneX optimize Windows 10/11 tool
by
Alex5723
18 hours, 3 minutes ago -
Can I just update from Win11 22H2 to 23H2?
by
Dave Easley
11 hours, 22 minutes ago -
Limited account permission error related to Windows Update
by
gtd12345
1 day, 7 hours ago -
Another test post
by
gtd12345
1 day, 7 hours ago -
Connect to someone else computer
by
wadeer
1 day, 2 hours ago -
Limit on User names?
by
CWBillow
1 day, 5 hours ago -
Choose the right apps for traveling
by
Peter Deegan
19 hours, 2 minutes ago -
BitLocker rears its head
by
Susan Bradley
3 hours, 3 minutes ago -
Who are you? (2025 edition)
by
Will Fastie
2 hours ago -
AskWoody at the computer museum, round two
by
Will Fastie
21 hours, 25 minutes ago -
A smarter, simpler Firefox address bar
by
Alex5723
1 day, 17 hours ago -
Woody
by
Scott
2 days, 3 hours ago -
24H2 has suppressed my favoured spider
by
Davidhs
2 hours, 40 minutes ago -
GeForce RTX 5060 in certain motherboards could experience blank screens
by
Alex5723
2 days, 17 hours ago -
MS Office 365 Home on MAC
by
MickIver
2 days, 11 hours ago -
Google’s Veo3 video generator. Before you ask: yes, everything is AI here
by
Alex5723
3 days, 7 hours ago -
Flash Drive Eject Error for Still In Use
by
J9438
2 hours, 25 minutes ago -
Windows 11 Insider Preview build 27863 released to Canary
by
joep517
4 days, 2 hours ago -
Windows 11 Insider Preview build 26120.4161 (24H2) released to BETA
by
joep517
4 days, 2 hours ago -
AI model turns to blackmail when engineers try to take it offline
by
Cybertooth
3 days, 6 hours ago -
Migrate off MS365 to Apple Products
by
dmt_3904
3 days, 6 hours ago -
Login screen icon
by
CWBillow
2 days, 21 hours ago -
AI coming to everything
by
Susan Bradley
11 hours, 53 minutes ago -
Mozilla : Pocket shuts down July 8, 2025, Fakespot shuts down on July 1, 2025
by
Alex5723
4 days, 18 hours ago -
No Screen TurnOff???
by
CWBillow
4 days, 18 hours ago -
Identify a dynamic range to then be used in another formula
by
BigDaddy07
4 days, 19 hours ago
Recent blog posts
Key Links
Want to Advertise in the free newsletter? How about a gift subscription in honor of a birthday? Send an email to sb@askwoody.com to ask how.
Mastodon profile for DefConPatch
Mastodon profile for AskWoody
Home • About • FAQ • Posts & Privacy • Forums • My Account
Register • Free Newsletter • Plus Membership • Gift Certificates • MS-DEFCON Alerts
Copyright ©2004-2025 by AskWoody Tech LLC. All Rights Reserved.