풍경소리(정용만)

http://royalgreen.tistory.com/246

Sub 셀갯수선택합계() Dim total As Double total = 0 Dim strs As String Dim stre As String Dim i As Integer i = Application.InputBox("합계할 셀 갯수를 입력하세요", "셀 갯수 입력", , , , , , 1) - 1 strs = ActiveCell.Address stre = ActiveCell.Offset(i, 0).Address total = WorksheetFunction.Sum(Range(strs, stre)) 'MsgBox "시작주소=" & strs & Chr(10) & "..

http://feelyou.tistory.com/entry/엑셀-2010-다중-실행하기

http://feelyou.tistory.com/entry/%EC%97%91%EC%85%80%EC%97%90%EC%84%9C-%EC%A4%91%EB%B3%B5%EB%90%98%EC%A7%80-%EC%95%8A%EB%8A%94-%ED%95%AD%EB%AA%A9-%EA%B0%9C%EC%88%98-%EA%B5%AC%ED%95%98%EA%B8%B0

http://kin.naver.com/qna/detail.nhn?d1id=1&dirId=10202&docId=66279863&qb=7JeR7IWAIOuwsOyXtCDri6jstpXtgqQ=&enc=utf8&section=kin&rank=1&search_sort=0&spq=0&pid=S0EtzspySoosssbld/lsssssss8-241188&sid=2de1/wkCvxFYcW/llRT1RQ%3D%3D

http://blog.naver.com/retiaocr/220619420548

Public Sub 인쇄() Dim sijak As Integer Dim machim As Integer sijak = Range("o1").Value machim = Range("p1").Value For sijak = Range("o1").Value To machim Range("o1").Value = sijak ActiveCell.Offset(0, 0).Value = sijak ActiveSheet.PrintOut Next sijak End Sub

http://xlfire.blog.me/220693828527

http://tip.daum.net/question/61034212

http://kin.naver.com/qna/detail.nhn?d1id=1&dirId=102020101&docId=246969727&qb=7JeR7IWAIGN0cmwrZw==&enc=utf8&section=kin&rank=2&search_sort=0&spq=1&pid=Swhf0woRR0GssclofyVsssssssC-514645&sid=VzTdvQqGWceu2xST9l2K4Q%3D%3D