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

엑셀에서 사용하는 언어 확인하기.

조회 수 11305 추천 수 0 2009.06.03 02:36:20
출처 : 도움말

언어확인..
Application.LanguageSettings.LanguageID(msoLanguageIDInstall)       '설치언어
Application.LanguageSettings.LanguageID(msoLanguageIDExeMode)       '실행언어
Application.LanguageSettings.LanguageID(msoLanguageIDUI)            '인터페이스언어
Application.LanguageSettings.LanguageID(msoLanguageIDHelp)          '도움말언어

아래글들에 대한 결론..
셀서식을 적용할때에는 아래와 같이 사용하자.
Selection.NumberFormat = "_-* #,##0_-;[RED]_-* - #,##0_-;_-* ""-""_-;_-@_-"

왜냐면..
한국어가 기본 편집 언어로 설정되어 있다면,
Selection.NumberFormatLocal 에서의 "[빨강]" 부분은 에러가 나지 않는다. 
(대신 [Red]라고 쓰면 에러난다. 편집언어가 한국어이고 속성이 Local이기 때문)

반대로 편집언어가 영어이면서 NumberFormatLocal 에 [빨강]이라고 쓰면 에러가 난다.
이럴때는 [Red]를 쓰거나, NumberFormat 속성을 사용한다. 물론 편집언어에 한국어가 추가돼 있어야한다.



'현 시스템에 설정된 편집 기본 언어가 한국이면 참(True)값을 리턴하는 함수.
 If Application.LanguageSettings.LanguagePreferredForEditing(msoLanguageIDKorean) Then …. 

참고..
    Selection.NumberFormat = "#,##0_ ;[빨강]-#,##0 "                '-----> NumberFormat 으로 [빨강]을 쓰면 에러난다.
    Selection.NumberFormat = "#,##0_ ;[Red]-#,##0 "                '-----> NumberFormat 으로 [Red]를 쓰면 오케이~
    Selection.NumberFormatLocal = "#,##0_ ;[빨강]-#,##0 "      '-----> NumberFormatLocal 로 [빨강]을 쓰면 오케이~
    Selection.NumberFormatLocal = "#,##0_ ;[Red]-#,##0 "      '-----> NumberFormatLocal 로 [Red]을 쓰면 에러




Excel_LanguageSetting.xls

 Option Explicit

' 한국어는 1042, 영어(미국)은 1033
Sub checkLngApplication()
    MsgBox "Install Language is " & Application.LanguageSettings.LanguageID(msoLanguageIDInstall) & Chr(10) & _
                "Execution Language is " & Application.LanguageSettings.LanguageID(msoLanguageIDExeMode) & Chr(10) & _
                "UI Language is " & Application.LanguageSettings.LanguageID(msoLanguageIDUI) & Chr(10) & _
                "Help Language is " & Application.LanguageSettings.LanguageID(msoLanguageIDHelp)
End Sub

'기본 편집 언어로 되어 있는 언어의 msgbox가 팝업된다.
Sub checkLngENG()
If Application.LanguageSettings.LanguagePreferredForEditing(msoLanguageIDEnglishUS) Then
    MsgBox "One of the preferred editing languages is US English."
End If
If Application.LanguageSettings.LanguagePreferredForEditing(msoLanguageIDKorean) Then
    MsgBox "One of the preferred editing languages is Korean."
End If
End Sub










댓글 '1'

profile

[레벨:30]아별

2015.04.23 18:45:47
*.132.210.135

참고로.. 국가 설정에 따라 언어를 추정해볼 수도 있겠다.

? application.International(xlcountrycode)

한국은 82

즉, 국가코드가 82면 한글로 표시하고 나머지는 영어로 표시하든가 하면 된다.


아래 코드는 날짜를 표시하는 순서인데.. 년-월-일, 월-일-년 등 설정을 확인할때 사용한다.

자동필터링 할때 날짜 데이터를 필터링할때 간혹 문제가 있었는데.. 아래 코드를 활용해서 해결해봐야겠다.

? application.International(xldateorder)


xlDateOrder Long 날짜 요소의 순서를 나타냅니다.
0 = 월-일-년
1 = 일-월-년
2 = 년-월-일 


application.International() 도움말 중 일부 발췌
인덱스 형식 의미 
xlCountryCode Long Microsoft Excel의 국가/지역 버전입니다. 
xlCountrySetting Long Windows 제어판의 현재 국가/지역 설정입니다. 


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