Fly to the sky & Return

당직1당직2당직3당직4당직5당직6당직7당직8당직91일일3003075005076006072월월11253화화12114수수13125목목14136금금1001037토토2002044004048일일3013085015086016089월월151410화화161511수수171612목목181713금금10110414토토20120540140515일일30230950250960260916월월191817화화201918수일30331050351060361019목일30431150451160461120금휴일30531250551260561270021토토20220640240622일일30631350651360661323월월212024화화222125수수232226목목242327금금10210528토토203207403407 위와 같은 데이터를 만들었다..

폴더에 파일이 하나씩 들어있는 수백개의 폴더가 있어.. 하나씩 바깥으로 꺼내야 되는 상황에서 유용한 파이썬 코드입니다.123456789101112131415161718192021222324252627282930 import osimport os.pathfrom Tkinter import *from tkFileDialog import askdirectory from os import rename, listdir def search(dirname): flist = os.listdir(dirname) for f in flist: next = os.path.join(dirname, f) if os.path.isdir(next): search(next) else: print(next) s= os.path.spli..

특정 폴더내에 여러가지 엑셀파일이 있고 이 파일이 가지고 있는 첫번째 sheet들을 모두 모두 모와서 한가지 엑셀파일로 만들기 위한 vba입니다.. 참고하시기 바랍니다. 12345678910111213141516171819202122232425Option ExplicitSub sheets_copy() Dim IngCount As Integer '선택된 파일 갯수를 넣을 변수 Dim fileName As String '각 파일 이름을 넣을 변수 Dim wkBk As Workbook '각 파일을 넣을 변수 Dim wkbkName As String '시트들을 모을 파일이름 Application.ScreenUpdating = False '화면 업데이트 (일시) 정지 wkbkName = ActiveWorkbook..

기존에 난잡한 코드를 조금 정리한다고 정리했는데 여전히 난잡하기는 하네여... 정리하다가 포기.. 하지만 translate 기능을 이용해서 조금은 코드를 간결하게 만들었습니다. translate 기능... 기준 좌표를 이동시켜주는 함수로 기존에 코드에서 태극 중심의 위치가 약 300,200 근처에 있었다면새로운 코드에서는 상대위치는 0,0 , 절대위치는 300,200 에 위치한다고 볼수있는데그것은 translate를 이용해서 기준점을 기존 0,0 -> 300,200 으로 옮긴것에 기입합니다 수정된 코드는 다음과 같습니다,.. 12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455..

태극기를 HTML5를 이용해서 만들어봤습니다.심심풀이로 접근했다가 태극기의 모양의 수평대비 직각구조가 아니라 약 33.5도 혹은 56.5도 기울어져 있다는 점이 만드는데 생각을 많이 하게 하더라구여.요거 그리면서 canvas의 여러가지 기능도 시험해보고.. 그랬네여아쉬운 점이 있다면 좀더 깔끔하게 만들지 못한점. 요것이 아쉽기도 하구여.. translate 기능을 활용하지 못한점도 문제점으로 남는듯하단 생각을 해봅니당.. 소스는 다음과 같습니다. 12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455565758596061626364656667686970717273747576777..

데이브는 지방의 행사장에서 미국대통령 흉내를 내는 일을 아르바이트 삼아 하고 있던 일반 시민이였다대통령이 참석해야 되는 행사장에 대타로 참석을 하게 되고.... 마침 의식을 잃은 대통령을 대신해 국정을수행해간다는 내용이.. 광해와 비슷하다고 할수 있다. 데이브라는 영화를 봤을때..그럴수도 있다라는 생각을 해본다..미국대통령의 연설을 대중매체를 통해 많이 접할수 있어 목소리나 행동등을 따라해볼수 있고 외모도 비슷하게 생겼다면 더더욱 아르바이트 같은 것도 가능하기 때문이다. 광해에서.. 우리의 주인공은 왕이랑 비슷하게 생겼다. 하지만 조선시대 왕의 얼굴을 제대로 볼수 있는 사람이 몇명이나 있었을까나? 왕의 목소리를 들어볼수 있는 사람이 얼마나 있었을까나? 왕의 얼굴과 비슷하게 닮았다고 하나 살아온 환경차이에..

엑셀도 쓰다보니 별별기능이 다있긴 하군여.... 필요한 기능 찾아가면서 배우는 것도 삶의 한 기쁨이 아닌가 합니다.. 이번에 소개할 내용은 엑셀에서 스크롤 막대와 연계된 동적 차트를 만드는 것입니다. 먼저 sample data를 다음과 같이 만듭니당 스크롤 막대를 하나 sheet 위에 정당학 위치에생성하고 컨트롤 서식을 다음고 같이 변경합니다. 그리하면 A10 cell에 숫자가 나타나는 것을 확인할수 있습니다. 이제 이름관리자를 실행한 후 다음과같이 이름을 설정해줍니다. 범위 의 참조대상은 =OFFSET(Sheet1!$A$2,Sheet1!$A$10,1,1,12)코드의 참조대상은 =OFFSET(Sheet1!$A$2,Sheet1!$A$10,0) 이제 a 행에 대한 차트를 작성합니다. 차트의 데이터 선택에서 ..

마우스에 이벤트가 발생하면 그것을 잡아서 폼의 listbox에 뿌려주는... 프로그램입니다. 필요한 것은 폼하나 만들고 listbox 이름을 lstActions 으로 만들어 주면 프로그램 구성은 끝이고.. 실행을 해보면 마우스가 어디에 위치하는지. 어떤 이벤트가 발생하는 지를 알수 있습니다. 이러한 프로그램을 응용하면 automouse 프로그램도 제작이 가능할것입니다 저 이프로그램이 제공하는 마우스 좌표를 이용해여 매일 아침마다 하는 귀찮은 업무들을 클릭한번으로 해결해버리는 프로그램을 만들어 사용중입니다. 참고하시기 바랍니다. Private Declare Function SetWindowsHookEx Lib "user32" Alias "SetWindowsHookExA" (ByVal idH..