Kopieren Sie mehrere ausgewählte Zellen Daten in Excel und machen String und Show in Box?

Question

Ich mag das excell Blatt ausgewählten Zellendaten kopieren und will, dass sie in der Ausgabe Zusammenfassung Box anzuzeigen hier ich den Code versuche, die

Public Sub Conclusion() 
    Dim myVariable As String 
    myVariable = Selection.Value 
    OutputForm.SummaryBox = myVariable 
    OutputForm.Show 
End Sub 

jetzt nur Daten von bestimmten Zeile kopieren können Sie mir bitte mit dem Code helfen dass kopieren Sie die mehrere Zeilendaten ausgewählt und String machen und in meiner Zusammenfassung Box

Answer 1

Hier habe ich den Code getan sehe mich

Public Sub Conclusion() 

    Dim r As Range 
    For Each r In Selection.Rows 
     OutputForm.SummaryBox = OutputForm.SummaryBox & " " & Cells(r.Row, 4).Value 
    Next r 
    OutputForm.Show 

End Sub