Monthly Event Schedule (format like that)

Originally Posted by mikerickson

This line, in the middlish of the sub controls the delimiter between items of one event.

oneEventString = oneEventString & HeadersArray(i) & _
   CStr(Application.Intersect(.Cells,dataRange.Columns(columnsReturned(i))).Value) _
   & vbCr

and this line, near the start of the sub, controls the delimiter between different events.

Dim oneEventString As String, eventDelimiter As String: eventDelimiter = vbCr

If you are on a Windows machine, you might need to use vbLF or vbCrLf instead of vbCr.

Hi Mike,

Plz tell me what to do. I've replaced all vbCr by vbLF in the code of UDF, but it did not work. And then I replaced all vbCr by vbCrLf, but the nothing happened too. I am using Windows XP machine in my office and Windows Vista machine at home.

Awaiting your help soon.

Many thanks.