[marcoszorrilla]

Activa la opción multiselect de la rejilla selecciona las filas que desees, manteniendo pulsada la tecla control mientras seleccionas con el ratón, y luego un código como este alojado en un botón puede servirte:

Código Delphi [-]
 begin
 table1.First;
   While not Table1.Eof do
   begin
     if Dbgrid1.SelectedRows.CurrentRowSelected = True then
     begin
     table2MiCampo.Value:=Value:=Table1Micampo.Value;
     {Igual con el resto de Campos}
     table1.Next;
     end;
   end;
 
 end;

Un Saludo.