☰

MS Excel에 버튼을 삽입하는 방법은 무엇입니까?

tag-icon • tag-icon microsoft-excel-2010 worksheet-function vba
MS Excel에 버튼을 삽입하는 방법은 무엇입니까?

친구 저는 MS Excel 2010을 사용하고 있으며 Excel 시트에 이름이 '1 ADDER'인 버튼을 삽입하고 싶습니다. 이 버튼을 누를 때마다 앞 셀이 선택된 A열의 셀에 1이 삽입되도록 하고 싶습니다. 전에. 예를 들어 셀 번호 D8을 선택하고 이 버튼을 누르면 셀 번호 A8에 1이 삽입되어야 합니다. 마찬가지로 셀 번호 Q12를 선택하고 이 버튼을 누르면 셀 번호 A12에 1이 삽입되어야 합니다. 동일한 작업을 수행하기 위해 Excel의 개발자 메뉴를 살펴보았습니다. 버튼, 체크박스, 콤보박스 등을 삽입할 수 있는 삽입버튼이 있는데 어떻게 사용하는지 모르겠습니다... 도와주세요...

답변1

이 두 개의 서브를 표준 모듈에 넣고 실행하십시오.MakeButton

Sub MakeButton()
    ActiveSheet.Shapes.AddShape(msoShapeOval, 228#, 557.25, 126.1, 126.1).Select
    With Selection
        .Characters.Text = "1 ADDER"
        .ShapeRange.Fill.Visible = msoTrue
        .ShapeRange.Fill.ForeColor.SchemeColor = 3
        .ShapeRange.Line.Visible = msoTrue
        .ShapeRange.Line.ForeColor.SchemeColor = 3
        .ShapeRange.Line.BackColor.RGB = RGB(255, 255, 255)
        .Name = "MyButton"
        .OnAction = "whatever"
        .Top = Range("C3").Top
        .Left = Range("C3").Left
     End With
End Sub

Sub whatever()
    Cells(ActiveCell.Row, 1).Value = 1
End Sub

만들기 위해서는이름버튼의가산기 1개, 다음으로 행을 업데이트하십시오.마이버튼

관련 정보