Excel에서 서식을 사용하여 셀에 입력이 피트와 인치로 표시되도록 할 수 있나요?

Question

Excel을 사용하여 셀에 숫자(인치를 나타냄)를 입력하고 셀에 피트와 인치로 표시할 수 있게 하고 싶습니다. 예를 들어, A1 셀에 62를 입력하면 A1 셀에 5' 2"가 표시됩니다. 수식을 사용하여 한 셀의 입력값을 가져와 원하는 값으로 변환하는 방법을 알고 있습니다(예: =INT(A1) /12)&"' "&MOD(A1,12)&"""") 하지만 입력이 입력된 동일한 셀에 변환된 버전이 표시되기를 원합니다(예: 셀 A1에 62를 입력하면 A1에 5' 2"를 표시하고 싶습니다. 포맷하는 것이 이 작업을 수행하는 유일한 방법인 것 같지만 방법을 알 수 없습니다. 감사해요!

Answer 1

일반 서식이어야 할까요, 조건부 서식이어야 할까요? 정기적인 경우 작동할 영역을 지정해야 합니다. 조건부인 경우 트리거 조건을 지정해야 합니다.
두 경우 모두 VBA를 사용해야 합니다. 범위의 첫 번째 변형(일반 서식)을 가정합니다 A1:C3. 양수만 형식이 지정됩니다(음수와 0은 변경되지 않음).
표준 모듈에 함수 코드를 입력하세요.

Function FeetIn(data As Double) As String
   Dim ft As Long, inch As Double
   ft = Int(data / 12)
   inch = data - 12 * ft
   FeetIn = IIf(ft >= 1, ft & "' ", vbNullString) & _
            IIf(inch > 0, inch & "''", vbNullString)       ' two apostrophes
End Function

시트 모듈에서:

Private Sub Worksheet_Change(ByVal Target As Range)
   Set Target = Intersect(Target, Range("A1:C3"))
   If Target Is Nothing Then Exit Sub
   Application.EnableEvents = False
   Dim cell As Range
   For Each cell In Target
      If IsNumeric(cell.Value) Then
         cell.NumberFormat = """" & FeetIn(cell.Value) & """;-General;0;@"
      Else
         cell.NumberFormat = "General"
      End If
   Next cell
   Application.EnableEvents = True
End Sub

Answer 2

수식 없이 서식을 지정하려면 기본 제공 형식을 사용해야 합니다.

Excel에는 피트와 인치로 표시하는 형식이 있습니다. 여기서 피트 번호는 포인트 앞에 있고 인치는 소수 부분에 있습니다.

"셀 서식 지정...", 범주 "사용자 정의"를 사용하고 다음 형식 사양을 입력합니다 0' 0\". 필요에 따라 이 형식을 수정하십시오.

이것이 Excel 서식으로 할 수 있는 최대치입니다. 그 이상에는 추가 열에만 사용할 수 있는 수식이 필요합니다.

자세한 내용은 다음을 참조하세요. Excel 사용자 정의 숫자 형식.