엑셀 함수 관련질문..
배
배고파랑 (104.♡.140.134)
2024년 4월 11일 PM 01:59 · 수정됨(04. 12. 16:29)
조회 514 공감 0
I8 셀에 CONVERT함수 적용해서 저렇게 단위변환을 했습니다.
F8에 값을 넣으면 I8의 값이 바뀌는 방식인데
I8에도 값이 바뀌면 F8의 값도 바뀌게 하고싶은데 가능할까요?
댓글 (8)
-
돌돌마루
24.04.11 · 101.♡.59.99
그러면 순환참조가 되서 안될걸요? 기준점이 있어야 하는걸로 알고 있네요. - 미
미련없이떠나는
24.04.11 · 211.♡.221.205
순환참조오류나서 안됩니다.
만약에 꼭 그렇게 해야한다면 매크로로 하셔야할겁니다. -
크크리안
24.04.11 · 58.♡.210.48
두 줄 사용하세요 - 배
배고파랑
작성자 24.04.11 · 103.♡.220.67
순환참조 때문이 어떻게 할도리가 없나보군요 ㅠ
답변주신분들 모두 감사합니다! -
나나무플러스
24.04.11 · 254.♡.22.14
이거 제 경험상 chagpt 나 코파일럿에게 물어보면 잘 알려줘여 -
뮤뮤트라우드
24.04.11 · 219.♡.94.122
VBA를 사용한다면 값 입력시 동시에 2개의 결과를 내줄수 있는데
ChatGPT에게 물어보면 잘 알려 줍니다. - 얼
얼음1
→ 뮤트라우드 24.04.11 · 222.♡.0.157
Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Me.Range("A1")) Is Nothing Then
Application.EnableEvents = False
Me.Range("B1").Value = Me.Range("a1") * 3
Application.EnableEvents = True
ElseIf Not Intersect(Target, Me.Range("b1")) Is Nothing Then
Application.EnableEvents = False
Me.Range("a1").Value = Me.Range("b1") * 3
Application.EnableEvents = True
End If
End Sub
chat gpt 에게 물어봤더니.. 이케..답을...^^;; a1 과 b1 값이 바뀌는 코드입니다.. -
Ggons
24.04.12 · 211.♡.155.202
'입력셀을 A열 B열 전체로 잡았습니다.
'ChatGPT 3.5
Private Sub Worksheet_Change(ByVal Target As Range)
Dim KeyCells As Range
Dim aValue As Double
Dim bValue As Double
'변경을 감지할 열을 선택합니다.
Set KeyCells = Me.Range("A:B") 'A열과 B열에서의 변경을 감지합니다.
'만약 변경된 셀이 감지된 열에 속한다면
If Not Application.Intersect(KeyCells, Target) Is Nothing Then
'만약 변경된 셀이 A열에 속한다면
If Target.Column = 1 Then
'b열의 값을 25로 곱합니다.
bValue = Target.Value * 25
'b열에 결과를 저장합니다.
Application.EnableEvents = False '이벤트를 잠시 중지하여 무한 루프를 방지합니다.
Target.Offset(0, 1).Value = bValue
Application.EnableEvents = True '이벤트를 다시 활성화합니다.
'만약 변경된 셀이 B열에 속한다면
ElseIf Target.Column = 2 Then
'a열의 값을 25로 나눕니다.
aValue = Target.Value / 25
'a열에 결과를 저장합니다.
Application.EnableEvents = False '이벤트를 잠시 중지하여 무한 루프를 방지합니다.
Target.Offset(0, -1).Value = aValue
Application.EnableEvents = True '이벤트를 다시 활성화합니다.
End If
End If
End Sub
댓글을 작성하려면 이 필요합니다.