“VBA Baris pertama string” Kode Jawaban

VBA Baris pertama string

Dim s As String
s = "aaa" & vbCrLf & "bb bb bbb"
Debug.Print Split(s, Chr(10))(0)        ' aaa