2012-04-24 4 views
-2

이전 질문을 통해 철저한 검색을했는데 찾고있는 것을 찾을 수 없습니다.특정 셀을 새 통합 문서/시트에 복사

매일 인터넷에서 파일을 다운로드해야합니다.이 파일의 열은 항상 같지만 값 (제목 행을 제외한 모든 값)은 다릅니다. 나는주의를 기울일 필요가없는 많은 칼럼이있다.

Excel의 단추에 연결할 매크로를 만들 수 있습니다. 한 시트에서 특정 열을 가져와 새 빈 시트 나 통합 문서에 붙여 넣습니다.

검색 할 때 발견 한 대부분의 결과는 "무언가가있는 경우"또는 "언제 ..."등의 규칙이 포함 된 것으로 보입니다 - 필요하지 않습니다.

나는 C 열, C 열, AC 열, AG 열, AZ 열 등을 취하여 A, B, C, D 등의 다른 빈 시트에 붙여 넣으려고합니다.

+0

물론 우리는 당신이 우리에게 몇 가지 노력을 보여 주면 도움을 줄 수 있습니다 :) 매크로를 기록하는 방법을 알고 있습니까? –

+0

안녕하세요, 고마워요. 나는 VBA 코드가 어떻게 동작하는지 이해하고 고등학교 때 약간의 일을했다. 그러나 코딩 할 수있는 기술은 아직 할 수 없다 ... 아직. 매크로를 기록하는 방법을 알고, 처음에 변수를 정의하는 것을 알고 있습니다 (작성할 때). 코드를 찾으면 수정/변경하기 위해 편집 할 수도 있습니다. 내가 제공 할 수있는 것이 있다면/시도 /해라. 감사합니다. – nightrunner

+0

Siddharth가 말했듯이 레코드 버튼을 누르고 필요한 모든 열을 복사하여 붙여 넣은 다음 녹음 된 코드로 시작합니다. – adayzdone

답변

0

다행히도 코드를 작성하는 것은 매우 간단합니다. 그냥 버튼을 클릭 방법을 만든 다음 방법의 본문에 이런 식으로 뭔가를 넣어 :

Sheets("Sheet3").Select 
Columns("A:A").Select 
Selection.Copy 
Sheets("Sheet4").Select 
Range("A1").Select 
ActiveSheet.Paste 

당신이 좋은 UI를 만들 경우 각 열에 대한이의 고기를해야하지만거야 사용자는 코드로 모두 수행 할 수 있습니다.

+2

여러가지 이유가 있는데 한 줄로 이렇게하는 것이 훨씬 낫습니다 :'Sheets ("Sheet3"). Columns ("A : A") Copy Destination : = Sheets ("Sheet4"). Range ("A1")' –

+0

+1 @ Jean-FrançoisCorbett : 동의합니다. –

관련 문제