Download Data Collection Analysis and Management System

Range("Sheet1!C4").Value = UserForm2.TextBox3.Value‘control source for 3rd
Range("Sheet1!C5").Value = UserForm2.TextBox4.Value‘control source 44th point
UserForm2.TextBox25.Value = Range("Sheet1!D1").Value
UserForm2.TextBox26.Value = Range("Sheet1!E1").Value
Find_DataRheom’Look for matching measurements from selected result
MultiPage1.Value = 1 ‘activate the second page of the user form
GetTheResultsToPage2 ’Put to textboxes all the main information
GetTheMatchingReport ’Get the corres.g viscosities based on meas points given
End If
End Sub
Snippet 27. Command Button Get Data
Snippet 27 is the code for the command button named Get Data. Checking for the minimum
value of the measurement point is set to 5. If more than 5 then next snippets are used.
Figure 41. Viscosity, Shear Rate based on Meas. Points
Figure 41 shows the corresponding Shear Rate and Viscosity value of certain measuring
points given while Snippet 28 shows the code that takes the values into the form.
68