Compare Cells for VBA

katk

Board Regular
Joined
Jul 21, 2009
Messages
62
Hi all,

I'm trying to write a code that checks to see whether a cell is the same as the one above it, and if not, performs several actions. I've been trying to learn VBA from an Excel guide but it only has one relating chapter and after about 15 google searches, I decided to look for help here again.

Here's what I have right now:

Code:
Sub FormatRegions()
For Each cell In Worksheets("Rough Draft").Range("C:C")
If cell.Value <> Offset(-1, 0).Value Then
cell.Font.Bold = True
cell.FontSize 0.16 = True
EntireRow.Insert
EntireRow.Insert
End If
Next cell
End Sub

It gives me an error at the "If cell.Value" line -- that's the part I can't figure out. How do I get it to compare the value of each cell to the one above it?

Thanks so much.
 

Excel Facts

VLOOKUP to Left?
Use =VLOOKUP(A2,CHOOSE({1,2},$Z$1:$Z$99,$Y$1:$Y$99),2,False) to lookup Y values to left of Z values.

Forum statistics

Threads
1,224,586
Messages
6,179,716
Members
452,939
Latest member
WCrawford

We've detected that you are using an adblocker.

We have a great community of people providing Excel help here, but the hosting costs are enormous. You can help keep this site running by allowing ads on MrExcel.com.
Allow Ads at MrExcel

Which adblocker are you using?

Disable AdBlock

Follow these easy steps to disable AdBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the icon in the browser’s toolbar.
2)Click on the "Pause on this site" option.
Go back

Disable AdBlock Plus

Follow these easy steps to disable AdBlock Plus

1)Click on the icon in the browser’s toolbar.
2)Click on the toggle to disable it for "mrexcel.com".
Go back

Disable uBlock Origin

Follow these easy steps to disable uBlock Origin

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back

Disable uBlock

Follow these easy steps to disable uBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back
Back
Top