StackOverflow2013

Note that there are some explanatory texts on larger screens.

plurals

PO
primarykey
Id
12559140
data
AcceptedAnswerId
0
AnswerCount
0
ClosedDate
CommentCount
0
CommunityOwnedDate
CreationDate
2012-09-24T05:10:35.460
FavoriteCount
0
LastActivityDate
2012-09-26T03:43:04.623
LastEditDate
2012-09-26T03:43:04.623
LastEditorUserId
1596837
OwnerUserId
1596837
ParentId
12506248
PostTypeId
2
Score
1
ViewCount
0
LastEditorDisplayName
text
Body
As a good practise, please avoid using label at all cost! I am going to answer you just modifying your code, I guess you want to save the values of xx,yy,uu,vv,mm,nn the following code is how to avoid using label <pre><code>Dim found1 As Boolean Dim found2 As Boolean Dim found3 As Boolean found1 = False found2 = False found3 = False For i = 1 To 100 For j = 1 To 100 strTemp = Worksheets("APM Output").Cells(i, j).Value If InStr(strTemp, ">> State Scalars") <> 0 And Not found1 Then found1 = True xx = i yy = j End If If InStr(strTemp, ">> GPU LPML") <> 0 And Not found2 Then found2 = True uu = i vv = j End If If InStr(strTemp, ">> Limits and Equations") <> 0 And Not found3 Then found3 = True mm = i nn = j End If Next j Next i </code></pre> to make your function into a sub, simply do <pre><code>Sub my_search(ByRef rowNum As Long, ByRef colNum As Long, ByVal searchString As String, ByVal height As Long, ByVal width As Long, ByRef ws As Worksheet) Dim i As Long Dim j As Long Dim found As Boolean found = False Dim strTemp With ws For i = 1 To height For j = 1 To width strTemp = ws.Cells(i, j).Value If InStr(strTemp, searchString ) <> 0 And Not found1 Then found = True rowNum = i 'assigning rowNum colNum = j 'assigning colNum Exit For End If Next j If found Then Exit For End If Next i End With End Sub </code></pre> and call it 3 times, for example: <pre><code>my_search xx,yy,">>State Scalars", 100, 100, Worksheets("APM Output") </code></pre>
Tags
Title
singulars
PostAcceptedAnswerId
1. This table or related slice is empty.
PostParentId
1. POexcel macro: ByRef argument type mismatch
 singulars
 PostTypePostTypeId
 PTQuestion
PostTypePostTypeId
1. PTAnswer
UserLastEditorUserId
1. USLarry
UserOwnerUserId
1. USLarry
plurals
PostLinksPostIdRelatedPostId
1. This table or related slice is empty.
PostLinksRelatedPostIdPostId
1. This table or related slice is empty.
PostsAcceptedAnswerId
1. POexcel macro: ByRef argument type mismatch
 singulars
 PostTypePostTypeId
 PTQuestion
PostsParentIdCreationDate
1. This table or related slice is empty.
VotesPostIdCreationDate
1. VO
 singulars
 PostPostId
 PO
 UserUserId
 This table or related slice is empty.
 VoteTypeVoteTypeId
 VTAcceptedByOriginator
2. 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.