VBA to extract row data to sheet and update data set

justatroy

New Member
Joined
Oct 15, 2018
Messages
4
Hello All,

I created a Excel Workbook to enter and track quotes for something I am working on.. It works good to enter data, calculate additional charges ect and hold the quotes in a seperate sheet.

The sheet has a macro to copy from the input sheet to a sheet called database to hold all of the quote details, and another Macro to clear the values on the input sheet. I cant figure out how to pull the data back to the input sheet to update the record on the input sheet (search for a row on the database sheet and repopulate the input sheet and allow to update records)

Any suggestions on some VBA code or method to make this work for a novice

Sheet 1 = Input
Quote Tracker Ver2.xlsm
ABCDEFGHIJKLMN
1PROJECT INFORMATION
2
3
4Date7/19/2021
5Submitter NameLocation:
6Item #
7Item Name
8Item Description
9Customer Details
10
11Reference Number
12
13Component Type Tarif Rate (%)
14Drawing #Certification Charges ($)
15Packaging Charges ($)
16Supplier NameShipping Charge per ($ per lb/kg)
17Supplier LocationTooling Charge ($)
18
19
20
21
22
23PricingAdditional FeesAdditional Fees per UOM
24EUA Quantity (annual)Tarif Rate (%)0%Tarriff / Per UOM$0.0000
25Original Price (US$/unit)Certification Charges ($)$ -Cert Charge/ Per UOM$0.0000
26Unit of Measure (UOM)Packaging Charges ($)$ -Packaging Charge / Per UOM$0.0000
27Total w/out fees-Shipping Weight (lb/kg)Shipping Charges /Per UOM$0.0000
28Shipping Charge per ($ per lb/kg)$ -Tooling Charges / Per UOM$0.0000
29 Price With Fees (US$/unit)$0.000Tooling Charge ($)$ -Total Fees/ Per UOM$0.0000
30Order Total$ -Total Fees$0.00
31
32
33Quantity Break 1
34
35PricingAdditional FeesAdditional Fees per UOM
36Quantity 1Tarif Rate (%)0%Tarriff / Per UOM$0.0000
37Original Price (US$/unit)Certification Charges ($)$ -Cert Charge/ Per UOM$0.0000
38Unit of Measure (UOM)Packaging Charges ($)$ -Packaging Charge / Per UOM$0.0000
39Total w/out fees-Shipping Weight (lb/kg)Shipping Charges /Per UOM$0.0000
40Shipping Charge per ($ per lb/kg)$ -Tooling Charges / Per UOM$0.0000
41 Price With Fees (US$/unit)$0.000Tooling Charge ($)$ -Total Fees/ Per UOM$0.0000
42Order Total0Total Fees$0.00
43
44
45Quantity Break 2
46
47PricingAdditional FeesAdditional Fees per UOM
48Quantity 2Tarif Rate (%)0%Tarriff / Per UOM$0.0000
49Original Price (US$/unit)Certification Charges ($)$ -Cert Charge/ Per UOM$0.0000
50Unit of Measure (UOM)Packaging Charges ($)$ -Packaging Charge / Per UOM$0.0000
51Total w/out fees-Shipping Weight (lb/kg)Shipping Charges /Per UOM$0.0000
52Shipping Charge per ($ per lb/kg)$ -Tooling Charges / Per UOM$0.0000
53 Price With Fees (US$/unit)$0.000Tooling Charge ($)$ -Total Fees/ Per UOM$0.0000
54Order Total0Total Fees$0.00
55
56
57Quantity Break 3
58
59PricingAdditional FeesAdditional Fees per UOM
60Quantity 3Tarif Rate (%)0%Tarriff / Per UOM$0.0000
61Original Price (US$/unit)Certification Charges ($)$ -Cert Charge/ Per UOM$0.0000
62Unit of Measure (UOM)Packaging Charges ($)$ -Packaging Charge / Per UOM$0.0000
63Total w/out fees-Shipping Weight (lb/kg)Shipping Charges /Per UOM$0.0000
64Shipping Charge per ($ per lb/kg)$ -Tooling Charges / Per UOM$0.0000
65 Price With Fees (US$/unit)$0.000Tooling Charge ($)$ -Total Fees/ Per UOM$0.0000
66Order Total0Total Fees$0.00
67
68
69Quantity Break 4
70
71PricingAdditional FeesAdditional Fees per UOM
72Quantity 4Tarif Rate (%)0%Tarriff / Per UOM$0.0000
73Original Price (US$/unit)Certification Charges ($)$ -Cert Charge/ Per UOM$0.0000
74Unit of Measure (UOM)Packaging Charges ($)$ -Packaging Charge / Per UOM$0.0000
75Total w/out fees-Shipping Weight (lb/kg)Shipping Charges /Per UOM$0.0000
76Shipping Charge per ($ per lb/kg)$ -Tooling Charges / Per UOM$0.0000
77 Price With Fees (US$/unit)$0.000Tooling Charge ($)$ -Total Fees/ Per UOM$0.0000
78Order Total0Total Fees$0.00
79
80
81Quantity Break 5
82
83PricingAdditional FeesAdditional Fees per UOM
84Quantity 5Tarif Rate (%)0%Tarriff / Per UOM$0.0000
85Original Price (US$/unit)Certification Charges ($)$ -Cert Charge/ Per UOM$0.0000
86Unit of Measure (UOM)Packaging Charges ($)$ -Packaging Charge / Per UOM$0.0000
87Total w/out fees-Shipping Weight (lb/kg)Shipping Charges /Per UOM$0.0000
88Shipping Charge per ($ per lb/kg)$ -Tooling Charges / Per UOM$0.0000
89 Price With Fees (US$/unit)$0.000Tooling Charge ($)$ -Total Fees/ Per UOM$0.0000
90Order Total0Total Fees$0.00
91
92
93
94
Input
Cell Formulas
RangeFormula
C4C4=NOW()
I24,I84,I72,I60,I48,I36I24=$I$13
I25,I85,I73,I61,I49,I37I25=$I$14
I26,I86,I74,I62,I50,I38I26=$I$15
C27,C87,C75,C63,C51,C39C27=C25*C24
L24,L84,L72,L60,L48,L36L24=IFERROR((C27*I24)/C24,0)
L25,L85,L73,L61,L49,L37L25=IFERROR(I25/C24,0)
L26,L86,L74,L62,L50,L38L26=IFERROR(I26/C24,0)
L27,L87,L75,L63,L51,L39L27=IFERROR((I28*I27)/C24,0)
L28,L88,L76,L64,L52,L40L28=IFERROR(I29/C24,0)
L29,L89,L77,L65,L53,L41L29=SUM(L24:L28)
C29,C89,C77,C65,C53,C41C29=IFERROR(C25+L29,0)
C30,C90,C78,C66,C54,C42C30=C24*C29
I28,I88,I76,I64,I52,I40I28=$I$16
I29,I89,I77,I65,I53,I41I29=$I$17
I30,I90,I78,I66,I54,I42I30=(C27*I24)+(I27*I28)+I25+I26+I29



SHEET2 = Database
Quote Tracker Ver2.xlsm
ABCDEFGHIJKLMNOPQRSTUVWXYZAAABACADAEAFAGAHAIAJAKALAMANAOAPAQARASATAUAVAWAXAYAZBABBBCBDBEBFBGBHBIBJBKBLBMBNBOBPBQBRBSBTBUBVBWBXBYBZCACBCCCDCECFCGCHCICJCKCLCMCNCOCPCQCRCSCTCUCVCWCXCYCZDADBDCDDDEDFDGDHDIDJDKDLDMDNDODPDQDRDSDTDUDVDWDXDY
1DateSubmitter NameLocation:Item #Item NameItem DescriptionCustomer DetailsReference NumberComponent Type (Manndrel, Wire)Drawing #Supplier NameSupplier LocationEUA Quantity EUA Quantity Original Price (US$/unit)EUA Quantity Unit of Measure (UOM)EUA Quantity Total w/out feesEUA Quantity EUA Quantity EUA Quantity EUA Quantity EUA Quantity EUA Quantity EUA Quantity Total FeesEUA Quantity Tarriff / Per UOMEUA Quantity Cert Charge/ Per UOMEUA Quantity Packaging Charge / Per UOMEUA Quantity Shipping Charges /Per UOMEUA Quantity Tooling Charges / Per UOMEUA Quantity Price With Fees (US$/unit)EUA Quantity Order TotalEUA Quantity Total Fees/ Per UOMQuantity 1Quantity 1 Original Price (US$/unit)Quantity 1 Unit of Measure (UOM)Quantity 1 Total w/out feesQuantity 1 Quantity 1 Quantity 1 Quantity 1 Quantity 1 Quantity 1 Quantity 1 Total FeesQuantity 1 Tarriff / Per UOMQuantity 1 Cert Charge/ Per UOMQuantity 1 Packaging Charge / Per UOMQuantity 1 Shipping Charges /Per UOMQuantity 1 Tooling Charges / Per UOMQuantity 1 Total Fees/ Per UOMQuantity 1 Price With Fees (US$/unit)Quantity 1 Order TotalQuantity 2Quantity 2 Original Price (US$/unit)Quantity 2 Unit of Measure (UOM)Quantity 2 Total w/out feesQuantity 2 Quantity 2 Quantity 2 Quantity 2 Quantity 2 Quantity 2 Quantity 2 Total FeesQuantity 2 Tarriff / Per UOMQuantity 2 Cert Charge/ Per UOMQuantity 2 Packaging Charge / Per UOMQuantity 2 Shipping Charges /Per UOMQuantity 2 Tooling Charges / Per UOMQuantity 2 Total Fees/ Per UOMQuantity 2 Price With Fees (US$/unit)Quantity 2 Order TotalQuantity 3Quantity 3 Original Price (US$/unit)Quantity 3 Unit of Measure (UOM)Quantity 3 Total w/out feesQuantity 3 Quantity 3 Quantity 3 Quantity 3 Quantity 3 Quantity 3 Quantity 3 Total FeesQuantity 3 Tarriff / Per UOMQuantity 3 Cert Charge/ Per UOMQuantity 3 Packaging Charge / Per UOMQuantity 3 Shipping Charges /Per UOMQuantity 3 Tooling Charges / Per UOMQuantity 3 Total Fees/ Per UOMQuantity 3 Price With Fees (US$/unit)Quantity 3 Order TotalQuantity 4Quantity 4 Original Price (US$/unit)Quantity 4 Unit of Measure (UOM)Quantity 4 Total w/out feesQuantity 4 Quantity 4 Quantity 4 Quantity 4 Quantity 4 Quantity 4 Quantity 4 Total FeesQuantity 4 Tarriff / Per UOMQuantity 4 Cert Charge/ Per UOMQuantity 4 Packaging Charge / Per UOMQuantity 4 Shipping Charges /Per UOMQuantity 4 Tooling Charges / Per UOMQuantity 4 Total Fees/ Per UOMQuantity 4 Price With Fees (US$/unit)Quantity 4 Order TotalQuantity 5Quantity 5 Original Price (US$/unit)Quantity 5 Unit of Measure (UOM)Quantity 5 Total w/out feesQuantity 5 Quantity 5 Quantity 5 Quantity 5 Quantity 5 Quantity 5 Quantity 5 Total FeesQuantity 5 Tarriff / Per UOMQuantity 5 Cert Charge/ Per UOMQuantity 5 Packaging Charge / Per UOMQuantity 5 Shipping Charges /Per UOMQuantity 5 Tooling Charges / Per UOMQuantity 5 Total Fees/ Per UOMQuantity 5 Price With Fees (US$/unit)Quantity 5 Order Total
2
319-Jul-21MarkCTTest-12345Plastic Widgettest items #2Test COXYZ1234-1 RG2345-1 RG2345-1Amce Co. #2NVNV$500,000$0ea$100,000$009-Apr-001002.50$ 350.00$ -$ -$ 0.00$0.00$0.00$0.00$0.20######500001ea######$0.00$0.00######203$0.00######$0.00$0.00$0.000.0010$0.00$1.25############$1.00ea######$0.00$0.00######$40.00$2.500200$0.00$0.00$0.00$0.00$0.0001############$0.75ea#####00######$60.00$2.50$0.00#####00$0.00$0.00$0.00$0.00$0.752E+05######$0.55ea######$0.00$0.0010080$2.50$0.00######$0.00$0.003E-040$0.00$0.00$0.55############0.09ea######$0.00$0.00############2.50######$0.00$0.00$0.00$0.0000$0.09######
419-Jul-21FredMN12345-1Widget - Test 1Test Item#1Company ZXYX2468-1 XY123-1 Rev 2 XY123-1 Rev 2Acme CoCACA$100,000$1ea$100,000$01009-Apr-00201100$ 25,320.00$ 0.25$ 0.00$ 0.00$0.00$0.00$0.25$1.25######250005ea######$0.25############41############$1.25$0.00$0.002E-040$1.26$6.26############$4.00######$0.25############$6.00$1.0010050,306$1.00$0.00$0.00$0.00$0.001.015############$3.75ea#####0.25100######$8.00$1.00###########0.940$0.00$0.00$0.00$0.94$4.693E+0580,000$2.00ea######$0.25######10012$1.00############$0.50$0.000.0010$0.00$0.50$2.50############1.5ea######$0.25############$16.001100######$0.38$0.00$0.00$0.000.0010$1.88######
Database



Please Help

Troy
 

Excel Facts

Workdays for a market open Mon, Wed, Friday?
Yes! Use "0101011" for the weekend argument in NETWORKDAYS.INTL or WORKDAY.INTL. The 7 digits start on Monday. 1 means it is a weekend.

Forum statistics

Threads
1,223,888
Messages
6,175,217
Members
452,619
Latest member
Shiv1198

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