vba sql左上绿标无法取值