Cells (r, 5) = cbAccess ' Insert ratings If obExcel1 Then Cells(r, 6) = “” If obExcel2 Then Cells(r, 6) = If obExcel3 Then Cells(r, 6) = If obExcel4 Then ...
確定! 回上一頁