VLOOKUP

잡동사니 2007/02/15 00:10
    Range("B20").Select
    ActiveCell.FormulaR1C1 = "=VLOOKUP(RC1,R9C1:R16C75,47,FALSE)"
    Selection.AutoFill Destination:=Range("B20:B27"), Type:=xlFillDefault
    Range("C20").Select
    ActiveCell.FormulaR1C1 = "=VLOOKUP(RC1,R9C1:R16C75,3,FALSE)"
    Selection.AutoFill Destination:=Range("C20:C27"), Type:=xlFillDefault

'잡동사니' 카테고리의 다른 글

미투데이, 플레이톡 개설  (0) 2007/03/15
브라우저별 속도 비교 차트  (5) 2007/03/07
VLOOKUP  (0) 2007/02/15
귀성 버스표(서울→부산) 무료로 드립니다.  (0) 2007/02/13
싸이월드2 베타 오픈  (2) 2007/01/31
신입사원 8계명  (2) 2007/01/29