Work Cell by Cell

Question

Hello everybody,
Can someone please explain to me how to enable the 'Work Cell by Cell' option in the Responses tab. A little explanation, I have an additional column in my responses tab that I am using to record when a record has been processed. To do this, I would like to use the =TODAY() built in function but whenever I attempt to use this it replace all column values with the current date. Is there a way to make a function specific to the current row as if you were entering any other kind of data.
Thanks in advance!
Sandy

Answer 1

Replace
Dim dr As DataRow = tbl.NewRow()
by
Dim dr As DataRow = dt.NewRow()
Armin
Thanx Armin Zingler....It did the Job.. But how do i link with AutoCompleteSource.
Private Sub DataGrid_EditingControlShowing(ByVal sender As Object, ByVal e As System.Windows.Forms.DataGridViewEditingControlShowingEventArgs) Handles DataGridView1.EditingControlShowing
Dim ItemCode As TextBox = TryCast(e.Control, TextBox)
If ItemCode IsNot Nothing Then
If DataGridView1.CurrentCell.ColumnIndex = 1 AndAlso TypeOf e.Control Is TextBox Then
Dim path = "c:\indudhar.txt"
dt = Text_To_DataTable(path, "\n", True)
With DirectCast(e.Control, TextBox)
.AutoCompleteCustomSource.Clear()
.AutoCompleteMode = AutoCompleteMode.SuggestAppend
.AutoCompleteSource = dt
End With
Else
ItemCode.AutoCompleteMode = AutoCompleteMode.None
End If
End If
End Sub
Private Function Text_To_DataTable(ByVal path As String, ByVal delimitter As Char, ByVal header As Boolean) As DataTable
Dim source As String = String.Empty
Dim tbl As New DataTable("mytable")
tbl.Columns.Add("col1", GetType(String))
If IO.File.Exists(path) Then
source = IO.File.ReadAllText(path)
Else
Throw New IO.FileNotFoundException("Could not find the file at " & path, path)
End If
Dim rows() As String = source.Split({Environment.NewLine}, StringSplitOptions.None)
For Each item In rows
Dim dr As DataRow = dt.NewRow()
dr(0) = item.ToString()
dt.Rows.Add(dr)
Next
Return dt
End Function
Tried this but I am getting an Error .
.AutoCompleteSource = dt Here is the Error
Error    2    Value of type 'System.Data.DataTable' cannot be converted to 'System.Windows.Forms.AutoCompleteSource'.