다시 질문드립니다. VBA 원하는 문자 값 찾자 열 라인에 자동 저장에 문의...

[엑셀왕초보]

어제 질문을 잘못한거같습니다...

어제 질문 함수는 그날자로 그날자 정보을 읽어오는 함수 내용같습니다...

지기님 질문을 잘못해는데도 저가 질문의도을 아시고는 대단하십니다...

근데 그걸 분석해 따로 여기에 덧붙여 사용할 수 가 없습니다 ㅠㅠ

지금 새벽인데요 함수 하나하나 인터넷에서 찾지며 분석중입니다 ㅠㅠ

암튼 진짜 고맙습니다...

For Each p In 일일표
                If k = p.Value Then
                    Cells(r, c).Offset(0, 1) = SunToLun(Year(k), Month(k), Day(k))
                    Cells(r, c).Offset(0, 4) = p.Offset(0, 2).Value
                    Cells(r, c).Offset(1, 0) = p.Offset(0, 3).Value
                    Cells(r, c).Offset(2, 0) = p.Offset(0, 4).Value
                    Cells(r, c).Offset(3, 0) = p.Offset(0, 5).Value
                    Cells(r, c).Offset(4, 0) = p.Offset(0, 6).Value
                    If p.Offset(0, 2).Value <> Empty Then
                        Cells(r, c).Font.Color = RGB(255, 0, 0)
                    End If
                    Exit For

[윤슬]

안녕하세요? [엑셀왕초보]님...

간략한 예제와 함께 질문을 주셨으면 더 고맙겠습니다.
이곳엔 제가 코딩과 파일을 올릴 수가 없어서 아래 게시물에 답변을 달아 두었습니다.
http://cafe.daum.net/funnyexcel/K4Nh/1180

그럼 잘 해결되시길... ^^*

[엑셀왕초보]

감사합니다...
혹시여
p.Offset(0, 3).Value = Cells(r, c).Offset(1, 0)
...
p.Offset(0, 55).Value = Cells(r, c).Offset(1, 0)
이렇게 작성있는걸 이름정의해 다운메뉴로 쓸 방법은 없는건가요?
걍 엑셀 함수면 하게는데 VBA에서는 어떻게해야할찌 감도 없습니다...
행은 다른쪽에서 찾자 지정됩니다... d1:m1해서 순차적으로 내려가는게 아녀서요 ㅠㅠ

[윤슬]

이미 말씀드렸지만 간략한 예제와 함께 여쭤보시는게 좋습니다.
글로 질문을 하면 잘못 이해할 소지가 너무나도 많아서 말입니다.
(물론 원하는 결과의 원칙도 기재해야겠죠...)
그럼...!