Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
trouble with simple loop . . .ARGH!
I am a newbie!
I am running a macro to dump timescaledata into excel. I want to bold each subtotaled row(done with the subtotal command). I cannot for the life of me figure out what I've done wrong. I want to cycle through the range, and wherever the text includes the word "Total", bold the entire row. JEff ================================================== everything is declared . . . . Set xlRng = xlRng.Columns("a") xlRng.Select For Each cell In xlRng If Right(cell.Value, 5) = "Total" Then EntireRow.Select.Font.Bold = True End If Next cell |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
trouble with simple loop . . .ARGH!
Buster, try
Dim cell as Range For each cell In Range("A1:A1000").cells If cell.Value Like "*Total*" Then cell.EntireRow.Font.Bold = True End If Next cell Good luck Fred "Buster" wrote in message ... I am a newbie! I am running a macro to dump timescaledata into excel. I want to bold each subtotaled row(done with the subtotal command). I cannot for the life of me figure out what I've done wrong. I want to cycle through the range, and wherever the text includes the word "Total", bold the entire row. JEff ================================================== everything is declared . . . . Set xlRng = xlRng.Columns("a") xlRng.Select For Each cell In xlRng If Right(cell.Value, 5) = "Total" Then EntireRow.Select.Font.Bold = True End If Next cell |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
TROUBLE WITH A SIMPLE FORMULA | Excel Discussion (Misc queries) | |||
Trouble with simple percentage formula | New Users to Excel | |||
Simple Formula Trouble | Excel Discussion (Misc queries) | |||
Having trouble with simple macro! | Excel Programming | |||
Trouble with simple If and Else | Excel Programming |