SQL4 = "SELECT lMeasuredVariableID FROM tblPidItem WHERE lID=" & _
  DataGrid1.SelBookmarks.Item(0)
'SQL5 = "SELECT dScaleMinimum, dScaleMaximum, lPricition FROM tblAnalogItem" & _
"WHERE lID=(" & SQL4 & ") ORDER BY lID"
SQL5 = "SELECT dScaleMinimum from tblAnalogItem WHERE lID=(" & SQL4 & ")ORDER" & _
"BY lID"
SQL6 = "SELECT dScaleMaximum from tblAnalogItem WHERE lID=(" & SQL4 & ")ORDER" & _
"BY lID"
SQL7 = "SELECT lPricition from tblAnalogItem WHERE lID=(" & SQL4 & ")ORDER BY" & _
"lID"