글 수 65
![[레벨:30]](http://abyul.com/zbxe/modules/point/icons/default/30.gif "포인트:141749point, 레벨:30/30"){kind=icon}
a☆---------------------------------------------------------------------
'기존 날짜를 하루 증가시키는 함수
' DateAdd("증감시킬 타입(년/달/일 등)", 증감시킬 숫자, 기존 날짜 )
Private Sub SpinButton2_SpinUp() '날짜의 스핀버튼
mc_textDate = DateAdd("d", 1, mc_textDate)
End Sub
---------------------------------------------------------------------
'날짜형식의 데이터에서 달이나 일만 뽑아내고 싶을때
Range("거래명세표!B8").Select
ActiveCell.FormulaR1C1 = Format(거래명세폼일자텍스트, "m")
Range("거래명세표!C8").Select
ActiveCell.FormulaR1C1 = Format(거래명세폼일자텍스트, "d")
---------------------------------------------------------------------
Format(Day(Date),aaa) 는 오늘 날짜구요
라고 하신 것도 이상하군요...
그냥
Format(Date,aaa)라고 하셔야 합니다
VBA에서 날짜 데이터는 양 옆에 #를 붙여둡니다. 아래와 같이
Format(#4/1/2004#, "aaa")
또는 날짜 함수를 이용하셔서 아래와 같이 하실 수도 있겠지요...
Format(DateSerial(2004, 4, 1), "aaa")
그럼...행운이 있으시길....!
---------------------------------------------------------------------
---------------------------------------------------------------------
---------------------------------------------------------------------
워크시트에서 셀 사이에 적용하는 함수..
1.주민번호에서 나이 뽑아내기
=YEAR(NOW())-(1900+LEFT(E3,2))
---------------------------------------------------------------------
'기존 날짜를 하루 증가시키는 함수
' DateAdd("증감시킬 타입(년/달/일 등)", 증감시킬 숫자, 기존 날짜 )
Private Sub SpinButton2_SpinUp() '날짜의 스핀버튼
mc_textDate = DateAdd("d", 1, mc_textDate)
End Sub
---------------------------------------------------------------------
'날짜형식의 데이터에서 달이나 일만 뽑아내고 싶을때
Range("거래명세표!B8").Select
ActiveCell.FormulaR1C1 = Format(거래명세폼일자텍스트, "m")
Range("거래명세표!C8").Select
ActiveCell.FormulaR1C1 = Format(거래명세폼일자텍스트, "d")
---------------------------------------------------------------------
Format(Day(Date),aaa) 는 오늘 날짜구요
라고 하신 것도 이상하군요...
그냥
Format(Date,aaa)라고 하셔야 합니다
VBA에서 날짜 데이터는 양 옆에 #를 붙여둡니다. 아래와 같이
Format(#4/1/2004#, "aaa")
또는 날짜 함수를 이용하셔서 아래와 같이 하실 수도 있겠지요...
Format(DateSerial(2004, 4, 1), "aaa")
그럼...행운이 있으시길....!
---------------------------------------------------------------------
---------------------------------------------------------------------
---------------------------------------------------------------------
워크시트에서 셀 사이에 적용하는 함수..
1.주민번호에서 나이 뽑아내기
=YEAR(NOW())-(1900+LEFT(E3,2))
---------------------------------------------------------------------
