CAD应用 Excel cad Range cell1 cell2 Interior Color returnObj TextColor i j Excel cad Range cell1 cell2 Interior Pattern xlSolid End If