.
I have found an example of what I am wanting to do with the code below. However, I am trying to get my pull down to show a range of (F7 to I7) instead of the (F7 to F10). The data validation pull down shows the correct list but does not update automatically. Any help would be great!
Thanks alot
Please see the link below of where i found this information.
Automatically change validated entries when source of validation list changes
I have found an example of what I am wanting to do with the code below. However, I am trying to get my pull down to show a range of (F7 to I7) instead of the (F7 to F10). The data validation pull down shows the correct list but does not update automatically. Any help would be great!
Thanks alot
Please see the link below of where i found this information.
Automatically change validated entries when source of validation list changes
Code:
Private Sub Worksheet_Change(ByVal Target As Range)
Application.ScreenUpdating = False
Dim count_cells As Integer
Dim new_value As String
Dim old_value As String
For count_cells = 1 To Range("F6").CurrentRegion.Rows.Count - 1
If Intersect(Target, Range("F" & count_cells + 6)) Is Nothing Then
Else
Application.EnableEvents = False
new_value = Target.Value
Application.Undo
old_value = Target.Value
Target.Value = new_value
Range("B3:B6").Select
Selection.Replace What:=old_value, Replacement:=new_value, LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
ReplaceFormat:=False
Target.Select
End If
Next count_cells
Application.EnableEvents = True
Application.ScreenUpdating = True
End Sub