특졍열을 특정값으로 일괄변경하기

작성자

심슨바트심슨

작성일

2023-01-24 01:30

조회

엑셀버전 : M365

운영체제 : 윈도우10

질문 요약 : 엑셀 특정열을 특정값으로 일괄변경하기

안녕하세요, 혼자 이것저것 찾아보고했는데 잘 모르겠어서 문의드립니다.

작업 배경은 이렇습니다. 매일 변경된 DB를 다운로드하여 원하는 형태로 가공합니다. 단순 반복된 업무이다보니 자동화하고 싶습니다. 일일히 복사 붙여넣기는 번거로운데 VBA로 하는게 좋은지, 매크로로 하는게 좋은지도 판단이 서지 않아서요ㅜ

특정 열을 특정 값으로 모두 변경하기 (2가지 경우)
1. L열 값을 모두 “상세정보참조”로 변경
2. CE열은 H열 값으로 변경

상품 상세설명 (O열) 앞뒤에 특정 문장 추가하기
1. 안녕하세요, 반갑습니다 (앞 문장)
2. 당사 제품에 관심 가져주셔서 감사합니다. (끝 문장)

2번의 경우 CONCATENATE함수나 “&”를 이용해서 이어붙였습니다. O열 값 앞뒤로 붙는 값은 항상 동일합니다. 이렇게 매번 일정한 값을 붙여넣기하려니 무언가 더 좋은 방법이 있지 않을까해서 고견을 여쭙습니다.

공감

2명

심슨바트심슨

회원등급 : 2레벨

포인트 : 28 EP

총질문 : 1 개 (마감율 : 100%)

채택답변 : 0 개

게시글

특졍열을 특정값으로 일괄변경하기 (2)
2023.01.24
잘 부탁드립니다! (7)
2023.01.24

전체 2

원조백수 님 106

2023-01-24 09:47

채택된 답변
@심슨바트심슨 님 간단하게 작성한 매크로입니다.
```
Sub Modify1st()
    Dim iLastRow As Long, vData As Variant, i As Long
    
    ActiveSheet.AutoFilterMode = False
    iLastRow = Cells(Rows.Count, 1).End(xlUp).Row
    
    Range("L2:L" & iLastRow) = "상세정보참조"
    
    Range("CE2:CE" & iLastRow).FormulaLocal = "=H2"
    
    vData = Range("O1:O" & iLastRow).Value2
    For i = 2 To UBound(vData, 1)
        If Left(vData(i, 1), 13) <> "안녕하세요, 반갑습니다." Then
            vData(i, 1) = "안녕하세요, 반갑습니다." & vbNewLine & vData(i, 1) & vbNewLine & "당사 제품에 관심을 가져주셔서 감사합니다."
        End If
    Next i
    Range("O1:O" & iLastRow) = vData

    MsgBox "다운로드 한 자료를 정리했습니다."

End Sub
```
첨부파일 : excelUploadProductDefault.xlsm
- 심슨바트심슨 님 작성자
  
  2023-01-24 11:16
  
  @원조백수 님 우와 정말 너무 감사드립니다. 엑셀의 세상은 넓고 무궁무진한 가능성을 가지고 있는 것 같습니다. 매일 조금씩이라도 공부해야겠다 마음 먹는데 참 안되네요. 우문의 현답을 주셔서 감사드립니다. 새해 복 많이 받으세요! 보내주신 코드 하나씩 보면서 공부하겠습니다.

« 문제 해결 방법

급여명세서 출퇴근(근태관리) 관련 엑셀 함수 »

목록보기

전체 9,368

번호	카테고리	제목	작성자	작성일	추천	조회
알림		[🔥선착순 판매] 2023년 엑셀 공부, "8시간 로드맵"으로 마스터하세요! (11) 오빠두엑셀 \| 2023.01.25 \| 추천 6 \| 조회 3618	오빠두엑셀	2023.01.25	6	3618

공지사항	공지사항	⭐ [더 나은 커뮤니티 문화를 위한 Q&A 글 작성 규칙] ⭐ (123) 오빠두엑셀 \| 2021.10.28 \| 추천 160 \| 조회 9764	오빠두엑셀	2021.10.28	160	9764
48628	VBA	New VBA 재고 관리 중 Delete_invetory()에러 윤원섭 \| 11:15 \| 추천 0 \| 조회 18	윤원섭	11:15	-	18
48626	함수/공식	New 함수로 범위를 지정할때... (1) 캬쿠 \| 11:05 \| 추천 0 \| 조회 22	캬쿠	11:05	-	22
48624	구글시트	New 구글 스프레드시트 대시보드에서 입력한 기간에 맞는 데이터(열)만 나오게 하는 방법이 궁금합니다. 12호기기기 \| 11:00 \| 추천 0 \| 조회 15	12호기기기	11:00	-	15
48622	VBA	New VBA로 만든 함수중 String 변수의 data값이 너무커서 결과 값이 #VALUE! 나와요 (1) 짜이용 \| 10:55 \| 추천 0 \| 조회 12	짜이용	10:55	-	12
48618	함수/공식	New 표 안에 입력된 값의 xy방향 속성(표제목(?))이 순서대로 자동 출력되게 하고 싶습니다. (1) 오이군 \| 10:43 \| 추천 0 \| 조회 18	오이군	10:43	-	18
48615	함수/공식	New 행과 열이 포함된 특정 숫자의 개수 카운팅 방법 (휴무일 카운팅) (1) 이덕삼 \| 10:16 \| 추천 0 \| 조회 19	이덕삼	10:16	-	19
48613	함수/공식	New Ctrl+Shift+Enter를 입력했는데 행번호가 자동 증가하지 않습니다. (1) 한잔의커피 \| 10:05 \| 추천 0 \| 조회 23	한잔의커피	10:05	-	23
48611	함수/공식	New 현재 시간 이전에 들어온 품목 횟수 구하는 방법 (1) 츄리 \| 09:31 \| 추천 0 \| 조회 16	츄리	09:31	-	16
48605	기능/도구	New 블록 지정한 문자만 색깔 변경하는 방법 (2) 욕심없는성공v \| 08:39 \| 추천 0 \| 조회 27	욕심없는성공v	08:39	-	27
48604	VBA	New 엑셀 셀값 파일명 지정 실무자 \| 08:21 \| 추천 0 \| 조회 21	실무자	08:21	-	21
48603	함수/공식	New 하나의 셀에 있는 데이터를 모두 다른 셀로 나누고 싶어요 (2) 답변완료 바닐라사랑해 \| 07:52 \| 추천 0 \| 조회 28	바닐라사랑해	07:52	-	28
48597	함수/공식	New 오늘 날짜 보다 큰 날짜들 중에서 가장 오른쪽 끝에 기재되어 있는 날짜의 열번호를 찾는 수식을 만들었습니다만.. (5) 답변완료 말 \| 01:46 \| 추천 0 \| 조회 30	말	01:46	-	30
48595	대시보드	New 주차별 증감 분석 데이터 만들기 엑셀고수왕소취 \| 01:27 \| 추천 0 \| 조회 24	엑셀고수왕소취	01:27	-	24
48594	VBA	New 데이터 정렬 질문드립니다. (2) 답변완료 qzzzzzqq \| 00:31 \| 추천 0 \| 조회 25	qzzzzzqq	00:31	-	25
48586	VBA	New 특정 부분 가져오는법 songa \| 2023.01.31 \| 추천 0 \| 조회 35	songa	2023.01.31	-	35
48576	함수/공식	New 해당연도 설날, 추석 알려주기 (2) 엑셀초보랍니다 \| 2023.01.31 \| 추천 0 \| 조회 30	엑셀초보랍니다	2023.01.31	-	30
48573	함수/공식	New 누적, 주간별 불량율 구하기 / 전년 대비 불량율 차트 만들기 (1) 엑셀렙업용 \| 2023.01.31 \| 추천 0 \| 조회 31	엑셀렙업용	2023.01.31	-	31
48572	기능/도구	New 엑셀 파일을 sql로 변환하는 방법 궁금해요 (2) 단군 \| 2023.01.31 \| 추천 0 \| 조회 30	단군	2023.01.31	-	30
48567	함수/공식	New 조건부 서식 문의 (2) 최치곤 \| 2023.01.31 \| 추천 0 \| 조회 33	최치곤	2023.01.31	-	33
48563	함수/공식	New 다중조건 만족하는 값 가져오기.. 이거 아무리해도 안되네요.. ㅜㅜ (6) 답변완료 주니수합 \| 2023.01.31 \| 추천 0 \| 조회 44	주니수합	2023.01.31	-	44
48560	함수/공식	New 월별 이익계산하기 질문 드리빈다. (2) 에공 \| 2023.01.31 \| 추천 0 \| 조회 24	에공	2023.01.31	-	24
48559	VBA	New 인쇄폼관련 질문 드립니다. (2) 최승호 \| 2023.01.31 \| 추천 0 \| 조회 28	최승호	2023.01.31	-	28
48556	함수/공식	New 엑셀초보ㅜㅜ 등급표 작성관련 도움 부탁드립니다! (4) 엑셀초보등장 \| 2023.01.31 \| 추천 0 \| 조회 27	엑셀초보등장	2023.01.31	-	27
48552	VBA	New (심각)매크로 실행시 엑셀 응답없음 및 엑셀 속도 느림 (1) 답변완료 실무자 \| 2023.01.31 \| 추천 0 \| 조회 32	실무자	2023.01.31	-	32
48544	함수/공식	New 현재 시간에 가장 가까운 시간을 불러오는 방법이 있을까요? (2) 열심맨 \| 2023.01.31 \| 추천 0 \| 조회 44	열심맨	2023.01.31	-	44
48541	함수/공식	New IF AND 중첩 도움 부탁드립니다! (7) Nalae \| 2023.01.31 \| 추천 0 \| 조회 59	Nalae	2023.01.31	-	59
48540	VBA	New .xlsm에서 실행한 매크로 결과를 .xlsx로 저장할 때 오류 해결법 (2) 답변완료 나지 \| 2023.01.31 \| 추천 0 \| 조회 37	나지	2023.01.31	-	37
48538	함수/공식	New 엑셀 구글스프레드시트 질문 (5) 답변완료 Hwan \| 2023.01.31 \| 추천 0 \| 조회 49	Hwan	2023.01.31	-	49
48536	함수/공식	New 엑셀 데이터 채우기 (1) 쨈빛 \| 2023.01.31 \| 추천 0 \| 조회 33	쨈빛	2023.01.31	-	33
48529	함수/공식	New 수식이 나타내는 바가 동일한데 결과값이 달라지는 요상한 오류... (2) 말 \| 2023.01.31 \| 추천 0 \| 조회 46	말	2023.01.31	-	46