Have entire row be bold based on contents of cell in Column A

[mlarson]

Merry Christmas! I hope you can help me with this (hopefully/probably pretty simple).

For every cell in column A that shows "x" ("x" only, nothing else in cell), I would like that entire row to be bold. If it doesn't show "x" then nothing needs to change. For example...
A22 shows "x", I'd like row 22 to be bold.
A38 shows nothing, I'd like no change to row 38.
A87 shows "xyz", I'd like no change to row 87.
A156 shows "x", I'd like row 156 to be bold.

I hope I explained that clearly. Thanks in advance for your help! -Mark

 

[Fluff]

You can do that with conditional formatting like

+Fluff 1.xlsm
	A	B	C	D	E	F	G
1	Postcode	In Use?	Latitude	Longitude	Easting	Northing	GridRef
2	x	Yes	53.02851	-1.91721	405650	347917	SK056479
3		Yes	51.75299	-2.14309	390219	206042	SO902060
4		Yes	53.01993	-2.102	393255	346964	SJ932469
5		Yes	53.75919	-1.76996	415264	429228	SE152292
6	X	E	52.54611	-2.12357	391717	294258	SO917942
7	xyz	Yes	53.30377	-1.50596	433020	378649	SK330786
8	EX17 5AG	Yes	54.7892	-1.70387	419141	543852	NZ191438
Lists

Cells with Conditional Formatting
Cell	Condition		Cell Format	Stop If True
A2:G8	Expression	=$A2="x"	text	NO

 

[mlarson]

Thanks for your help, Fluff, on Christmas day!

 

[Fluff]

You're welcome & thanks for the feedback.

 

[Michael M]

Or maybe a VBA...

Option Compare Text
Sub MM1()
 Dim r As Long
 For r = Cells(Rows.Count, "A").End(xlUp).Row To 2 Step -1
    If Cells(r, 1) = "x" Then Range("A" & r & ":G" & r).Font.Bold = True
Next r
End Sub

 

[MARK858]

A non-looping alternative

Sub Filterx()
    Application.ScreenUpdating = False
    
    With Range("A1:A" & Range("A" & Rows.Count).End(xlUp).Row)
    
        .AutoFilter 1, "x"
        
        On Error Resume Next
        .Offset(1).Resize(.Rows.Count - 1).SpecialCells(12).EntireRow.Font.Bold = True
        On Error GoTo 0
        .AutoFilter
    
    End With
    
    Application.ScreenUpdating = True
End Sub