Originally Posted by
dteresinski
Ok what im trying to do is if I select Mexico on Sheet1 it should lock the Sheet2 Column B cells, unlock the Column C cells, and turn the color of the Text in Column B to white (to hide it but keep the value existing).
Now if I select Germany I want the opposite and to unlock Column B cells and lock Column C Cells and turn the text back to black for Column B.
why don't you hide the columns?
Case "MEXICO"
sheet2.Columns("B").Hidden = True
sheet2.Columns("C").Hidden = False
sheet2.Columns("D").ClearContents
Case "GERMANY"
sheet2.Columns("B").Hidden = False
sheet2.Columns("C").Hidden = True
For i = 2 to sheet2.Cells(Rows.Count,2).End(xlUp).Row
If Not sheet2.Cells(i,2) = "" Then
sheet2.Cells(i,4) = sheet2.Cells(i,2) * sheet2.cells(1,8)
End If
Next
Hope it helps
Bookmarks