Hi! I am trying to create a timesheet in Excel using Macros. I have dropdown boxes and based on the combinations selected, I want to force the user to input a number in the 7th columns or not allow the value. At this point, I have been able to figure out how to blacken the cell, but not completely disallow entry. More importantly, the only way I have found to replicated this over the next 100 rows is copy and paste the formula. There must be a way to rewrite the formula or use a loop to replicate the code. With the way I have it now, the tab key takes the user all over the spreadsheet. PLEASE HELP!!!!
Private Sub Worksheet_Change(ByVal Target As Range) If Range("D5").Value = "Claims" Then If Range("E5").Value = "Check DX; Email Questions; Enter, Check, Send claims; etc." Then Range("g5").Activate ActiveCell.Interior.ColorIndex = 0 Else If Not Range("E5").Value = "Check DX; Email Questions; Enter, Check, Send claims; etc." Then Range("g5").Select ActiveCell.Interior.ColorIndex = 1 Range("F5").Select End If End If Else If Range("D5").Value = "Admin" Then Range("g5").Select ActiveCell.Interior.ColorIndex = 1 Range("E5").Select End If End If
Bookmarks