Почти RTFM ...
а точнее - Q195472 в мсдн

Что такое RTFM - это почти тоже самое, что и FOO :)
Если серьезно, то прежде чем задавать вопрос, желательно поискать в мсдн, а там ответ есть - под номером Q195472
Для выделения все строки в гриде я обычно использую событие грида RowColChange

Пусть есть грид с именем dtgMain, тогда примерно так:

Private Sub dtgMain_RowColChange(LastRow As Variant, ByVal LastCol As Integer)

On Error GoTo Err_Ch

Dim rstSel As New ADODB.Recordset

' Вот здесь как раз ответ на твой второй вопрос - получаем значение 0-го столбца выделенной строки, которое содержит код записи и присваиваем его переменной
If dtgMain.Columns(0) <> "" Then
intКод = CInt(dtgMain.Columns(0))
End If

' Клонируем наборчик :) Если его сделать видимым в пределах модуля, то и это не обязательно
Set rstSel = dtgMain.DataSource
rstSel.Find "Сотрудники.КодСотрудника = " & intКод & "", , , 1

' Добавляем метку, тем самым выделяя строку
dtgMain.SelBookmarks.Add rstSel.Bookmark

Exit Sub

Err_Ch:
Err.Clear
Resume Next
End Sub