Pulling Data Into New Sheet Based Upon Cell Criteria

welshraz

New Member
Joined
Apr 29, 2016
Messages
42
Office Version
  1. 365
Platform
  1. Windows
Afternoon,

I have no idea if this is possible.....

I have a workbook with multiple sheets. Each sheet has the same columns etc., with information pertaining to different projects that are currently being worked. In column A there is a dropdown list where the user can select the current 'Status' of each aspect of the project. What I need is a macro or something that will pull some of the information from a row once the 'Status' (column A) is changed to Civils, and input it into the 'Evidence' sheet. This sheet will then have some data manually added to it based upon the data that is pulled through.

I did think about using the filter formula with some Vlookups, but this does not move the manually added data when additional rows are pulled through.

On the 'Evidence' tab, where the data will be pasted to, columns C - K and W - AA will need to be pulled from the other worksheets, and everything else will be manually input. Everything I have tried so far has either overwritten, not moved the manually added data, or doesn't work for multiple worksheets

Evidence Test.xlsm
ABCDEFGHIJKLMNORSTUVWXYZ
2StatusA55 ReferenceNotesContractorSub ContractorProjectClusterPIANOISiebel ReferenceNo. of Queries (times fed back to field)SPO/ NASOType of NAUG/OHPIA Team Member Handling NADate Submitted to ABSharePoint DateProject Team ConfirmationEastings/ NorthingsAddressTownPostcodeNumber of blockagesTraffic Management RequiredA55 Pass/Fail
3Civils1BarnstapleNF013PIANOI100001234567OR012-1234567891011SPO BlockageUG 07/02/20201
4Civils2BarnstapleNF013PIANOI100001234568OR012-1234567891015SPO BlockageUG20/11/20201
5Civils3Barnstaple PIANOI100001234569OR012-1234567891018SPO BlockageUG20/11/20201
6Civils4BarnstapleNF013PIANOI100001234567OR012-1234567891011SPO BlockageUG25/11/20201
7Civils5BarnstapleNF013PIANOI100001234568OR012-1234567891015SPO BlockageUG25/11/20201
8Field Fail6Devon PIANOI100001234569OR012-1234567891018 UG
9Field Fail7Devon PIANOI100001234567OR012-1234567891011 UG
10Civils8BarnstapleNF013PIANOI100001234568OR012-1234567891015SPOBlockageUG12/10/20201
11Field Fail9Devon PIANOI100001234569OR012-1234567891018 OH
12Civils10Bratton FlemingNF009PIANOI100001234567OR012-1234567891011 D/poleOH
13Civils11BarnstapleNF013PIANOI100001234568OR012-1234567891015 D/poleOH
14Tungsten12Bratton FlemingNF009PIANOI100001234569OR012-1234567891018NASOD/poleOH
15Tungsten13Fairy Cross, TorringtonNF018PIANOI100001234567OR012-1234567891011NASOD/poleOH18/02/2021 Pass
16Civils14Fairy Cross, TorringtonNF018PIANOI100001234568OR012-1234567891015NASOD/poleOH15/03/2021 Pass
17Civils15Fairy Cross, TorringtonNF018PIANOI100001234569OR012-1234567891018NASOD/poleOH15/03/2021 Pass
18Civils16Fairy Cross, TorringtonNF018PIANOI100001234567OR012-1234567891011NASOD/poleOH15/03/2021 Pass
19Civils17Fairy Cross, TorringtonNF018PIANOI100001234568OR012-1234567891015NASOD/poleOH15/03/2021 Pass
Devon
Cells with Conditional Formatting
CellConditionCell FormatStop If True
B:BCell ValueduplicatestextNO
A83,A86,A37,A8:A9,A11Expression=$A8="Field Fail"textNO
A83,A86,A37,A8:A9,A11Expression=$A8="Civils"textNO
B3:AX3,C80:S80,U80:AX80,C352:AX352,C351:G351,I351:AX351,C354:AX354,C353:S353,U353:AX353,B359:AX3353,C81:AX350,C356:AX358,C70:AX79,B7:B1432,C8:G69,B4:G7,H4:AX69Expression=$A3="Desk"textNO
B3:AX3,C80:S80,U80:AX80,C352:AX352,C351:G351,I351:AX351,C354:AX354,C353:S353,U353:AX353,B359:AX3353,C81:AX350,C356:AX358,C70:AX79,B7:B1432,C8:G69,B4:G7,H4:AX69Expression=$A3="Invalid"textNO
B3:AX3,C80:S80,U80:AX80,C352:AX352,C351:G351,I351:AX351,C354:AX354,C353:S353,U353:AX353,B359:AX3353,C81:AX350,C356:AX358,C70:AX79,B7:B1432,C8:G69,B4:G7,H4:AX69Expression=$A3="Desk Fail"textNO
B3:AX3,C80:S80,U80:AX80,C352:AX352,C351:G351,I351:AX351,C354:AX354,C353:S353,U353:AX353,B359:AX3353,C81:AX350,C356:AX358,C70:AX79,B7:B1432,C8:G69,B4:G7,H4:AX69Expression=$A3="Field Fail"textNO
B3:AX3,C80:S80,U80:AX80,C352:AX352,C351:G351,I351:AX351,C354:AX354,C353:S353,U353:AX353,B359:AX3353,C81:AX350,C356:AX358,C70:AX79,B7:B1432,C8:G69,B4:G7,H4:AX69Expression=$A3="Civils"textNO


Evidence Test.xlsm
ABCDEFGHIJKLMNOPQRTUVWXYZAAABACADAEAFAGAHAIAJAKALAMANAO
3SPO evidence StatusPIA OfficerA55 StatusA55 ReferenceProjectClusterContractorSub ContractorPIANOISiebel Case RefBlockage CostPIANOI Expiry DateNOI completeNOI Completed DateSPO evidence date requested by Project Team (historic column)SPO evidence date requestedSPO evidence date requestedSPO Evidence receivedHow many requests4 week deadline dateSPO Go Canvas/Unique Ref:Town/clusterLat: Long: or E: N:AddressTownPostcodeCivils Complete DatePredicted SPO Complete DateSPO Submitted to AB dateSPO - PreworkSPO - BlockageSPO - RepairSPO - ResinstatementSPO submitted to ORSPO submitted to OR - MMM-YYSPO Approved DateSPO Approved Date - MMM-YYSPO - Fail ReasonNWA Cancelled due to no SPO evidence/or no blockageNotes
4
5
6
7
8
9
10
11
12
13
14
15
16
17
Evidence
 

Excel Facts

Copy formula down without changing references
If you have =SUM(F2:F49) in F50; type Alt+' in F51 to copy =SUM(F2:F49) to F51, leaving the formula in edit mode. Change SUM to COUNT.
I have some doubts:
1. The source columns go in a different column in the destination. Then the macro should adjust them.
1629165342782.png


2. The number in column A55 Reference, is it a unique identifier, that is, the number 1, does it only exist on the "Devon" sheet or can it also exist on another sheet?

1629165443981.png


3. From the answer to question 2, a couple more questions depend. For example, what if on sheet "Devon" cell A3 changes from "Civils" to "Field Fail". You have to do something on the "Evidence" sheet. And if it returns to "Civils", is a new record created or an existing record must be searched to update data?

4. From columns W to AA it is difficult to identify which will be your destination column. There I ask for your help so that you indicate, for all the columns that you want to pass, which is the origin and which is its destination.

5. Do you want this to be automatic, when a cell changes to "Civils" or do you prefer to press a button and update all the sheets in the sheet "Evidence"?
6. Or explain what your idea of the process is.

I think we could start with that. ?
 
Upvote 0

Forum statistics

Threads
1,224,826
Messages
6,181,192
Members
453,021
Latest member
pingpong7117

We've detected that you are using an adblocker.

We have a great community of people providing Excel help here, but the hosting costs are enormous. You can help keep this site running by allowing ads on MrExcel.com.
Allow Ads at MrExcel

Which adblocker are you using?

Disable AdBlock

Follow these easy steps to disable AdBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the icon in the browser’s toolbar.
2)Click on the "Pause on this site" option.
Go back

Disable AdBlock Plus

Follow these easy steps to disable AdBlock Plus

1)Click on the icon in the browser’s toolbar.
2)Click on the toggle to disable it for "mrexcel.com".
Go back

Disable uBlock Origin

Follow these easy steps to disable uBlock Origin

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back

Disable uBlock

Follow these easy steps to disable uBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back
Back
Top