Нужно иметь возможность дважды щелкнуть ячейки на листе 1, чтобы создать список на листе 2

Question

Так что я хотел бы иметь возможность дважды щелкнуть по ячейкам на листе 1, чтобы создать список сортов на листе 2.

Проблема с кодом, который у меня сейчас есть, заключается в том, что он просто заменяет контент в одной ячейке на sheet2, вместо того, чтобы видеть, что у него уже есть контент, а затем передает контент в следующую ячейку под ним.

Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
If Not Intersect(Target, Range("E:P")) Is Nothing Then
    If Target.Cells.Count = 1 then
        Cancel = True
        Sheets("Sheet1").Range("S13") = Target.Value
    End If
    End If
    End Sub

Так, например, мне нужно иметь возможность дважды щелкнуть по листу E12, он заполняет содержимое листа S13 на листе 2. Затем я дважды щелкаю E15 на sheet1, и он видит, что у S13 на sheet2 уже есть содержимое, поэтому он заполняет S14 на sheet2 своим содержанием.