Posts by emadghazi

    try this code

    Code
    Dim strText() As String
    Dim i As Long
    
        strText = Split(TextBox1.Text, Chr(10))
        For i = 0 To UBound(strText)
            'Do something with strText(i)
            
        Next i