VBA to copy formulas from one tab and paste them into another based on cell value

[Excel_Novice_Needs_Help]

Hi,

I have a Database with a Buyer Tab, a Seller Tab, and a Companies Tab. All data is being entered via forms. My admin is going to enter the buyer/seller information first and then the company information. If the buyer or seller's address is the same as the company's address I want her to type in "same" and have a VBA copy the formulas from the formulas tab and paste them into the row and then recopy those cells and paste them as the values only. I also need it to only look for the word "same" in the bottom (or most recently added) row, so that it's not constantly replacing data throughout the entire sheet. Please let me know if this doesn't make sense, or if it's not possible.

Thank you!

Book1.xlsm
	A	B	C	D	E	F	G	H	I	J	K	L
1	COMPANIES
2	Date:	Company Name:	Abbreviation:	Company Address: (same or different?)	Company Address:	Company City	Company State	Company Zip Code	Company City & State	Full Address:	Owner Type: (Buyer or Seller)	Owner's First & Last Name:
3	10/18/2021	Example Co.	EXC	Different	123 Example Lane	Example	MD	32165	Example, MD	123 Example Lane, Example, MD 32165	Seller	Example Seller
4	10/19/2021	Example Inc.	EXI	Same	321 Example Ave	Example	MD	32165	Example, MD	321 Example Ave, Example, MD 32165	Buyer	Example Buyer
5	10/29/2021	Company Name TBD	TBD	Same	123 TBD Lane	TBD	TBD	74185	TBD, TBD	123 TBD Lane, TBD, TBD 74185	Seller	TBD Seller
6
Companies

Cell Formulas
Range	Formula
I3:I5	I3	=CONCAT($F3,", ",$G3)
J3:J5	J3	=CONCAT($E3,", ",$F3,", ",$G3," ",$H3)
L3:L5	L3	=IF($K3="seller",XLOOKUP($B3,Sellers!$G:$G,Sellers!C:C,"")&" "&XLOOKUP($B3,Sellers!$G:$G,Sellers!D:D,""),XLOOKUP($B3,Buyers!$F:$F,Buyers!C:C,"")&" "&XLOOKUP($B3,Buyers!$F:$F,Buyers!D:D,""))

Book1.xlsm
	A	B	C	D	E	F	G	H	I	J	K	L
1					0	0	0	0
Formulas

Cell Formulas
Range	Formula
E1	E1	=IF($K1="seller",XLOOKUP($B1,Sellers!$G:$G,Sellers!$J:$J,""),XLOOKUP($B1,Buyers!$F:$F,Buyers!$I:$I,""))
F1	F1	=IF($K1="seller",XLOOKUP($B1,Sellers!$G:$G,Sellers!$K:$K,""),XLOOKUP($B1,Buyers!$F:$F,Buyers!$J:$J,""))
G1	G1	=IF($K1="seller",XLOOKUP($B1,Sellers!$G:$G,Sellers!$L:$L,""),XLOOKUP($B1,Buyers!$F:$F,Buyers!$K:$K,""))
H1	H1	=IF($K1="seller",XLOOKUP($B1,Sellers!$G:$G,Sellers!$M:$M,""),XLOOKUP($B1,Buyers!$F:$F,Buyers!$L:$L,""))
L1	L1	=IF($K1="seller",XLOOKUP($B1,Sellers!$G:$G,Sellers!$C:$C,"")&" "&XLOOKUP($B1,Sellers!$G:$G,Sellers!$D:$D,""),XLOOKUP($B1,Buyers!$F:$F,Buyers!$C:$C,"")&" "&XLOOKUP($B1,Buyers!$F:$F,Buyers!$D:$D,""))

 

[Excel_Novice_Needs_Help]

I added the Buyers and Sellers Tabs incase they're helpful.

Book1.xlsm
	A	B	C	D	E	F	G	H	I	J	K	L	M	N	O	P
1	BUYERS
2	Date:	Status	Buyer's First Name:	Buyer's Last Name:	Buyer's Name:	Nick Name:	Buyer's Company Name:	Email adress:	Phone #:	Address:	Buyer's City:	Buyer's State:	Buyer's Zip Code:	Co-owner:	Secondary Email Address:	Secondary Phone #:
3	11/4/2021	Buyer	Potential	Lead	Potential Lead		Company Name TBD	Lead@email.com	(963) 852-7410	123 Lead Way	Lead	MD	36985	-	-	-
4	11/4/2021	Buyer	Example	Buyer	Example Buyer		Example Inc.	Buyer@email.com	(369) 852-0147	321 Example Ave	Example	MD	32165	-	-	-
Buyers

Cell Formulas
Range	Formula
E3:E4	E3	=CONCAT(C3," ",D3)

Book1.xlsm
	A	B	C	D	E	F	G	H	I	J	K	L	M	N
1	SELLERS
2	Entry Date:	Status:	Seller's First Name:	Seller's Last Name:	Seller's Name:	Nick Name:	Company Name:	Email adress:	Phone #:	Address:	City:	State:	Zip Code:	Referred by:
3	11/19/21	Active	Example	Seller	Example Seller		Example Co.	exampleco@email.com	(987) 654-3210	123 Example Lane	Example	MD	32165	N/A
4	11/19/21	Active	TBD	Seller	TBD Seller		Company Name TBD	Seller@TBD.com	(321) 654-9870	123 TBD Lane	TBD	TBD	74185	N/A
Sellers

Cell Formulas
Range	Formula
E3:E4	E3	=CONCAT($C3," ",$D3)

 

[Excel_Novice_Needs_Help]

No one has any ideas? I would really appreciate any help!