Fly to the sky & Return

어느 한 Cell이 선택되었을때 그 Cell로부터 일정범위를 선택하고 특정한 조건을 적용할때 사용가능합니다. Dim newRange as Range Set newRange = Range(ActiveCell, ActiveCell.Offset(numRows, numCols)) 코드 예를 보면 1234567891011121314Sub 매크로1() Dim newRange As RangeSet newRange = Range(ActiveCell, ActiveCell.Offset(0, 14)) '셀스타일 제목 1 적용 예 newRange.Style = "제목 1" End Sub Colored by Color Scriptercs 위의 코드를 매크로와연결시키면. 반복되는 작업을 수월하게 할수 있을듯합니다

test 1 2 3 4 5 test a b c d e 특정 문자열을 중심으로 비슷한 모양이 반복되는 엑셀 데이터를..... test test 1 2 3 4 5 1 2 3 4 5 test test a b c d e a b c d e 로 변환하는 (일종의 행열바꿈 코드.) 12345678910111213141516171819202122232425262728sub 자동채우기()Dim iRow As IntegerDim i As IntegerDim j As Integer With Worksheets("sheet1") iRow = 0 For i = 1 To 18200 If Left(.Cells(i, 1).Value, 1) = "t" Then iRow = i For j = 1 To 20 If Left(.Cells(i..

집근처에 있는 중국요리집입니다.개인적으로 배달이 되는 중국집은 이용하지를 않는 터라... 좀 가격이 되는 중화요리집을 이곳저곳 많이 다니는 입장입니다.시내에 여러군대를 가보고 노은 근처에 있는 중국요리집에도 갔었는데제 입맛이나 와이프 입맛에 딱맞는 탕수육....으로 강력히 추천할만한 집입니다. 탕수육은 밀가루 튀김 그릇에 담겨져서 나옵니당... 실제 량은 별로 안되는 듯... 이부분에 대한 호불호는 갈릴듯합니다.하지만 맛은.. 부먹 찍먹 논란이 필요가 없습니다. 저상태로 나오는데 부먹이지만 식감이 살아있습니다. 여기서 부먹 찍먹 논란은 배달 전문 중국음식점에서 나타나는 것이지 정말 잘하는 집은 부먹으로 나온다한들... 그 식감이 살아있어 논란 자체가 발생할 여지가 없는 것이지요 탕수육과 함께 먹는 메뉴는..

지난 주말(16일) 대전 순천간 고소도로를 달리고 있는데 계기판에 엔진 경고등이 들어왔습니다. 급히 차를 세우고 벤츠서비스와 통화를 시도하셨습니당. 다행히.. 토요일에는 전화를 잘받는듯하더라구영.. 머 일요일에 전화해본적이 없어서.. 일요일에도 전화를 잘 받을 지는 모르겠습니다. 일단 엔진경고등이 켜졌다는 이야기를 하니.. 엔진의 떨림이나 핸들의 떨림이 있느냐를 물어보더군요머 디젤 특유의 떨림을 제외하고는 평소와 다름은 없다고 이야기를 하니.. 엔진자체의 문제가 아닐수도 있어 계속 주행을 해도 무방은 하나엔진이나 핸들에서 이상이 느껴진다면 바로 차를 멈추고 렉카를 이용해서 서비스센터로 입고 해야한다는 이야기와 함께 예약을 잡았습니다. 예약당일 대전신탄진에 있는 한성 자동차 서비스센터를 갔습니다.1층에서 ..

1. 옵셔널Swift가 가지고 있는 가장 큰 특징 중 하나가 바로 옵셔널 Optional 입니다.값이 있을 수도 있고 없을 수도 있는 상태를 말한다 할수 있습니다.좀더 자세히 설명한것을 보자면값을 반환하는 과정에서 오류가 발생할 가능성이 있는 값을 옵셔널 타입이라는 객체로 감싼 후에 반환2. 옵셔널 타입의 선언과 정의2.1 자료형 뒤에 ?1234567891011//옵셔널 정수형var optionalInt : Int?//옵셔널 문자열var optionlString : String?//옵셔널 배열var optionalArr : [String]?//옵셔널 딕셔너리형var optionalDic : Dictionary?var optionalDic1 : [String : String]?//옵셔널 클래스형var op..

시작하면서 2번째 메뉴인 Create a new Xcode project를 실행해보겠습니다. 화면 원쪽에는 플렛폼을 선택하는 메뉴가 있고 그에 따른 템플릿을 고르는 화면이 오른쪽에 배치되어 있습니다.일단 IOS application에서 기본이라 할수 있는 single view applicattion 을 선택한 후 next 버튼을 눌러 진행합니다 product name을 설정하는 화면입니다.프로젝트명, 조직명, 조직식별값등을 넣고 언어(objective-c or Swift)와 디바이스를 선택할수 있는 화면입니다. Product를 저장할 폴더를 지정합니다. 프로젝트 빌드화면입니다.1번(레드박스)은 -> Navigator Area : 여덟가지 서로 다른 내비게이터들이 탭 형태로 모여 있는 곳 1.1 프로젝트 ..

실행환경은 위의 그림과 같습니다.자세히 보면 기본 맥북과는 다른 내용들이 보일듯합니다. 머 자세한 설명은 생략하겠습니다. XCODE를 실행하면 위와같은 화면이 나타납니다. 버전은 7.2 버전입니다. 원쪽 하단에 3개의 메뉴가 나타나고 오른쪽에는 작업했던 프로젝트들이 나타납니다. 1. Get started with a playground2. Creat a new Xcode project3. 그다음 기타. ㅋ 일단 1번을 보면 운동장(playground)이라는 단어나 나옵니다. 말 그대로 운동장입니다. Xcode를 연습해볼수 있는 놀이터가 되겠습니다.2번은 실제 프로젝트를 만드는메뉴입니다.3번은 모르겠네영.한번도 안해봐서. 오늘은 1번 메뉴를 타고 들어가 놀이터에서 놀아보도록 하겠습니다. 제목을 설정하고 플..

여러 sheet에서비슷한 작업을 할경우 매크로를 많이 사용하는데 sheet마다 합계를 구해야할 경우 마지막 열이 각각 다른 경우 매크로로 진행이 안되고 일일히수작업을 해야하는 경우가 발생합니다.이러한때 특정 열의 마지막 칸에 자동적으로 합계를 구해서 넣고 그 앞 칸에 합계를 명칭을 넣어주는 VBA입니다.1234567891011121314151617 ActiveSheet.Range("F1").End(xlDown).Offset(1, 0).Select ' F column 마지막 칸에 합계라는문자를 삽입ActiveCell.FormulaR1C1 = "합계" ActiveSheet.Range("G1").End(xlDown).Offset(1, 0).Select ' G column 마지막 칸에 숫자합 넣는 VBA Dim..

지난해 10월.. 지방 국도변에서 덤프트럭과 추돌사고가 발생했었습니다. 아직 1년도 안된 뽀송뽀송한 차량 옆면을 덤프가 시원하게 긁고 간것이지여..사고는 교차로에서 신호를 받고 진행하는데 덤프트럭이 내차 뒷타이어보다 뒤쪽부터 시작해서 앞타이어 앞쪽까지 밀고 들어오면서 발생했습니다. 전방에 차량이 정체가 되고 있어 차선변경을 시도하는 과정에서 옆차선에 차가 있는지를 확인하지 않고 들어온 경우인데... 당시 덤프 운전자는 내차가 보이지 않았다고 주장했지만최초 추돌시점이세 차량 보넷까지의 거리가 3m가 넘는 터라..덤프운전자 자리에서 안보였을리가 없다고 판단이 되었습니다. 나중에 과실비율 산정할때 이부분을 강력히 어필했던 부분이기도 하구여하여튼 타지역에서 사고가 발생하니 이것저것 귀찮은 일이 많아지더라구여보험..

12345678910111213141516171819202122232425262728293031323334353637383940 import UIKit class ViewController: UIViewController, UIImagePickerControllerDelegate, UINavigationControllerDelegate { @IBAction func imgSelect(sender: AnyObject) { let picker = UIImagePickerController() picker.sourceType = UIImagePickerControllerSourceType.PhotoLibrary picker.allowsEditing = true picker.delegate = self self..