2016-09-19 3 views
2

하나의 통합 문서 '입력 워크 시트'에서 다른 통합 문서 '마스터 통합 문서'로 데이터를 이동하려고합니다. 두 시트가 같은 파일에 있고 가능한 경우 데이터를 전송하기 위해 두 파일을 동시에 열 필요가 없지만 마스터 통합 문서는 일단 데이터가 전송되면 자동 저장됩니다. 내가하려고하는 것을 더 쉽게 이해할 수 있도록 아래 파일의 이미지로 연결됩니다.입력 시트에서 마스터 시트로 정보 전송

입력 워크 시트의 데이터는 6 행 A-J 열에 있으며 각 사용자는 완료하라는 요청의 세부 사항을 입력합니다. 단추를 클릭하면 입력 워크 시트의 데이터가 마스터 통합 문서의 행 2 열 BK로 전송되어 새 작업을 입력하고 전송할 때마다 아래 행에 표시됩니다. 나중에 피벗 될 수 있습니다.

http://i.stack.imgur.com/b2cyI.jpg

- 입력 시트

http://i.stack.imgur.com/JZr0a.jpg - 마스터 시트

+0

아무 것도 시도하지 않았다면 코드를 게시하십시오. – gizlmo

답변

1
  1. 를 사용하여 매크로 here 마스터 시트의 마지막 행을 얻을 수 있습니다.
  2. 입력 시트의 값을 마스터 시트의 해당 셀에 씁니다.
  3. 그게 전부입니다. tbl_input.cells가 (3,5)

오고는 tbl_input의 행 변수를 있는지 확인

을 .value =

tbl_master.cells (1,3) : 이것은 당신이 셀을 참조하는 방법입니다 함수에서 마지막 행을 계산합니다. 시도 해봐!

편집

:

last_row_with_data(2,tbl_main) 
: 당신은 당신이 다음과 같이 호출 "tbl_main"시트의 열 B의 마지막 행을 찾으려면

Public Function last_row_with_data(ByVal lng_column_number As Long, shCurrent As Variant) As Long 

    last_row_with_data = shCurrent.Cells(Rows.Count, lng_column_number).End(xlUp).Row 

End Function 

: 이것은 내가 마지막 행에 사용하는 것입니다

편집 2 : 여기에서 시트의 이름을 변경하고 이름으로 참조하십시오. enter image description here

이 창을 표시하려면 왼쪽의 시트를 선택하고 F4 키를 누릅니다.

+0

감사합니다. 열 A에 숫자 1,2,3,4,5 등이 이미 채워져 있기 때문에 마지막 행을 찾으려면 매크로와 관련하여 특별한 작업을 수행해야합니까? 예를 들어 전송 된 데이터가 처음으로 이동해야하는 열은 b 열이어야합니다. 또한 (1, 3)은 셀 참조를 1 가로, 3 세로로 참조합니까? 죄송합니다. VBA는 매우 새로 배우지만 배우겠습니다! –

+0

안녕하세요 @GCob 작동해야하는 무언가로 편집했습니다. – Vityata

+0

고마워요 @ Vityata, 그냥 주위에 내 머리를하려고합니다. 내 마스터 파일은 groupmastertasklist이고 입력 파일은 grouptaskinputlist입니다. 입력 통합 문서의 어떤 셀을 마스터 통합 문서의 어떤 셀로 이동해야 하는지를 나타낼 때 매크로의 파일 위치를 어떻게 참조합니까? 지금까지 매크로를 찾는 제안 된 행을 넣었지만 다음 부분에 추가하는 방법을 모르겠습니다. 긴 공공 기능 last_row_with_data (긴로서 ByVal의의 lng_column_number 변형으로, shCurrent) last_row_with_data = shCurrent.Cells (Rows.Count, lng_column_number) .END (xlUp) 셀에만 최종 기능 –

관련 문제