Need expert help—fast? Use the Help Bell for personalized assistance getting answers to your important questions.
Dim myString As String
myString = "I went to town\nFor shopping\nThis is one line"
Dim start As Integer
Dim firstLine As String
start = InStr(myString, "\n")
If (start > 0) Then
firstLine = Mid(myString, start + 1)
End If
Dim myString As String
myString = "I went to town\nFor shopping\nThis is one line"
Dim start As Integer
Dim firstLine As String
Dim myWord As String
myWord = "For"
start = InStr(myString, myWord)
If (start > 0) Then
firstLine = Mid(myString, start + 1)
End If
Are you are experiencing a similar issue? Get a personalized answer when you ask a related question.
Have a better answer? Share it in a comment.
Join the community of 500,000 technology professionals and ask your questions.