Volume = iProperties.Volume Volume_cm = Round(Volume / 1000, 3) iProperties.Value("Custom", "Volume_cm") = Volume_cm