I'm passing values from one Excel sheet to others, it turns out that the variable P666_2 has the value "xxx.xxxx" but when the value is passed to the other sheet the value is in the format "xxxxxxx,0000", can someone help me solve it this problem?
VBA Code:
Sheets("Calculation_Sheet").Visible = True
ActiveWorkbook.Sheets("calculation_sheet").Activate
Cells(18, 2).Value = A_90
Cells(26, 2).Value = A0
Cells(33, 2).Value = A90
oPL = Format(Cells(6, 9), "0.####")
o709 = Format(Cells(7, 9), "0.####")
o710 = Format(Cells(8, 9), "0.####")
o713 = Format(Cells(9, 9), "0.####")
P666_2 = Format(Cells(6, 10), "0.####")
P709_2 = Format(Cells(7, 10), "0.####")
P710_2 = Format(Cells(8, 10), "0.####")
P713_2 = Format(Cells(9, 10), "0.####")
out_666.Value = P666_2
out_709.Value = P709_2
out_710.Value = P710_2
out_713.Value = P713_2
out_Spread2.Value = Delta_A
Cells(6, 9).Value = P666_2
MsgBox "P666_2 =" & P666_2
MsgBox "Cells(6, 9) =" & Cells(6, 9).Value