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
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 |
