VBA Function - Multiplication

[NinaE_11]

Hello,
I've got a table of data I'm trying to work with and unsure how to set up a VBA Function to multiply Column E x Column F, and entering the product into Column G. I would like to copy that formula down to the entire list (using xlDown because there is a variable number of rows), and then sum the Column G in cell G11.

Column titles/headers are in row 9; data starts in row 13, with spaces in rows 10 and 12. I'd like to keep the empty rows, but unsure how to make a function operate with them?

Any help would be appreciated, Thank you!

 

[VBE313]

Please post some example data

 

[NinaE_11]

Ticker	Description	Quantity	End MV	% Wgt	Mkt Cap	Wtd Mkt
	Total		394,287,830.78
ABC	ABC Corp	33,125.00	9,608,900.00	2.44%	16,202
DEF	DEF Corp	11,240.00	3,264,995.20	0.83%	14,967
GHI	GHI Corp	21,714.00	5,754,427.14	1.46%	11,902
JKL	JKL Corp	38,183.00	10,506,434.28	2.66%	10,517
MNO	MNO Corp	139,776.00	11,317,662.72	2.87%	10,066
PQR	PQR Corp	54,389.00	10,086,983.94	2.56%	9,761
STU	STU Corp	41,500.00	5,782,195.00	1.47%	8,064
VWX	VWX Corp	28,607.00	4,317,082.37	1.09%	7,923
YZ	YZ Corp	53,940.00	7,184,808.00	1.82%	7,168

My Goal is to take % Wgt column x Mkt Cap Column and enter product into Wtd Mkt column; Summing the column in the second row from the top.

 

[jolivanes]

Sub Maybe()
Dim lr As Long
lr = Cells(Rows.Count, 5).End(xlUp).Row
    With Range("G13:G" & lr)
        .Formula = "=RC[-1] * RC[-2]"
        .Value = .Value
    End With
Range("G11").Value = Application.Sum(Range("G13:G" & lr))
End Sub

 

[NinaE_11]

Wonderful work, jolivanes! Worked perfectly, thank you so much!

 

[jolivanes]

Glad it worked for you and thanks for letting us know.