엑셀자료 사용 안내 엑셀 매크로(VBA)를 이용하여 만든 간단한 프로그램과 엑셀 매크로(VBA)를 배울 수 있는 강좌가 있습니다.따라서, 대부분 프로그램을 이용하기 위해서는 엑셀 매크로 사용하기 설정을 하여야 합니다. (1.보안설정) 클릭 (2.개발도구설정) 클릭 3.매크로 차단 해제 방법

2022.5.28 새로운 버전으로 업그레이드 되었습니다.

 

따옴표없는복사(지천명영어)_02.xlsm (클릭 다운로드)

 

2022-05-28 16 45 37.png

(그림을 클릭하면 큰그림으로 자세히 볼 수 있습니다.)

 

사용법은 아주 간단합니다. "변경전문자" 행에 원하는 글자를 붙여넣고, 리본메뉴 지천명영어 - 서식포함복사를 누르면 끝입니다.

 

글꼴, 글꼴 크기, 밑줄, 글꼴 색상 등을 유지하면서, 따옴표를 없애 줍니다. 

 


아래는 업그레이드 이전 자료입니다.


 

엑셀에 있는 셀을 복사할 경우 따옴표(")가 생기는 경우가 많이 있습니다.

 

이 이유는 아마도 엑셀에서 숫자와 문자열 구분하기 위해서 따움표를 사용하는데, 문자열인 경우 따옴표를 붙여서 복사됩니다.

 

일반적인 경우에는 매크로로 클립보드에 문자를 넣고 클립보드에서 복사를 하면되지만, 단점이 있습니다.

엑셀에서 직접 복사를 하는 경우에는 엑셀에 있는 서식까지 복사가 되기 때문에, 글자색 등으로 그래로 복사해서 사용할 수 있지만, 클립보드에 넣게되면, 서식은 사용할 수 없습니다.

 

그래서, 엑셀을 자주 사용해서 데이터 작업과 블로그 포스팅을 할때 서식을 유지하면서, 복사를 하고 싶을 때, 사용하는 프로그램을 소개합니다.

 

이 프로그램 필요성은 다음과 같은 문장을 다량으로 복사할때 아주 유용합니다.

 

 

이미지 2.png

 

위와 같은 문장이 있다고 가정하면, 5번째 줄에 있는 캐리지 리턴(줄바꿈) 때문에 다음과 같은 따옴표가 생기게 됩니다.

 

1. 일반적인 복사 / 붙여넣기 실행한 경우 - 따옴표 발생, 서식 삭제됨(순수한 텍스트만 남음)


서로 어떻게 해서든 해명하고 싶다

공통된 수수께끼를 위해서 조금만

팔짱만 꼈을 뿐이야.

근데 어느 틈에 손을 잡으셨어요?

"루크, 너는 슈뢰더 박사님을 만나러 갔을 때 

부자연스럽다고는 생각지 못했어."

 

별로... 생각이 안 났는데요?

방에 들어간 슈뢰더 박사가

우리에게 했던 말 기억나니?


 

 

2. MS 워드에 붙여넣은 경우 - 따옴표는 없으나, 엑셀의 표 형태가 남아 있음

 

이미지 001.png

 

즉, 위와 같이 일반적인 복사/붙여넣기로 해결이 안되는 문제를 간단하게 해결하기 위해서 만들었습니다.

 

사용법은 아주 간단합니다.

 

글자복사 버튼을 누르면 끝. 원하는 곳에 마우스 우클릭 - 붙여넣기 하면 다음과 같이 따옴표도 없으면서, 엑셀 표도 없는 깔끔한 문장만 복사됩니다.

 

프로그램 사용 후 복사 붙여넣기 결과물

 


서로 어떻게 해서든 해명하고 싶다

공통된 수수께끼를 위해서 조금만

팔짱만 꼈을 뿐이야.

근데 어느 틈에 손을 잡으셨어요?

루크, 너는 슈뢰더 박사님을 만나러 갔을 때
부자연스럽다고는 생각지 못했어.

 

별로... 생각이 안 났는데요?

방에 들어간 슈뢰더 박사가

우리에게 했던 말 기억나니?


 

파일다운로드 : 따옴표없는복사(지천명영어)_01.xlsm

 

(파일명이 변경되면 작동하지 않습니다.)

 


 

소스파일 - 아주 간단하면서도 유용합니다.

 

 

 

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
Sub 글자만복사하기()
 
Dim i, j, MR As Integer
MR = Cells.Find("*", , , , xlByRows, xlPrevious).Row          '복사해야할 마지막 행번호 찾기
 
파일명체크          '파일명이 바뀌었는지 확인하기
 
    Dim wrdApp As Object
    Dim wrdDoc As Object
    Set wrdApp = CreateObject("Word.Application")
    Set wrdDoc = wrdApp.Documents.Add
    
    wrdApp.Visible = False
    Range(Cells(51), Cells(MR, 1)).Copy         '복사할 곳
 
    With wrdDoc.Content
        .PasteExcelTable FalseFalseFalse      '워드에 붙어넣고
        .Tables(1).Rows.ConvertToText             '표 없애기
    End With
    
    wrdApp.Selection.WholeStory
    wrdApp.Selection.Copy                         '워드에서 내용을 복사해서 클립보드에 넣기
    wrdDoc.Close False
    wrdApp.Quit                                   '워드 종료하기
    
If MR >= 5 Then CreateObject("WScript.shell").popup "복사완료" & vbNewLine & vbNewLine & "Ctrl + v로 붙여넣기 하세요"1"1초후에 이 메시지 없어져요"
 
End Sub
cs
사진 및 파일 첨부

여기에 파일을 끌어 놓거나 왼쪽의 버튼을 클릭하세요.

파일 용량 제한 : 0MB (허용 확장자 : *.*)

0개 첨부 됨 ( / )

  1. 엑셀 프로그램 요청하기(무료 또는 책 구입 후원)

    Date2021.06.07 By지천명영어 Views1131
    read more
  2. 엑셀 VBA로 PDF파일 페이지 나누기

    Date2022.12.13 By지천명영어 Views418
    Read More
  3. 이미지 속에 있는 표를 OCR로 인식 후, 테이블 데이터로 만들기

    Date2022.12.11 By지천명영어 Views1114
    Read More
  4. 엑셀 스크롤바 일치 시키기(UsedRange 에러)

    Date2022.11.24 By지천명영어 Views143
    Read More
  5. 엑셀 다운로드 후 매크로 차단(보안 위험 Microsoft는 이 파일의 출처를 신뢰할 수 없기 때문에 매크로 실행을 차단했습니다.

    Date2022.11.13 By지천명영어 Views5036
    Read More
  6. 엑셀 리본메뉴 imageMso (이미지 아이콘 검색)

    Date2022.08.25 By지천명영어 Views550
    Read More
  7. 수도쿠로 숫자와 친해지기(엑셀 매크로(VBA)로 스도쿠 프로그램 만들기(1/3)(2022.6.4 압데이트)

    Date2022.06.01 By지천명영어 Views986
    Read More
  8. 엑셀 공백 행. 열 전부 삭제 (엑셀에서 공란인 행과 열을 찾아서 한번에 삭제해 줍니다.)

    Date2022.05.27 By지천명영어 Views3697
    Read More
  9. 파파고와 구글번역을 한번에(지천명영어) 프로그램 사용법

    Date2022.05.24 By지천명영어 Views2093
    Read More
  10. 엑셀 표를 웹형식의 html 코드로 만들기(글꼴 설정, 셀병합 , 하이퍼링크 , 테두리 표시 등을 코드로 만들어 줍니다.)

    Date2022.05.23 By지천명영어 Views2804
    Read More
  11. 대법원 부동산 경매 물건 검색 크롤링(엑셀) - 타 프로그램 없이 직접 엑셀에서 경매 물건 검색

    Date2022.05.13 By지천명영어 Views2069
    Read More
  12. 엑셀로 PPT파일을 자동으로 만들기

    Date2022.04.18 By지천명영어 Views4190
    Read More
  13. 영어, 일본어 듣기 공부 용 mp3 파일 가사 만들기 - 일괄 만들기

    Date2022.04.10 By지천명영어 Views401
    Read More
  14. 일본어 한자 후리가나 자동입력 및 파파고 한글번역 그리고, 구글 영어번역까지 한번에

    Date2021.11.17 By지천명영어 Views1428
    Read More
  15. MS오피스 언어가 일본어로 나올 때 한국어로 바꾸기

    Date2021.10.31 By지천명영어 Views1510
    Read More
  16. PDF 영어문장 합치기(PDF 문서 영어 글자를 정상적인 영문으로 일괄 바꿔주기)

    Date2021.06.28 By지천명영어 Views986
    Read More
  17. 엑셀에 마이크로소프트(MS) 영어 음성합성시스템(TTS) 설치하기

    Date2021.06.13 By지천명영어 Views928
    Read More
  18. 따옴표 없이 엑셀 글자 복사하기

    Date2021.06.08 By지천명영어 Views5471
    Read More
  19. 구글 번역을 엑셀로, 텍스트 문장을 한꺼번에 구글 번역하기

    Date2021.06.07 By지천명영어 Views5147
    Read More
  20. 엑셀 비어있는 셀(공란인 행 또는 열) 한번에 삭제하기

    Date2021.06.05 By지천명영어 Views2277
    Read More
  21. 엑셀 책 쪽수 자동 계산하는 법

    Date2021.06.05 By지천명영어 Views438
    Read More
Board Pagination Prev 1 2 Next
/ 2

LOGIN

SEARCH

MENU NAVIGATION