1. 아별툴
  2. 아별툴 패밀리
  3. 엑셀 질문하기
  4. 엑셀 강좌
  5. 엑셀 팁
  6. 엑셀 자료실
  7. 엑셀 연구과제
  8. 엑셀 북마크
  9. 관련 프로그램 소개

바로 옆셀의 메모값 가져 오기

조회 수 5467 추천 수 0 2008.10.20 13:39:12

옆 셀의 메모 값을 갖고 오는 vba를 간단히 만들어봤다.

메모에 줄 바꿈이 있을 경우, 제거하고 갖고 왔다.

참고하시길..

 '바로 옆 셀의 메모 값을 갖고 오는 Macro
Sub edit_GetMemo()

On Error GoTo ERROR

  Dim memoString As String

    memoString = ActiveCell.Offset(0, -1).Range("A1").Comment.Text
    'Carriage return과 Line Feed를 제거해준다.
    memoString = Replace(memoString, vbCrLf, "")
    'Line Feed를 제거해준다.
    memoString = Replace(memoString, vbLf, "")

    ActiveCell.FormulaR1C1 = memoString
   
    ActiveCell.Offset(1, 0).Range("A1").Select

If False Then
ERROR:
        ActiveCell.Offset(1, 0).Range("A1").Select
End If

End Sub







댓글 '1'

[레벨:0]aaaaaafffff

2013.01.25 13:24:41
*.44.25.93

메모값 불려오기를 했는데요 처음에는 값이 그냥 불려오는데요 다음에 메모를 변경하면 메모값이 변하지 않고 그대로 있습니다.

셀를 더블클릭하여 변경하는 방법말고 자동으로 변하는 법이 없을 까요.???  한두개는 그렇게 변경하면 되지만 여러게 일때...좀..곤란한거 같습니다.

문의 부탁드립니다.

 

문서 첨부 제한 : 0Byte/ 2.00MB
파일 제한 크기 : 2.00MB (허용 확장자 : *.*)
List of Articles
번호 제목 글쓴이 날짜 조회 수
공지 기타 엑셀 VBA 간단한 팁 모아놓기.. +_+ [레벨:30]아별 2007-01-24 33819
44 기타 엑셀 기본 제공 대화 상자 인수 목록 file [레벨:30]아별 2009-11-04 7989
43 엑셀2007에서 셀의 색상을 RGB로 뽑아내기 file [레벨:30]아별 2009-10-06 10197
42 [VBA팁] 화일이 존재하는지 확인하기 [레벨:30]아별 2009-07-31 8005
41 엑셀에서 사용하는 언어 확인하기. file [1] [레벨:30]아별 2009-06-03 13776
40 메시지 박스 대용으로 Shape 사용하기 file [레벨:30]아별 2009-05-07 16045
39 유저폼 크기 조절 가능하게 만들기 file [레벨:30]아별 2009-05-07 5791
38 스스로 사라지는 메시지 박스 file [1] [레벨:30]아별 2009-05-07 5575
37 마우스 좌표를 반환 받기 file [레벨:30]아별 2009-05-07 5800
36 [펌] Excel Macro(VBA) 입문자를 위한 소개자료 image [레벨:30]아별 2008-12-19 6634
35 기타 [Excel VBA] 피벗테이블(PivotTable)을 VBA로 컨트롤해보자.. [레벨:30]아별 2008-12-19 12076
34 [펌] 엑셀로 최대 공약수 구하기 [2] [레벨:30]아별 2008-12-18 5270
» 바로 옆셀의 메모값 가져 오기 [1] [레벨:30]아별 2008-10-20 5467
32 [엑셀VBA] ERROR CODE file [레벨:30]아별 2008-08-28 7350
31 [엑셀VBA] 자동필터를 매크로로 구현하기 [레벨:30]아별 2008-08-28 11224
30 [VBA] 전역변수 설정하기. Public 문, Private 문 imagefile [레벨:30]아별 2008-07-01 14019
29 [엑셀VBA] 네이버 지식인 답변 _ 엑셀 쿼리를 이용해서 펀드 기준가 데이터를 읽어오기. file [레벨:30]아별 2008-04-30 9120
28 엑셀 추가 기능 만들기 [레벨:30]a☆ 2006-01-19 7307
27 메모 입력할때 사용자 이름 제거하고 입력하기.. [레벨:30]a☆ 2006-01-19 5392
26 시트에서 콤보박스 활용하기 file [레벨:30]a☆ 2005-11-12 16708