Is it possible to mail merge into a catalog and create conditional formatting (cell color)?
![]() |
Patch reliability is unclear. Unless you have an immediate, pressing need to install a specific patch, don't do it. |
SIGN IN | Not a member? | REGISTER | PLUS MEMBERSHIP |
-
conditional format with mail merge (word 2000)
Home » Forums » AskWoody support » Productivity software by function » MS Word and word processing help » conditional format with mail merge (word 2000)
- This topic has 7 replies, 3 voices, and was last updated 23 years ago.
Viewing 1 reply threadAuthorReplies-
WSDreamboat
AskWoody Lounger -
WSrsm1935
AskWoody Lounger -
WSDreamboat
AskWoody Lounger -
WSrsm1935
AskWoody LoungerJune 17, 2002 at 2:32 am #595197 -
WSDreamboat
AskWoody LoungerJune 17, 2002 at 2:40 am #595198Indeed, then this would require VBA code. There are ways to “mail merge” without mail merging using code. I cannot write it myself, tho I’ve just recently managed a couple of projects that perform similar tasks. See if you can get someone to write the code for you. Unfortunately (hee hee), I have to pay my programmers.
-
WSHansV
AskWoody Lounger
-
-
-
-
-
WSHansV
AskWoody LoungerJune 18, 2002 at 3:00 pm #595518Here is an example that tests on a single condition. You’ll have to adapt it to work with multiple conditions.
Assumptions: the merged catalog is a Word table.
The test here is that the first cell in a row contains 1.Sub ShadeAlternate()
Dim tbl As Table
Dim intRow As Integer
Dim strText As String
‘ Table object
Set tbl = ActiveDocument.Tables(1)
‘ Loop through rows, skip header row
For intRow = 2 To tbl.Rows.Count
‘ Get text from cell in first column
strText = tbl.Cell(intRow, 1).Range.Text
‘ Get rid of invisible characters at end of cell
strText = Left(strText, Len(strText) – 2)
‘ Test condition
If strText = “1” Then
‘ Set shading
With tbl.Rows(intRow).Shading
.Texture = wdTextureNone
.ForegroundPatternColorIndex = wdAuto
.BackgroundPatternColorIndex = wdYellow
Else
.Texture = wdTextureNone
.ForegroundPatternColorIndex = wdAuto
.BackgroundPatternColorIndex = wdBrightGreen
End With
End If
Next intRow
Set tbl = Nothing
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
-
Windows 11 blocks Chrome 137.0.7151.68, 137.0.7151.69
by
Alex5723
2 hours, 1 minute ago -
Are Macs immune?
by
Susan Bradley
1 hour, 33 minutes ago -
HP Envy and the Function keys
by
CWBillow
5 hours, 6 minutes ago -
Microsoft : Removal of unwanted drivers from Windows Update
by
Alex5723
13 hours, 18 minutes ago -
MacOS 26 beta 1 dropped support for Firewire 400/800
by
Alex5723
13 hours, 35 minutes ago -
Unable to update to version 22h2
by
04om
17 minutes ago -
Windows 11 Insider Preview Build 26100.4482 (24H2) released to Release Preview
by
joep517
21 hours, 3 minutes ago -
Windows 11 Insider Preview build 27881 released to Canary
by
joep517
21 hours, 5 minutes ago -
Very Quarrelsome Taskbar!
by
CWBillow
6 hours, 55 minutes ago -
Move OneNote Notebook OFF OneDrive and make it local
by
CWBillow
1 day, 10 hours ago -
Microsoft 365 to block file access via legacy auth protocols by default
by
Alex5723
22 hours, 47 minutes ago -
Is your battery draining?
by
Susan Bradley
3 hours, 47 minutes ago -
The 16-billion-record data breach that no one’s ever heard of
by
Alex5723
1 hour, 35 minutes ago -
Weasel Words Rule Too Many Data Breach Notifications
by
Nibbled To Death By Ducks
1 day, 13 hours ago -
Windows Command Prompt and Powershell will not open as Administrator
by
Gordski
21 hours, 59 minutes ago -
Intel Management Engine (Intel ME) Security Issue
by
PL1
22 hours, 11 minutes ago -
Old Geek Forced to Update. Buy a Win 11 PC? Yikes! How do I cope?
by
RonE22
14 hours, 51 minutes ago -
National scam day
by
Susan Bradley
21 hours, 44 minutes ago -
macOS Tahoe 26 the end of the road for Intel Macs, OCLP, Hackintosh
by
Alex5723
17 hours, 53 minutes ago -
Cyberattack on some Washington Post journalists’ email accounts
by
Bob99
2 days, 14 hours ago -
Tools to support internet discussions
by
Kathy Stevens
1 day, 3 hours ago -
How get Group Policy to allow specific Driver to download?
by
Tex265
2 days, 6 hours ago -
AI is good sometimes
by
Susan Bradley
2 days, 22 hours ago -
Mozilla quietly tests Perplexity AI as a New Firefox Search Option
by
Alex5723
2 days, 12 hours ago -
Perplexity Pro free for 12 mos for Samsung Galaxy phones
by
Patricia Grace
3 days, 22 hours ago -
June KB5060842 update broke DHCP server service
by
Alex5723
3 days, 20 hours ago -
AMD Ryzen™ Chipset Driver Release Notes 7.06.02.123
by
Alex5723
4 days, 1 hour ago -
Excessive security alerts
by
WSSebastian42
2 days, 15 hours ago -
* CrystalDiskMark may shorten SSD/USB Memory life
by
Alex5723
4 days, 10 hours ago -
Ben’s excellent adventure with Linux
by
Ben Myers
21 minutes 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.