{"ygPerms":{"resourceCapabilityList":[{"resourceType":"GROUP","capabilities":[{"name":"UPDATE"},{"name":"READ"},{"name":"WELCOME_MSG"},{"name":"PENDING_COUNT"},{"name":"ACTIVITY_LOGS"}]},{"resourceType":"PHOTO","capabilities":[{"name":"READ"},{"name":"READ"},{"name":"UPLOAD"},{"name":"UPDATE"},{"name":"DELETE"},{"name":"COPY"},{"name":"MOVE"},{"name":"APPROVE"},{"name":"UPLOADTEMP"},{"name":"GROUPCOVER"}]},{"resourceType":"FILE","capabilities":[{"name":"READ"},{"name":"CREATE"},{"name":"UPDATE"},{"name":"DELETE"},{"name":"AUTO_SEND"}]},{"resourceType":"MEMBER","capabilities":[{"name":"READ"},{"name":"READ"},{"name":"EDIT_MODERATOR"},{"name":"DELETE"},{"name":"CREATE"},{"name":"UPDATE"},{"name":"BAN"}]},{"resourceType":"LINK","capabilities":[{"name":"READ"},{"name":"CREATE"},{"name":"UPDATE"},{"name":"DELETE"},{"name":"MOVE_LINK"}]},{"resourceType":"CALENDAR","capabilities":[{"name":"READ"}]},{"resourceType":"DATABASE","capabilities":[{"name":"READ_DATA"},{"name":"CREATE"},{"name":"READ"}]},{"resourceType":"POLL","capabilities":[{"name":"READ"},{"name":"VOTE"},{"name":"UPDATE"},{"name":"CREATE"},{"name":"DELETE"},{"name":"CLOSE"}]},{"resourceType":"MESSAGE","capabilities":[{"name":"CREATE"},{"name":"READ"},{"name":"DELETE"}]},{"resourceType":"PENDING_MESSAGE","capabilities":[{"name":"READ"},{"name":"UPDATE"},{"name":"DELETE"}]},{"resourceType":"ATTACHMENTS","capabilities":[{"name":"READ"},{"name":"DELETE"}]},{"resourceType":"PHOTOMATIC_ALBUMS","capabilities":[{"name":"READ"},{"name":"UPLOAD"}]},{"resourceType":"MEMBERSHIP_TYPE","capabilities":[{"name":"READ"},{"name":"CREATE"},{"name":"DELETE"},{"name":"UPDATE"}]},{"resourceType":"POST","capabilities":[{"name":"DELETE"},{"name":"UPDATE"},{"name":"CREATE"},{"name":"READ"}]},{"resourceType":"PIN","capabilities":[{"name":"DELETE"},{"name":"UPDATE"},{"name":"CREATE"},{"name":"READ"}]}],"modStatus":"MODERATOR","subStatus":"NORMAL","groupUrl":"groups.yahoo.com","intlCode":"us"},"comscore":"pageview_candidate","ygData":{"userId":231029722,"authorName":"Kerry Swatridge","from":"&quot;Kerry Swatridge&quot; &lt;kerry@swatridge.co.uk&gt;","profile":"kerry_swatridge","replyTo":"LIST","senderId":"e4j6AmL7WHNHLGyqFvJ6V9LVR-E3t33_VkKZ1uWjPRBcIRziynQ6yMSdh6q7XEB5D5wMh0MYBKq4MVTD0ylg0tszq5h1c1ia7J0S7hwhQok","spamInfo":{"isSpam":false,"reason":"0"},"subject":"RE: [OmT] word count on excel spreadsheet?","postDate":"1204118878","msgId":9756,"canDelete":true,"contentTrasformed":false,"systemMessage":false,"headers":{"inReplyToHeader":"PDQ3QzQ3QzQzLjQwODA5MDZAYmFsZHdpbmxpbmd1YXMuY29tPg=="},"prevInTopic":9755,"nextInTopic":9757,"prevInTime":9755,"nextInTime":9757,"topicId":9745,"numMessagesInTopic":13,"msgSnippet":"This won t be much help to Tony but I use an Excel macro I wrote, which counts words in a range of selected cells: Sub wordcount() Dim c As Range, wc As Long ","rawEmail":"Return-Path: &lt;kerry@swatridge.co.uk&gt;\r\nX-Sender: kerry@swatridge.co.uk\r\nX-Apparently-To: OmegaT@yahoogroups.com\r\nX-Received: (qmail 64345 invoked from network); 27 Feb 2008 13:29:02 -0000\r\nX-Received: from unknown (66.218.67.97)\n  by m45.grp.scd.yahoo.com with QMQP; 27 Feb 2008 13:29:02 -0000\r\nX-Received: from unknown (HELO mk-filter-2-a-4.mail.uk.tiscali.com) (212.74.100.53)\n  by mta18.grp.scd.yahoo.com with SMTP; 27 Feb 2008 13:29:00 -0000\r\nX-Trace: 677860459/mk-filter-2.mail.uk.tiscali.com/B2C/$THROTTLED-DYNAMIC/CUSTOMER-DYNAMIC-IP/88.110.186.17\r\nX-SBRS: None\r\nX-RemoteIP: 88.110.186.17\r\nX-IP-MAIL-FROM: kerry@swatridge.co.uk\r\nX-IP-BHB: Once\r\nX-IronPort-Anti-Spam-Filtered: true\r\nX-IronPort-Anti-Spam-Result: Ao8CAC/0xEdYbroR/2dsb2JhbACCbg\r\nX-Received: from 88-110-186-17.dynamic.dsl.as9105.com (HELO eMachines) ([88.110.186.17])\n  by smtp.tiscali.co.uk with ESMTP; 27 Feb 2008 13:28:56 +0000\r\nTo: &lt;OmegaT@yahoogroups.com&gt;\r\nDate: Wed, 27 Feb 2008 13:27:58 -0000\r\nMIME-Version: 1.0\r\nX-Mailer: Microsoft Office Outlook, Build 11.0.6353\r\nIn-Reply-To: &lt;47C47C43.4080906@baldwinlinguas.com&gt;\r\nThread-Index: Ach4uaMOZFgC9XMcS+eLM/5vu0KMeAAirbZg\r\nX-MimeOLE: Produced By Microsoft MimeOLE V6.00.2900.3198\r\nX-Originating-IP: 212.74.100.53\r\nFrom: &quot;Kerry Swatridge&quot; &lt;kerry@swatridge.co.uk&gt;\r\nSubject: RE: [OmT] word count on excel spreadsheet?\r\nX-Yahoo-Group-Post: member; u=231029722; y=GZq38KfDLZP51VKhc8eN3jwWqFRSltjtvQ8FB6kFyxg-KF3DB_UUyWtp\r\nX-Yahoo-Profile: kerry_swatridge\r\nContent-Type: text/plain; charset=US-ASCII\r\nContent-Transfer-Encoding: 7bit\r\n\r\nThis won&#39;t be much help to Tony but I use an Excel macro I wrote, which\ncounts words in a range of selected cells:\n\n \n\nSub wordcount()\n\nDim c As Range, wc As Long\n\nFor Each c In Selection\n\n    wc = wc + words(c.Value)\n\nNext c\n\nMsgBox &quot;The selection contains &quot; & wc & &quot; word&quot; & IIf(wc &lt;&gt; 1, &quot;s&quot;, &quot;&quot;) &\n&quot;.&quot;, vbOKOnly, &quot;Word Count&quot;\n\nEnd Sub\n\n \n\nFunction words(s As String) As Integer\n\nDim sp As Integer\n\ns = Application.Trim(s)\n\nIf s = &quot;&quot; Then\n\n    words = 0\n\nElse\n\n    sp = InStr(s, &quot; &quot;)\n\n    If sp = 0 Then\n\n        words = 1\n\n    Else\n\n        words = 1 + words(Mid(s, sp + 1))\n\n    End If\n\nEnd If\n\nEnd Function\n\n \n\nRegards\n\nKerry\n\n\n\n[Non-text portions of this message have been removed]\n\n\n"}}