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

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

한셀에 값

엑셀일반 조회 수 3574 추천 수 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
번호 제목 글쓴이 날짜 조회 수sort
공지 공지 [공지] 아별닷컴의 엑셀 질문방 폐쇄합니다. 카페 질문방 이용하세요.. imagefile [레벨:30]아별 2015-04-23 40233
821 엑셀일반 엑셀파일 비밀번호 단체 설정 가능한가요? [30] [레벨:4]쟈니 2012-06-18 53740
820 엑셀일반 회원만 질문을 올릴 수 있습니다. [레벨:30]아별 2010-09-21 33141
819 기타 [필독] 질문시.. 엑셀 파일 첨부, 윈도우버전과 엑셀버전 표기, 답변 받으면 피드백 댓글 꼭 달기.. [레벨:30]아별 2011-08-11 26717
818 엑셀일반 행높이 최대치 조절 가능할까요? _ Excel 사양 및 제한 [3] [레벨:6]파이스 2012-06-01 14269
817 엑셀 웹커리에서 URL 바꾸기 매크로 질문 [1] [레벨:1]밥사마 2009-09-01 13154
816 엑셀- sumif와 sumcol 혼용사용에 대해서 (급해요) [1] 아놔 2009-07-31 12877
815 엑셀일반 엑셀에서 사진 고정하는 방법 없을까요? [3] [레벨:3]빛의행운아 2012-07-30 12556
814 제가 해외 사우디에서 파일을 받았는데 글씨가 계속 깨짐니다. file [1] [레벨:0]홍콩중국홍콩 2010-05-10 10881
813 또 다시 질문이 있어서 왔습니다. (일자별 관리시트에서 이전 시트 값(전일 잔액 등) 자동 불러오기) file [1] [레벨:3]harcz 2010-05-22 10839
812 엑셀수식 3차 방정식 풀기. [1] [레벨:3]rynoel 2012-06-13 10693
811 엑셀에서 지수값 계산하기 [1] [레벨:2]양다원 2009-07-21 10352
810 셀색깔별로 합계를 내고 싶습니다. file [1] [레벨:1]지민 2010-04-09 10330
809 엑셀에서 복사할 때 행 및 열넓이까지 그대로 복사하는 방법 [7] [레벨:2]만쥬 2010-12-07 10170
808 엑셀 주식형 차트 2009-08-17 9905
807 엑셀에서 특정데이터 불러오기 [1] [레벨:1]쒸뱅이 2009-07-17 9858
806 엑셀일반 셀 안에 삽입된 이미지의 정가운데(가로+세로)정렬 방법이 궁금합니다. [6] [레벨:6]파이스 2011-10-11 9781
805 VBA 엑셀 열 추가 _ 엑셀의 마지막 셀 재 인식시키는 팁 ActiveSheet.UsedRange.Select imagefile [1] [레벨:5]눈물바다 2009-08-27 9733
804 두 자료를 비교하여 같은 값을 다른 시트에... file [1] [레벨:1]프로도 2010-05-11 9655
803 시트 이동/복사 시 나오는 에러에 대해 질문드립니다 [1] [레벨:1]잔차 2010-02-10 9618