728x90
abc := x1.Sheets(1).UsedRange.Rows.Count
사용중인열 숫자를 abc 변수에저장
x2.Windows(1).ActiveSheet.Range("E1", "L"abc) := x1.Sheets(1).UsedRange.Offset(0).Value
사용중인 값전체를 해당영역에 저장.
x2.sheets(1).range("E:E") := x2.sheets(1).range("H:H").value
h열에서, e열로 값옴기기
x2.sheets(1).range("H:H").delete
h열 삭제
x2.sheets(1).range("H:H").clear
h열 데이터만 삭제
x2.Range("C:C").NumberFormat := "@"
셀서식을 텍스로변경
728x90
'잡동사니' 카테고리의 다른 글
법관련 사이트 (0) | 2016.04.29 |
---|---|
금융 참고 사이트 (0) | 2016.04.26 |
오토핫키 – 엑셀 조건부서식 (0) | 2016.04.23 |
추세채널지수, 커머더티 채널 인덱스, Commodity Channel Index, CCI (0) | 2016.04.14 |
오토핫키 – 마우스좌표 구하기 (1) | 2016.04.12 |
오토핫키 - 엑셀파일에서 특정텍스트 찾아서 배경색칠하기 (0) | 2016.04.10 |
오토핫키 - FormatConditions.Add type (0) | 2016.04.10 |
오토핫키 - 엑셀vba (0) | 2016.04.10 |