도토리엑셀

equalize x_axis and y_axis scale

1. select the chart and right-click > Format Chart Area

2.  Format Chart Area

chart option

Enter the height and width as a scale factor of the axis value.

The x-axis is 10.5, so 10.5*20=210

The y-axis is 3.5, so 3.5*20=70

3. The axes are scaled the same in the chart.

2021.04.22 - [엑셀] - 내용에 맞게 자동으로 열 너비 변경하기 (자동맞춤)

2023.02.16 - [엑셀] - 열너비와 행높이를 같게 만드는 방법

일반적으로 반올림은 4사5입(4捨5入)입니다.

엑셀 함수로는 round함수를 이용합니다.

소수첫째자리까지 만드는 경우

A1셀에 3.141592

=round(A1,1) 

결과 3.1

만약에 3사4입은 어떻게 하면 될까?

=round(A1+0.01,1) 

결과 3.2

2022.08.15 - [엑셀] - mround

2021.12.09 - [엑셀] - 5mm 단위로 올림하는 방법

2020.12.01 - [엑셀] - 시간 반올림

2021.12.09 - [엑셀] - 5mm 단위로 올림하는 방법

2020.12.01 - [엑셀] - 15분 단위로 올림, 반올림 하기

2020.06.08 - [엑셀] - 업무관련[엑셀]올림, 내림, 버림, 반올림

2023.03.22 - [엑셀] - 엑셀에서 유효자리수 맞추기

엑셀에서 유효자리수 맞추기

=ROUND(value,sigfigs-(1+INT(LOG10(ABS(value)))))

value :: the number you wish to round.
sigfigs :: the number of significant figures you want to round to.

https://www.vertex42.com/ExcelTips/significant-figures.html

엑셀 빼기 연산 오류

엑셀2016버전을 사용하고 있는데 빼기 연산에 문제가 있다.

A1 : 106.9

A2 : 100

A3 : =A1-A2 를 각각 입력하였다.

A3셀의 수식에서 A1을 선택하고 F9, A2를 선택하고 F9를 누르면 위 그림과 같이 =106.9-100이 나온다.

이 값은 6.9가 나와야 정상인데..

=6.90000000000001

소수점 14자리에서 1이 뜬금없이 나타났다.

이는 부동소수점과 관련된 오류라고 한다.

모든 컴퓨터 기기에서 발생되는 증상으로 IEEE754를 이용하는 기기에서 나타나는 증상

근데 이건 좀 심하지..

Excel 사양 및 제한

선택한 영역에서 셀 값이 0인 경우 해당 값을 삭제하는 VBA 코드

Sub DeleteZeroValues()
    Dim rng As Range
    Set rng = Application.InputBox("Select a range of cells", Type:=8)

    If rng Is Nothing Then
        MsgBox "Cancelled", vbInformation
        Exit Sub
    End If
    
    Dim cell As Range
    For Each cell In rng
        If cell.Value = 0 Then
            cell.Value = ""
        End If
    Next cell
End Sub

엑셀에서 영역을 선택하고 선택한 영역의 홀수열의 너비는 10, 짝수열의 너비는 20으로 만드는 vba

ChatGPT가 알려준 VBA Code

Sub SetColumnWidth()
    Dim rng As Range
    Set rng = Selection
    Dim i As Integer
    For i = 1 To rng.Columns.Count
        If i Mod 2 = 1 Then
            rng.Columns(i).ColumnWidth = 10
        Else
            rng.Columns(i).ColumnWidth = 20
        End If
    Next i
End Sub

원하는 답변을 얻으려면 질문을 얼마나 정확하게 하느냐가 관건이다.

A열에 국가명이 있고 B열에는 값이 들어 있다.
국가명이 같은 B열의 값을 세로로 붙여 넣고 싶습니다.

네이버 지식인의 답변

Sub Macro()
Dim vDB, Rev As Variant
Dim T As String
Dim i As Long
 Application.ScreenUpdating = False
    On Error GoTo ET
   vDB = Range("A3").CurrentRegion.Value
  Range("E1").CurrentRegion.ClearContents
  With CreateObject("Scripting.Dictionary")
    For i = 2 To UBound(vDB)
        T = vDB(i, 1)
      If Not .Exists(T) Then Set .Item(T) = CreateObject("System.Collections.Arraylist")
        With .Item(T)
           .Add vDB(i, 2)
'           .Sort
        End With
    Next i
      Range("E1").Resize(, .Count).Value = .keys
    For i = 0 To .Count - 1
        Rev = .Items()(i).Toarray
      Cells(2, 5).Offset(, i).Resize(UBound(Rev) + 1) = Application.Transpose(Rev)
    Next i
  End With
ET:
End Sub

열너비와 행높이를 같게 만드는 방법에 대해 알아보자.

엑셀에서 열너비와 행높이를 같은 숫자를 입력하면 정사각형이 되지 않는다.

엑셀 도움말에서 열 너비 및 행 높이 변경을 확인해보니

열너비는 최대 255point(2045pixel), 행높이는 최대409point(546pixel)까지 지정할 수 있다.

기본설정은 열너비 8.43point, 행높이 15.00point

◾페이지 레이아웃 보기(보기 탭, 통합 문서 보기 그룹, 페이지 레이아웃 단추)에서 작업하는 경우 열 너비 또는 행 높이를 인치, 센티미터 및 밀리미터 단위로 지정할 수 있습니다. 측정 단위는 기본적으로 인치 단위입니다. 파일 > 옵션 > 고급 > 디스플레이로 이동하여 > 눈금자 단위 목록에서 옵션을 선택합니다. 기본 보기로 전환하면 열 너비와 행 높이가 포인트로 표시됩니다.

1. 픽셀단위로 맞추는 방법

열너비를 조정하려고 마우스를 열사이에 놓고 드래그하면 너비:12.00(101 픽셀)이 나온다.

너비와 높이를 100픽셀로 조정하면

아래 그림과 같이 정사각형이된다.

2. 눈금자를 이용하는 방법

2-1. 파일 > 옵션 > 고급 > 디스플레이로 이동하여 > 눈금자 단위

mm단위가 편하니 mm로 변경한다.

2-2. 보기 > 통합문서보기 > 페이지 레이아웃 클릭

열너비와 행높이를 mm 단위로 맞출 수 있다.

위 2방법중 1번 방법을 추천한다.

2번 방법은 입력하고 나면 픽셀값이 입력한 값과 조금 달라지는 경향이 있다.

3. VBA를 이용하는 방법

Sub makeSquares()
Cells.RowHeight = 20
With Cells(1, 1)
W = .ColumnWidth
HWratio = .RowHeight / .Width
Cells.ColumnWidth = W * HWratio
End With
End Sub

행높이가 20으로 설정하고 열너비를 행높이와 같게 만든다.

수량의 합을 만족하는 해 찾기

데이터 \ 분석 \  해찾기를 통해 찾을 수 있다.

1.  파일 \ 옵션 \ 추가 기능 \ 해찾기 추가기능 추가

2. 해 찾기 매개 변수 설정

 구하고 셀을 지정한다. 목표 설정 $C$10

 대상은 지정값으로 구하고자 하는 값 10을 입력한다.

 $B$2:$B$7 영역의 값은 0 또는 1만 입력되도록 제한 조건을 설정한다.

3. 구하고자 하는 값 10이 되는 합은 다음과 같다.

A4, A5, A7을 더하면 10이 된다.

2022.02.03 - [엑셀] - Newton-Raphson method로 해 찾기

2022.01.04 - [엑셀] - 2차방정식의 해찾기

유효성검사 목록 정렬하기

1. 원본 데이터를 선택한 다음 수식 > 이름 정의 를 클릭

2. 그런 다음 새 이름 대화 상자에서 선택한 범위의 이름을 이름 텍스트 상자에 입력하고 이 수식을 입력.

 =OFFSET(Sheet1!$A$1, 0, 0, COUNTA(Sheet1!$A:$A)) 

3. C1셀을 선택하여 다음 수식을 입력합니다.

=IF(COUNTA(List)>=ROWS($A$1:A1), INDEX(List, MATCH(SMALL(COUNTIF(List, "<"&List), ROW(A1)), COUNTIF(List, "<"&List), 0)), "")를 입력하고 Shift + Ctrl + Enter 키를 누른 다음 빈 셀이 나올 때까지 자동 채우기 핸들을 아래로 드래그 한다.

4.  수식 셀이 있는 열을 선택하고 수식 > 이름 정의를 클릭한 다음 이름 텍스트 상자에 SortedValues를 새 이름 대화 상자 에 입력합니다

5. 동적 드롭다운 목록을 만드는 데 필요한 셀 또는 범위를 선택하고 데이터 > 데이터 유효성 검사를 클릭

https://www.extendoffice.com/documents/excel/2652-excel-drop-down-list-alphabetical-order.html