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



? Environ("COMPUTERNAME")

? Environ("USERNAME")

? Environ("USERPROFILE")

? Environ("OS")

? Environ("windir")

? Environ("PROCESSOR_ARCHITECTURE")






'### 컴퓨터 환경 변수 읽어오기

Sub GETCOMPUTERINFO()

    Dim rTarget As Range: Set rTarget = Sheets.Add.Range("B5")

    Dim i As Integer

    For i = 1 To 100

        rTarget.Offset(i).Value2 = Environ(i)

        If Environ(i) = "" Then Exit For

    Next i

End Sub




ALLUSERSPROFILE               C:\ProgramData

CLASSPATH                     .;C:\Program Files\QuickTime\QTSystem\QTJava.zip

CommonProgramFiles            C:\Program Files\Common Files

COMPUTERNAME                  ADMINABYUL-PC

ComSpec                       C:\Windows\system32\cmd.exe

FP_NO_HOST_CHECK              NO

HOMEDRIVE                     C:

HOMEPATH                      \Users\adminABYUL

IFRSEditor                    C:\DART\Bin\IFRSEditor.exe

LOGONSERVER                   \\ADMINABYUL-PC

NUMBER_OF_PROCESSORS          8

OS                            Windows_NT

Path                          C:\Windows\system32;C:\Windows;

PATHEXT                       .COM;.EXE;.BAT;.CMD;.VBS;.VBE;.JS;.JSE;.WSF;.WSH;.MSC

PROCESSOR_ARCHITECTURE        x86

PROCESSOR_IDENTIFIER          x86 Family 6 Model 60 Stepping 3, GenuineIntel

PROCESSOR_LEVEL               6

PROCESSOR_REVISION            3c03

ProgramData                   C:\ProgramData

ProgramFiles                  C:\Program Files

PSModulePath                  C:\Windows\system32\WindowsPowerShell\v1.0\Modules\

PUBLIC                        C:\Users\Public

QTJAVA                        C:\Program Files\QuickTime\QTSystem\QTJava.zip

SESSIONNAME                   Console

SystemDrive                   C:

SystemRoot                    C:\Windows

TEMP                          C:\Users\ADMINK~1\AppData\Local\Temp

TMP                           C:\Users\ADMINK~1\AppData\Local\Temp

USERDOMAIN                    adminABYUL-PC

USERNAME                      adminABYUL

USERPROFILE                   C:\Users\adminABYUL

windir                        C:\Windows






문서 첨부 제한 : 0Byte/ 2.00MB
파일 제한 크기 : 2.00MB (허용 확장자 : *.*)
List of Articles
번호 제목 글쓴이 날짜 조회 수
공지 기타 엑셀 VBA 간단한 팁 모아놓기.. +_+ [레벨:30]아별 2007-01-24 25485
64 기타 오피스2010 64bit(64비트)를 위한 API Declare 방법 _ 윈도우 도움말 file [레벨:30]아별 2017-04-21 389
» 기타 [VBA] 컴퓨터 이름 알아내기 등 PC 환경 변수 읽오이기.. Environ [레벨:30]아별 2015-04-08 1311
62 기타 [VBA] 엑셀 파일을 PDF로 저장(EXPORT) 시키기 [1] [레벨:30]아별 2015-01-21 3385
61 기타 [펌] 추가 기능 개발시 리본메뉴에 넣을 MSO Image 쉽게 확인하기 imagefile [레벨:30]아별 2015-01-09 851
60 기타 엑셀 2013에서 웹 브라우저 컨트롤(ActiveX, web browser)을 시트에 삽입할 수 없는 문제.. imagefile [레벨:30]아별 2014-01-19 2016
59 기타 [ VBA Tip ] 엑셀 VBA로 사진(JPG)의 EXIF 정보(GPS 포함) 불러 들이기.. imagefile [6] [레벨:30]아별 2012-02-27 4874
58 기타 VBA로 인디언식 이름 만들어주는 사용자 정의 함수 만들기.. imagefile [1] [레벨:30]아별 2012-01-11 3056
57 기타 오피스2010 64bit(64비트)를 위한 API Declare 방법 file [2] [레벨:30]아별 2011-10-05 5467
56 기타 [펌] VBA 공부를 시작하시는분들에게 추천하는 강의자료 imagefile [4] [레벨:30]아별 2011-03-21 10915
55 기타 VBA _ 레지스트리 다루기 ( registry control ) imagefile [레벨:30]아별 2011-03-19 4873
54 기타 엑셀에서 소리 내기(재생) _ sound play file [1] [레벨:30]아별 2010-12-13 4561
53 기타 헷갈리기 쉬운 워크시트 함수와 VBA함수 비교표 imagefile [레벨:30]아별 2010-10-05 4335
52 기타 기본 제공 대화 상자 실행하면 초기 값 설정 imagefile [레벨:30]아별 2010-08-25 3745
51 기타 [펌] 엑셀 VBA 총정리 _ Excel 개체 모델 참조 등 image [2] [레벨:30]아별 2010-03-09 10686
50 기타 [링크] VBA로 파일을 다루는 방법에 대한 강좌들을 모아놓은 겁니다. [레벨:30]아별 2010-03-03 7190
49 현재 엑셀 파일의 색상표(Color Chart) 확인용 코드 [레벨:30]아별 2009-12-24 5254
48 [펌] Visual Basic (비쥬얼 베이직) 함수 정리 imagefile [레벨:30]아별 2009-11-27 15266
47 엑셀 사용자 정의 수식(UDF)에 도움말 넣는 방법. [레벨:30]아별 2009-11-11 3943
46 Excel에서 메뉴 및 메뉴 모음을 사용자 지정하는 방법 image [레벨:30]아별 2009-11-04 5148
45 기타 엑셀 기본 제공 대화 상자 인수 목록 file [레벨:30]아별 2009-11-04 5815