StackOverflow2013

Note that there are some explanatory texts on larger screens.

plurals

POCopying and Pasting Row and Column Depending on cell value
primarykey
Id
20215006
data
AcceptedAnswerId
20215222
AnswerCount
1
ClosedDate
CommentCount
0
CommunityOwnedDate
CreationDate
2013-11-26T10:51:26.607
FavoriteCount
0
LastActivityDate
2013-11-26T16:15:29.577
LastEditDate
2013-11-26T13:08:33.747
LastEditorUserId
3035986
OwnerUserId
3035986
ParentId
0
PostTypeId
1
Score
1
ViewCount
2720
LastEditorDisplayName
text
Body
Hello i need some help with a abit of code, basically i have a workbook which has a lot of data for product Accessories listed in rows in the columns next to these there are the products with blank fields in all of the cells, basically the point of this is when the user types an "x" in any of these cells the table is able to be filtered. I have made a summary sheet where i want it to look at these specific columns for example columns E-N and if it contains an "x" it will copy the corresponding row which are A,B,C,D and paste it on this summary sheet one after another as well as copying the product from the row above all the x's e.g <pre><code>Column E has an x in E4,5,10,15,53 </code></pre> i want it to copy <pre><code>ABCD4 ABCD5 ABCD10 ABCD15 ABCD53 </code></pre> as well as the product name e.g "melons" which is located just above the first blank box of each column in this case lets say E4 is the first blank so E3 would be the product name. and paste it in a sheet called "Summary Sheet" one row after another. <h2>I know this is really confusing but i hope you can help :)</h2> code i have: I now have this code and im almost at where i want to be i need help on the line <pre><code> Range("A5").Select </code></pre> It gives me an error but unless i select this cell it pastes randomly on the sheet <pre><code> Private Sub CommandButton9_Click() Range("A7:D7").Select Range(Selection, Selection.End(xlDown)).Select ' Go to last line ' Add a filter behavior Selection.AutoFilter Field:=5, Criteria1:="<>" Range("A7:D7").Select Range(Selection, Selection.End(xlDown)).Select Selection.Copy ' Paste data where you want Sheets ("Summary Sheet") Range("A5").Select ActiveSheet.Paste End Sub </code></pre>
Tags
<excel><vba><copy><range><copy-paste>
Title
Copying and Pasting Row and Column Depending on cell value
singulars
PostAcceptedAnswerId
1. PO
 singulars
 PostTypePostTypeId
 PTAnswer
PostParentId
1. This table or related slice is empty.
PostTypePostTypeId
1. PTQuestion
UserLastEditorUserId
1. USNindi
UserOwnerUserId
1. USNindi
plurals
PostLinksPostIdRelatedPostId
1. PL
 singulars
 LinkTypeLinkTypeId
 LTLinked
PostLinksRelatedPostIdPostId
1. This table or related slice is empty.
PostsAcceptedAnswerId
1. This table or related slice is empty.
PostsParentIdCreationDate
1. PO
 singulars
 PostTypePostTypeId
 PTAnswer
VotesPostIdCreationDate
1. VO
 singulars
 PostPostId
 POCopying and Pasting Row and Column Depending on cell value
 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.