낭만소방관

'아저씨 성냥 사세요. 추워요' 오호라. 다 줘. 성냥 다줘. 내가 성냥 공장 차려줄까​

​엄마는 교육에 가야했던 토요일.아빠와 아들과 오랜만에 단 둘의 데이트 시간이 찾아왔다.날이 따뜻했으면 더 좋은 곳으로 갔을 텐데추운 곳에서 잔 탓인지 아침부터 콧물을 흘리기 시작해서 실내에서만 놀아야했다.선일이가 좋아하는 코코몽으로 가자고 했더니 밥도 잘 먹고 신나하고차에 타니까 빨리 운전해서 코코몽으로 가잔다 ㅋㅋㅋ 귀여운 우리 아들.이제는 좀 컸다고 뛰어노는 것을 포함해서 블럭도 집중해서 가져놀고 음식 짝 맞추기 하는 것도 집중을 잘 한다.배가 너무 고파서 소세지도 사 먹었는데, 선일이도 같이 먹자고 줬더니 케찹만 빨아먹네 ㅋㅋㅋ다행히 절반 정도는 씹어먹는다.​​​​​​​

스스로 하고자 하는 것이 늘어가는 우리 아들. 이제는 단추를 채우고자 한다. 한땀 한땀 정성들여 단추를 구멍에 끼우며 집중하는 모습. 한동안 못봤던 모습이네

스스로 하겠다는 것들이 늘었다.이젠 밥을 김에 싸서 먹겠단다.즐거워하는 모습을 보고 오랜만에 카메라를 꺼냈다.생각해보니 카메라를 집에서 안 쓴 지 오래된 것 같네.놀러갈 때만 찍어대고.사실 작품은 집에서 더 많이 나오는데.​​​​

순번 자동채우기할 때 매우 유용해보이는 소스네. for 나 do 구문을 사용하지 않아도 몇줄 안 되는 코드로 구현이 가능하니 다음에 써먹어야지 Option Explicit Sub autoFill1() [A1:B2].AutoFill [A1:B10] 'SourceRange.AutoFill FillRange 의 구조 End Sub from - http://blog.naver.com/rosa0189/60132848534

​선일이 처음 어린이집 갔을 때 유독 텃새를 부리던 수안이. 선일이만 적응기간이라 아빠가 교실에 잠시 앉아있다가 갔었는데 선일이가 가져노는 장난감만 뺏아가는 행동을 해서 안 그래도 소심한 우리 아들의 소심함에 불을 지피더니 어린이집 적응을 마무리한 우리 아들이 어느새 수안이를 잡아먹기 시작했지만. 이것 또한 우리 아들의 사회생활 중 일부이고 지가 직접 해결해야하는 문제 중 하나지만 남자애들이야 투닥거리면서 크는 게 맞지만서도 어린 나이에 전투적으로 살아가야하는 우리 아들의 일상을 보는 것 같아 마음이 씁쓸하다. 웃고만 지내도 모자란 나이인데. ​

엑셀 카페에 올라온 Q&A 품목명에 콤마를 기준으로 여러항목이 있는데 이것을 하나하나 풀고 싶다는 질문이 올라와있었다. 왠지 도전해보고 싶어서 코드를 짜보았다. 원래는 품목을 풀어서 바로 밑에 Row를 삽입하여 지들끼리 붙여놓으려고 했는데 내 실력으로는 도저히 무리라 품목명의 맨 밑으로 품목을 풀어서 넣고 거래처나 거래일자를 붙여넣었다. 그리고 영문을 알 수 없는 I78 셀의 '1'의 정체. 아무리 소스를 들여다봐도 왜 1이 생기는 건지 알 수가 없다. 카페에 올라온 글이니 올려도 괜찮으리라 보고 ㅋㅋㅋ

CG로 만들어진 맥 컨셉. 이쁘다. 오리리널 맥과 함께 커플샷. 저렇게 나온다면 어떤 대가를 치르더라도 사겠습니다.

의뢰받아 만든 VBA 작업 의뢰라고 해봐야 대단한 건 아니고 VBA카페에 월별식단표를 만들어 올렸더니 누가 본인 업무와 매우 딱맞는 작업내용이라길래, 공부도 할 겸 파일을 보내달라고 했다. 작업 내용은 이러하다. 월별로 발주를 하는데, 발주한 품목만 워크시트별로 정렬을 하는 것. 원래는 발주수량이 있으면 그 줄을 가져오려했는데 도저히 내 실력으로는 무리라서, 검색해도 안 나와서, 품목, 링크, 단위, 발주량을 통으로 복사해서 월별 시트에 붙여놓고 발주량이 없는 항목을 삭제하는 방식으로 작업을 했다.여기서의 핵심은 Columns("H").SpecialCells(4).EntireRow.Delete 바로 이 부분으로, 빈셀을 찾아 전체 Row를 삭제해주는 코드이다. 이게 없었으면 이번 작업은 꿈도 못 꿨을 일..

달력 컨트롤을 이용해 일자별 식단표를 만들어보았다. 스크린샷에는 보이지 않지만 1월부터 12월까지 12개 시트로 각 일자별로 식단이 짜여있고 달력을 클릭하면 해당 일자의 식단을 가져오게 되어있다. 기존 사용하던 사용자폼은 삭제하고 달력 컨트롤만 삽입하였다. 확실히 날짜 선택은 달력이 갑이지. 근데 달력컨트롤이 다른 엑셀 버전에선 에러가 난다는 제보가 ㅠ 게다가 다른 pc에서도 안 열릴 수도 있겠다. 이럴 수가 ㅠ Option ExplicitPrivate Sub Calendar1_Click() Dim calYear As Integer Dim calMonth As Integer Dim calDay As Integer Dim calYoil As String Dim c As Range Dim i As Integ..