1. FAQ
  2. 엑셀(Excel)
  3. AfterEffects
  4. Premiere
  5. Photoshop
  6. ETC

이 게시판은 아별닷컴 회원만 질문을 올릴 수 있습니다. 회원에게 주어지는 특권인셈이지요. 회원이 아닌 분들은 열람만 가능합니다.

한셀에 값

엑셀일반 조회 수 1749 추천 수 0 2012.06.13 12:22:54

A1 셀에 제가 입력하는 값의 x8을 하고싶은데 가능할까요?

 

예를 들어

 

A1셀에 3을 입력하면 자동을 3x8이 되어서 24로 입력이 되게 할 수 있을까요?


댓글 '9'

profile

[레벨:30]아별

2012.06.13 16:48:50
*.104.126.21

3으로 입력하면 24가 되도록하고 싶으시다고요?

왜 옆 셀에 수식을 사용해서 A1*8이라는 식으로 사용하지 않을까요?

 

2가지 해결 방법이 생각납니다.

 

1. 자동 고침을 사용하는 경우..

    - 조건 : 8배로 변환되어야하는 숫자가 한정적일데.. 1부터 15까지라던가할 경우..

    - 방법 : 엑셀 옵션 > 언어 교정 > 자동 고침 옵션에 3과 24를 등록.. 나머지 숫자들도 등록..

    - 단점 : 전체 셀에 모두 적용됨. 3만 따로 입력하기 힘듬.. 항상 24로 바뀌니까..

    ==> 좀 구리네요.. 이 방법... 결국 VBA를 사용할 수 밖에.. ㅠㅠ

 

2. VBA를 사용하는 경우..

    Worksheet_Change 이벤트를 사용하는 것인데요..

    값을 8배로 증가시킬때마다 Worksheet_Change가 새로 발생해서 중복 계산되지 않게 하는게 귀찮네요..ㅋ

    첨부파일을 참고하세요.. ^^

    A열에 숫자를 입력할때만 8배로 증가시키도록 해놨습니다.

    다운받기 : abyul.com_20120613_worksheetChangeEvent-2.xlsm

   

Option Explicit

Dim strAddress As String
Dim dlbInput As Double

Private Sub Worksheet_Change(ByVal Target As Range)
    If Target.Column = 1 Then
        If Target.Address = strAddress Then
            If TypeName(Target.Value) = "Double" Then
                If Target.Value <> dlbInput * 8 Then
                    dlbInput = Target.Value
                    Target.Value = Target.Value * 8
                End If
            End If
        Else
            If TypeName(Target.Value) = "Double" Then
                strAddress = Target.Address
                dlbInput = Target.Value
                Target.Value = Target.Value * 8
            End If
        End If
    End If
End Sub

 

 

첨부

[레벨:5]눈물바다

2012.06.14 23:48:03
*.77.33.15

A행만 되어있는데요

 

다른행으로 변경이나 다른행 추가할려면 어떻게 해야대나요?

profile

[레벨:30]아별

2012.06.15 09:37:47
*.104.126.21

음.. 너무 답만 알려드리것 같아 마음이 좀 그러네요..

 

아래 코드가 A열만 기능하도록하는 코드입니다.

If Target.Column = 1 Then

B열에서 작동하게 하려면, If Target.Column = 2 Then
C열과 F열에서 작동하게 하려면, If Target.Column = 3 or Target.Column = 6 Then
F열 왼쪽열 전부 작동할거면, If Target.Column <= 6 Then

 

위와 같은 패턴으로 수정해서 사용하시면 됩니다.

[레벨:5]눈물바다

2012.06.17 19:59:05
*.77.33.15

다른파일에서 하는데 왜 저는 안되죠?'''

VBA 모듈에서 붙여넣기 하고 창 닫고 하면 되는거 아닌가요?``

 

그리고 다른행 변경이나 추가할때 아별님께서 올려주신 파일에서 수정하면 안되는데

제가 멀 잘못한거지.``

profile

[레벨:30]아별

2012.06.18 13:10:27
*.104.126.21

눈물바다님.. 안녕하세요? ^^

 

이 경우처럼 엑셀에서 발생하는 이벤트를 핸들링하는 코드의 경우..
모듈에서는 작동을 하지 않습니다.
워크시트에 해당 코드를 넣어주어야합니다.

 

일반 모듈이 아닌 클래스모듈에서는 이벤트를 핸들링해줄 수 있지만..
현 시점에서는 너무 어려운 내용이므로 패스입니다.

 

도움이 되셨기를.. ^^

 

abyul.com_0000490-1.jpg

첨부

[레벨:5]눈물바다

2012.06.18 13:54:46
*.94.41.89

헐...되네욤.ㅋㅋ

항상 도움 주셔서 감사합니다.ㅋㄷㅋㄷ

다음에 소주라도 한잔?ㅋㅋ

profile

[레벨:30]아별

2012.06.19 11:50:29
*.104.126.21

7월 13일에 아별닷컴 정모어떠세요?
사상 최초로 아별닷컴 회원 정모!! ㅎㅎ

장소는 강남역이 무난할 것 같네요..


눈물바다님 시간 되시면.. 13일로 확정해서 공지 한번 올리겠습니다. ㅋㅋ

회원님들 호응이 없으면 둘이서 한잔 하는거고..
호응이 있으면 여러명이서 한잔 하는 거죠.. ㅎㅎ

댓글 부탁드려요~~ ^^

[레벨:5]눈물바다

2012.06.19 13:10:36
*.94.41.89

괜찮은데요?ㅋ

메이폴

2013.07.09 15:34:46
*.167.147.109

엑셀에서 셀한곳에서 계속 숫자를 더해나가는 방법이 있나요?

예를들어 A1 셀에 숫자가 계속 더해지는 방법입니다

문서 첨부 제한 : 0Byte/ 2.00MB
파일 제한 크기 : 2.00MB (허용 확장자 : *.*)
List of Articles
번호 제목 글쓴이 날짜 조회 수
공지 공지 [공지] 아별닷컴의 엑셀 질문방 폐쇄합니다. 카페 질문방 이용하세요.. imagefile [레벨:30]아별 2015-04-23 11098
440 엑셀일반 엑셀 시트 캡쳐시 스크롤바 _ 엑셀 화면 캡쳐 또는 이미지로 저장하기 [2] [레벨:2]시나브로 2012-06-19 4804
439 엑셀일반 엑셀 시트에 바탕그림넣기 [5] [레벨:2]시나브로 2012-06-19 4811
438 엑셀일반 셀 병합 [4] [레벨:5]눈물바다 2012-06-18 1150
437 엑셀일반 엑셀파일 비밀번호 단체 설정 가능한가요? [22] [레벨:4]쟈니 2012-06-18 8582
436 엑셀일반 필터링된 값에 붙여넣기를 할 경우... imagefile [4] [레벨:6]파이스 2012-06-14 5984
435 엑셀수식 3차 방정식 풀기. [1] [레벨:3]rynoel 2012-06-13 5060
» 엑셀일반 한셀에 값 [9] [레벨:5]눈물바다 2012-06-13 1749
433 엑셀일반 원하는 열만 추출할수 없나요?? imagefile [1] [레벨:1]wooljima0 2012-06-07 1525
432 엑셀수식 MATCH함수 수식 내에 참조수식을 넣으려면? file [5] [레벨:1]아아압액셀 2012-06-06 1682
431 VBA 셀에 맞춰 그림 삽입하기 [1] [레벨:5]눈물바다 2012-06-05 5586
430 엑셀일반 행높이 최대치 조절 가능할까요? _ Excel 사양 및 제한 [3] [레벨:6]파이스 2012-06-01 5591
429 엑셀수식 누적 초기값 알아내기 file [2] [레벨:4]부루끄 2012-05-29 1522
428 아별툴관련질문 error name delete 하면 '1004' 런타임 어류가 발생합니다. [2] [레벨:3]알알 2012-05-29 2201
427 VBA 도형에 회전에 관해서.... [5] [레벨:2]루이비나 2012-05-27 1814
426 엑셀일반 바닥글에 & 기호 넣기 문의. [3] [레벨:3]rynoel 2012-05-25 2997
425 엑셀수식 OFFSET함수 수식 오류 문의 드립니다. [3] [레벨:4]부루끄 2012-05-23 2276
424 엑셀수식 indirect ,address함수 관련 문의 file [4] [레벨:4]부루끄 2012-05-14 2116
423 엑셀일반 행 및 열입력시 중복 방지 하는법 imagefile [3] [레벨:6]파이스 2012-05-10 2185
422 기타 단축키 [3] [레벨:1]아라이 2012-04-27 1771
421 엑셀수식 조건에 맞는 값들을 한 셀 안에 ,(콤마) 붙이면서 나열하는 방법은? file [3] [레벨:4]성투은자 2012-04-26 3375