컴퓨터 엑셀 워드 포토숍 구글어스 WINDOWS JAVASCRIPT JAVA C++

 
Previous Post 영어 반대말/비슷한말(동의어) 사전 사이트; English Thesaurus자바/Java] System.out.format() 줄바꿈, 운영체제(OS) 종류에 맞게;...자바,Java] 숫자 소수점에 줄맞추어 출력; 소수점 정렬; Number Justify자바/Java] 문자열을, 숫자(정수/실수)로 변환; String to Number (in...HTML-CSS] 메타 태그 종류; META TAG 목록Perl] 숫자 한글 발음으로 읽기, 한글 변환; Number To Korean; Spel...리눅스용 포토샵] 사진/그림 편집 프로그램; 김프(Gimp)펄/Perl 정규식] 문자열 추출; Regex String Extract Example엑셀] 헥사(16진수Hex)를 아스키(ASCII)문자로 변경; Excel Hex to AS...자바 Java] 배열을 문자열로 변환/합치기; Array to String

엑셀/Excel] VBA로, 아스키 문자표 만들기: ASCII Table

Sunday, October 29, 2006

엑셀 VBA 를 이용하여 아스키 코드표를 만드는 방법입니다. 그런데 아스키 코드에는 엑셀의 셀에 표현할 수 없는 제어 기호 등의 문자들이 많기 때문에, 실제 출력할 수 있는, 32~126번까지의 문자만 출력합니다. 원래 아스키 코드 (ASCII Code)는 0~255번까지 있습니다.


엑셀 아스키 코드표: Excel ASCII Table

엑셀로 만든 ASCII 문자표: 클릭하면 확대

괄호 속에 들어 있는 숫자는 16진수(Hex)입니다. 맨 좌측의 숫자는 10진수입니다.

32번 아스키 문자는 "공백 문자"입니다. 즉 스페이스 키의 아스키 코드입니다.


VBA: 아스키 코드표 출력 소스


Sub 아스키_표_만들기()
  Application.ScreenUpdating = False

  Dim I, R, C

  I = 32

  For C = 1 To 4
    For R = 1 To 30

      Cells(R, C).Value = Format(I, "000") & " (" & Hex(I) & ")" & " = " & Chr(I)
      Columns(C).ColumnWidth = 12 ' 셀의 너비 넓게

      I = I + 1
      If I > 126 Then Exit For

    Next R
  Next C

  Application.ScreenUpdating = True
End Sub



아스키 유니코드, 16진법 2진법 10진수 상호 변환기: ▶▶ 16진수 헥사, 2진수, 10진수, 8진법 변환 계산기; Hex Calc

0 Comments:

Post a Comment

<< Home RSS 2.0 feed

구글 Google 에서 제공하는 무료 블로그 서비스인 블로거 Blogger 의 인터넷 주소는 www.blogger.com 입니다. Blogger 에 블로그를 만들면, blogspot.com 이라는 주소에 블로그가 생성됩니다.
블로그를 직접 방문하지 않고도 최신 게시물을 구독하려면 RSS 2.0 feed 주소를 리더기에 등록하시면 됩니다.
Categories
Previous Posts
Monthly Archives
Top