Manage projects of all sizes how you want. Great for personal to-do lists, project milestones, team priorities and launch plans.
- Combine task lists, docs, spreadsheets, and chat in one
- View and edit from mobile/offline
- Cut down on emails
Public Const STR_XML_START As String = "<glossentry>" Public Const STR_XML_END As String = "</glossentry>" Public Const STR_XML_TERM As String = "<glossterm>" Public Const STR_XML_TERM_END As String = "</glossterm>" Public Const STR_XML_DEF As String = "<glossdef>" Public Const STR_XML_DEF_END As String = "</glossdef>" Sub SortItOut() Dim p As Paragraph Dim str As String For Each p In ActiveDocument.Paragraphs str = Trim(p.Range.Text) If InStr(1, str, "¬", vbTextCompare) > 0 Then p.Range.Text = STR_XML_START & vbCrLf & _ STR_XML_TERM & str & STR_XML_TERM_END & STR_VBCRLF & _ STR_XML_END str = "" End If Next p End Sub
|Windows Script Host failed (Access is denied.) error||6||85|
|OneDrive for Office 365 Users||2||43|
|Visual Studio search word table and return Cell index||8||37|
|Outlook 2010 Archive||3||42|
Join the community of 500,000 technology professionals and ask your questions.
Connect with top rated Experts
12 Experts available now in Live!