rand(life)

'[제목줄 제외하고 아래끝까지 범위 재설정]With RngSet Rng = .Offset(1).Resize(.Rows.Count - 1, .Columns.Count)End With '[autofill 채우기]날짜.AutoFill Destination:=날짜.Resize(15), Type:=xlFillWeekdays, '평일날짜로만 채움' Type:=xlFillCopy '셀복사로 채움 '[한 셀 안의 문자열 중 일부만 첨자 및 색입히기]With Range("A1").Characters(4, 6).Font '4~6번째 문자.Superscript = True '위첨자.Subscript = False '아래첨자.Color = vbRedEnd With [범위중 두 번째 열 지정]Set r = sht.Range("..

엑셀에서 A1,A3,A5,A7 . . . 이런식으로A9999까지 선택하고 싶은데요 일일이 선택하지 않고 한꺼번에 선택하는 방법은 없나요?참고사이트: http://www.iexceller.com/MyXls/VBA_Beginner/VBA_Beginner8.asp 역시 지식인에서 나온 질문이다. 시트를 여러장 선택하는 코드는 지난번 답변한 적이 있기 때문에, 그때 코드를 뒤져봤다 Worksheets(i).Select (False) '시트를 앞시트에 더하여 선택 바로 이 부분이다. 셀 선택하는 것도 이렇게 가능할 거라 생각해서,cells(i, 1).select (false)이렇게 짰다. 그런데 오류가 난다. 인수의 개수나 속성 지정이 잘못 되었습니다찾아보니, 셀을 여러개 선택하는 방법은 VBA함수인 Union을..