StackOverflow2013

Note that there are some explanatory texts on larger screens.

plurals

PO
primarykey
Id
8704364
data
AcceptedAnswerId
0
AnswerCount
0
ClosedDate
CommentCount
0
CommunityOwnedDate
CreationDate
2012-01-02T19:03:54.287
FavoriteCount
0
LastActivityDate
2012-01-02T19:58:17.867
LastEditDate
2012-01-02T19:58:17.867
LastEditorUserId
973283
OwnerUserId
973283
ParentId
8703992
PostTypeId
2
Score
3
ViewCount
0
LastEditorDisplayName
text
Body
This is a slightly different approach to Chris's. I remove all the non-break spaces before searching for <code>space space</code>. Your problem is that your strings contain non-break spaces. Space is code 32. Non-break space is code 160. You cannot find <code>space space</code> because your strings do not contain <code>space space</code>. Try the following: <pre><code>Sub DeleteAfterDoubleSpace() Dim Pos As Integer Dim Rng As Range With Sheets("xxxxx") ' Replace any non-break spaces .Cells.Replace What:=Chr(160), Replacement:=" ", LookAt:=xlPart ' Find the first cell containing double space, if any Set Rng = .Cells.Find(" ", .Range("A1"), xlValues, xlPart, xlByRows, xlNext) Do While True If Rng Is Nothing Then ' All double spaces removed, exit. Exit Do End If Pos = InStr(Rng.Value, " ") ' Find position of double space within cell ' Extract first Pos-1 characters from cell and set cell to those characters. Rng.Value = Mid(Rng.Characters, 1, Pos - 1) Set Rng = .Cells.FindNext(Rng) ' Find the next double space Loop End With End Sub </code></pre> P.S. I discovered the non-break spaces by pasting your strings to cell A1 of a worksheet and calling the following routine so: <pre><code>Call DsplDiag(Range("A1") </code></pre> The output for the first string is: <pre><code> T h e A p p l e s a r e G r e e n T h e 54 68 65 20 41 70 70 6C 65 73 20 61 72 65 20 47 72 65 65 6E 20 A0 54 68 65 y a r e s u p p l i e d b y J o h n 79 20 61 72 65 20 73 75 70 70 6C 69 65 64 20 62 79 20 4A 6F 68 6E A0 </code></pre> Notice the two A0's after Green and at the end. A0 is hexadecimal for 160. <pre><code>Sub DsplDiag(DsplStg As String) ' Output the string DsplStg to the immediate window in both display and ' hexadecimal formats Dim CharChar As String Dim CharInt As Integer Dim CharStg As String Dim CharWidth As Integer Dim HexStg As String Dim Pos As Integer Dim Printable As Boolean CharStg = "" HexStg = "" For Pos = 1 To Len(DsplStg) CharChar = Mid(DsplStg, Pos, 1) CharInt = AscW(CharChar) Printable = True If CharInt > 255 Then CharWidth = 4 ' Assume Unicode character is Printable Else CharWidth = 2 If CharInt >= 32 And CharInt <> 127 Then Else Printable = False End If End If HexStg = HexStg & " " & Right(String(CharWidth, "0") & _ Hex(CharInt), CharWidth) If Printable Then CharStg = CharStg & Space(CharWidth) & CharChar Else CharStg = CharStg & Space(CharWidth + 1) End If If Pos Mod 25 = 0 Then Debug.Print CharStg Debug.Print HexStg Debug.Print CharStg = "" HexStg = "" End If Next Debug.Print CharStg Debug.Print HexStg End Sub </code></pre>
Tags
Title
singulars
PostAcceptedAnswerId
1. This table or related slice is empty.
PostParentId
1. POExcel delete everything after a double space
 singulars
 PostTypePostTypeId
 PTQuestion
PostTypePostTypeId
1. PTAnswer
UserLastEditorUserId
1. USTony Dallimore
UserOwnerUserId
1. USTony Dallimore
plurals
PostLinksPostIdRelatedPostId
1. This table or related slice is empty.
PostLinksRelatedPostIdPostId
1. This table or related slice is empty.
PostsAcceptedAnswerId
1. This table or related slice is empty.
PostsParentIdCreationDate
1. This table or related slice is empty.
VotesPostIdCreationDate
1. VO
 singulars
 PostPostId
 PO
 UserUserId
 This table or related slice is empty.
 VoteTypeVoteTypeId
 VTUpMod
2. VO
 singulars
 PostPostId
 PO
 UserUserId
 This table or related slice is empty.
 VoteTypeVoteTypeId
 VTUpMod
3. VO
 singulars
 PostPostId
 PO
 UserUserId
 This table or related slice is empty.
 VoteTypeVoteTypeId
 VTUpMod
CommentsPostId
1. This table or related slice is empty.

Querying!

Guidance

A row detail

Detail views are divided into sections. All the information in the data section comes from columns in the selected row. The other sections display data from other, related rows.

Related data can be related in a to-one or a to-many fashion. Captions of data related in a to-many fashion link to a list view showing a filtered view of the table.

Try moving around until you find a non-empty to-many entry and click on the label to get to one. You can move back to the root by clicking on the database name in the header.