How to automatically transfer data from one cell in one worksheet to another cell in another worksheet in the same workbook

Insert below code into data source sheet (Sheet2 on your screenshot) module:

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
' When selection on the worksheet is changed we check
' that only one cell is selected (not multicell range)
' and this cell is in column 1 (column A)
If Target.Column = 1 And Target.Cells.Count = 1 Then
    ' If one cell in column A selected, we copy the value 
    ' from a cell right to selected (row is the same, column is greater by 1)
    ' to the left-up cell of solid destination range on the destination sheet
    Sheets("Sheet1").Range("B2").Value = Target.Offset(0, 1).Value
    ' and the same for a cell where row is the same and column is greater by 2
    Sheets("Sheet1").Range("E6").Value = Target.Offset(0, 2).Value
End If
End Sub