Remember previous entries

[Krivo666]

I have this VB script:

Option Explicit

Private Sub Worksheet_Change(ByVal Target As Range)
Dim cell As Range

For Each cell In Target
If cell.Row = 5 Then
If [Counta(B5:E5,H5,I5,K5) = 7] Then
Application.EnableEvents = False
Rows(10).Insert xlShiftDown
Rows(5).Copy Range("A10")
Rows(5).SpecialCells(xlCellTypeConstants).ClearContents
Application.EnableEvents = True
End If
End If
Next cell

End Sub


what I need it to do is, remember previous entries, kind of auto-complete, so when I'm entering new selections, I don't have to type everything, just arrow down enter.

Hope I did explain it well

 

[Datsmart]

Take a look at using "Data Validation".

http://www.contextures.com/xlDataVal01.html
Link includes nice explaination of steps with sample dialog pictures, etc.
Also explains how to setup a Named Range to use for your data list.