vba 가 실행된는 엑셀A에서 엑셀B에 값을 기록할 수 있나요? 거꾸로 읽어오는 것은 되는데...
안녕하세요
엑셀 웹크롤링 - 네이버 부동산 에 관련된 2시간1분 강의를 듣고, 연습하여, 연휴에 KB시세 가져오는 vba를 만들어 보았읍니다.
덕분에~~ 덕분에~~ 잘 작동합니다.
한가지 애로사항이
제가 외부에서 태블릿을 쓰기때문에 엑셀마크로가 작동하지 않읍니다.
그래서, 작업은 엑셀vba를 이용하고, 결과물은 xlsx 에 넣어서 사용합니다.
왠지 다른 엑셀에서 값을 불러오고 쓰는것을 VBA로 직접 할 수 있으면 좋겠다라는 생각이 들었고,...
다른 엑셀에서 불러오는 것은 구글링을 통하여 아래처럼 하였는데... 다른 액샐로 값을 쓰는 것은 잘 안되는군요
되는 방법좀 알려주세요
엘셀vba로 다른 엑셀에서 값을 불러운 구문:
불러오는값 = ReadValue(ThisWorkbook.Path, "KB시계열 v5.0.xlsx", "아파트시세", Cells(109, 41).Address)
Function ReadValue(Path, File, sht, Rng) As Variant
Dim msg As String
Dim strTemp As String
If Trim(Right(Path, 1)) <> "\" Then Path = Path & "\"
'데이터가 있는 원본 파일이 없으면 에러를 표시 매크로를 종료.
If Dir(Path & File) = "" Then
ReadValue = "해당 파일이 없습니다"
Exit Function
End If
msg = "'" & Path & "[" & File & "]" & sht & "'!" & Range(Rng).Range("a1").Address(, , xlR1C1)
ReadValue = ExecuteExcel4Macro(msg)
End Function
번호 | 카테고리 | 제목 | 작성자 | 작성일 | 추천 | 조회 |
2133 | VBA |
New 시트 다른 엑셀파일로 시트복사
![]() |
![]() |
14:19 | 0 | 9 |
2132 | 함수/공식 |
New 0을 제외하고 값 비교하기
(1)
![]() |
![]() |
14:12 | 0 | 17 |
2131 | VBA |
New 데이터베이스 변경시 시트 실시간 새로고침
![]() |
![]() |
13:38 | 0 | 8 |
2130 | VBA |
New TextJoin 대체 함수 VBA 작성법좀 도와주세요.
(2)
답변완료
![]() |
![]() |
13:37 | 0 | 14 |
2129 | 피벗테이블 |
New (스핀단추 연동) 피벗 테이블 자동 업데이트 문의
![]() ![]() |
![]() |
12:39 | 0 | 16 |
2128 | VBA |
New 셀선택 프로시저인데 뭐가 잘못된거죠???
![]() |
![]() |
09:16 | 0 | 12 |
2127 | 기능/도구 |
New 엑셀 하이퍼링크 보안 제거 방법
![]() ![]() |
![]() |
2021.01.21 | 0 | 32 |
2126 | 함수/공식 |
New 일자 및 총매출액 변동시 타sheet에 일자, 총매출액 자동추가되는 방법
![]() ![]() |
![]() |
2021.01.21 | 0 | 26 |
2125 | VBA |
New 셀선택영역 vba 질문입니다.
(5)
답변완료
![]() |
![]() |
2021.01.21 | 0 | 30 |
2124 | 차트/그래프 |
New 상위10위 제품 그래프, 한눈에 깔끔하게 만드는 방법
![]() ![]() |
![]() |
2021.01.21 | 0 | 30 |
2123 | 함수/공식 |
New 엑셀 함수 관련 질문드립니다.(vlookup 내림차순 ?, 중복된 값 하나만 나타내기 ?)
(1)
![]() |
![]() |
2021.01.21 | 0 | 37 |
2122 | 함수/공식 |
New 고유번호 할당
(1)
답변완료
![]() |
![]() |
2021.01.21 | 1 | 38 |
2121 | VBA |
New GetStockNo 함수의 다중적용이 가능한가요..?
(4)
![]() |
![]() |
2021.01.21 | 0 | 27 |
2120 | VBA |
New 매크로가 어떻게 될까요
![]() ![]() |
![]() |
2021.01.21 | 0 | 36 |
2119 | VBA |
New 단추나 하이퍼링크 눌러서 , 윈도우 프로그램 실행시키게 하는 방법 있나요?
(3)
![]() |
![]() |
2021.01.21 | 0 | 24 |
2118 | 함수/공식 |
New 월별 지출 현황 자동 입력
![]() ![]() |
![]() |
2021.01.21 | 0 | 40 |
2117 | 함수/공식 |
New 여러조건을 만족하는 인원 수 구하는 방법
![]() ![]() |
![]() |
2021.01.21 | 0 | 41 |
2116 | 함수/공식 |
New 금일 검침 전 검침 계산방법
![]() ![]() |
![]() |
2021.01.21 | 0 | 37 |
2115 | VBA |
New [코드관련질문] 01강. 엑셀 매크로 자동화를 위한 필수 모듈! - 파일선택창 모듈 만들기
(1)
![]() |
![]() |
2021.01.21 | 0 | 35 |
2114 | 함수/공식 |
New 엑셀 시트간 연동 질문입니다 2번째.. ㅠㅠ
![]() ![]() |
![]() |
2021.01.20 | 1 | 36 |
2113 | 함수/공식 |
New 일치하는 값 제외 나머지 전체 합계 함수 관련, 응용 함수 사용 방법
![]() ![]() |
![]() |
2021.01.20 | 0 | 33 |
2112 | 피벗테이블 |
New 피벗테이블 차트 삽입 시 동적 범위 설정 관련 문의
(4)
답변완료
![]() |
![]() |
2021.01.20 | 0 | 42 |
2111 | 함수/공식 |
New 질문이 있습니다(기초함수)
(2)
![]() |
![]() |
2021.01.20 | 0 | 30 |
2110 | VBA |
New 엑셀 VBA 를 이용한 웹크롤링 방법
![]() |
![]() |
2021.01.20 | 0 | 42 |
2109 | 함수/공식 |
New GetStockNo을 추가기능에 적용 시켰음에도 #value! 만 뜹니다.
(1)
![]() |
![]() |
2021.01.20 | 0 | 23 |
2108 | 함수/공식 |
New 특정 형식의 자료만 자동 추출하는 함수 구성방법
(3)
![]() |
![]() |
2021.01.20 | 3 | 48 |
2107 | 함수/공식 |
New 일자별 매출합계 변동시 일별매출합계표에 일자별 합계 자동추가 방법
(2)
![]() |
![]() |
2021.01.20 | 0 | 33 |
2106 | VBA |
New VBA 속도 향상시 도형 새로고침 안되는 문제
(2)
![]() |
![]() |
2021.01.20 | 0 | 26 |
2105 | VBA |
New 시트 합치기
(2)
답변완료
![]() |
![]() |
2021.01.20 | 0 | 23 |
2104 | 문서서식 |
New 조건부서식 텍스트처리
(2)
![]() |
![]() |
2021.01.20 | 0 | 36 |
안녕하세요.
닫혀져 있는 엑셀 파일에서 값을 읽어오는건 VBA로 가능하지만, 닫혀져 있는 엑셀 파일에 값을 입력하는 것은 불가능 한 것으로 알고 있습니다.
따라서, 해당 경로의 파일을 실행하신 뒤, 값을 입력하는 방식으로 명령문을 작성해주셔야 합니다.
관련된 내용은 아래 파일 합치기 VBA 강의를 참고하면 많은 도움이 되실겁니다.
엑셀 VBA 파일 합치기 프로그램 만들기 :: 오빠두 퀵 VBA 4강
제시해드린 답변이 도움이 되셨길 바랍니다. 감사합니다.
감사합니다. 믿고 보는 오빠두.