로그인 유지
이 게시판은 아별닷컴 회원만 질문을 올릴 수 있습니다. 회원에게 주어지는 특권인셈이지요. 회원이 아닌 분들은 열람만 가능합니다.
2013.12.19 19:09:07 *.104.126.21
요셉님..
네.. 상대참조로 해결할 수 있는 방법은 없는 것 같습니다.
혹시.. VBA에 대해서 지식이 있으시다면 아래 코드를 활용해보세요..
VBA가 생소하시다면.. 그냥 손으로 하시는게 더 편하실겁니다.
Sub addCheckBox()
Dim sht As Worksheet: Set sht = ActiveSheet
Dim rng As Range: Set rng = ActiveCell
Dim ckBox As Object
For i = 1 To 6
Set ckBox = sht.CheckBoxes.Add(rng.Left + 7, rng.Top, rng.Width - 7, rng.Height)
ckBox.LinkedCell = rng.Offset(, 16).Address
ckBox.Characters.Text = ""
Set rng = rng.Offset(, 1)
Next i
End Sub
즐거운 하루 되세요.. ^^)/
새 창으로
선택한 기호
피벗테이블사용시 항목수 초과 메세지 [1]
엑셀 웹커리에서 URL 바꾸기 매크로 질문 [1]
자동채우기 기능 [1]
if 에서 and, or , not 함수에 대해서 문의여..? 다시파일 올렸어여..부탁드려여..? [2]
질문있습니다. [2]
엑셀 만게가 넘는 데이타에서 원하는 이하의 값 찾아내기 [3]
여러 시트가 있는 파일을 작업하다보면 옆 시트에 맘대로 셀에 색깔이 들어감. [1]
필터링 설정후 복사와 관련된 질문 드립니다. [1]
엔터 눌렀을때 이동 [2]
이기능 어떻게 사용하는건가요??? [2]
매크로 없애는 방법 [1]
sumif 함수에 대해서 [1]
셀 색깔별 정렬 [1]
셀 곱하기 [3]
함수가 들어간 셀의 합 [1]
갯수 구하기 [5]
페이지 고정이요 [1]
AK18101*2 으로 되어 있는 셀을 빈셀에 AK18101 AK18101 으로 나열하는 방법 [2]
서식 추가질문 [1]
power 공식 관련 [5]
요셉님..
네.. 상대참조로 해결할 수 있는 방법은 없는 것 같습니다.
혹시.. VBA에 대해서 지식이 있으시다면 아래 코드를 활용해보세요..
VBA가 생소하시다면.. 그냥 손으로 하시는게 더 편하실겁니다.
Sub addCheckBox()
Dim sht As Worksheet: Set sht = ActiveSheet
Dim rng As Range: Set rng = ActiveCell
Dim ckBox As Object
For i = 1 To 6
Set ckBox = sht.CheckBoxes.Add(rng.Left + 7, rng.Top, rng.Width - 7, rng.Height)
ckBox.LinkedCell = rng.Offset(, 16).Address
ckBox.Characters.Text = ""
Set rng = rng.Offset(, 1)
Next i
End Sub
즐거운 하루 되세요.. ^^)/