- ©«¤l
- 79
- ¥DÃD
- 19
- ºëµØ
- 0
- ¿n¤À
- 148
- ÂI¦W
- 0
- §@·~¨t²Î
- WINDOW7
- ³nÅ骩¥»
- EXCEL 2003
- ¾\ŪÅv
- 20
- ©Ê§O
- ¨k
- µù¥U®É¶¡
- 2017-5-21
- ³Ì«áµn¿ý
- 2023-3-13
|
¥»©«³Ì«á¥Ñ adrian_9832 ©ó 2019-12-15 20:02 ½s¿è
¦pªG·Q²M·¡¤@ÂI ¥i¥Hµ¹¥L ©w©ú ¬O¦r¦êÁÙ¬O¼Æ¦r
¥i¥H§ï¦¨¦p¤U¨Ò¤l , ¦]¬°§Ú¤£¤Óª¾¹D§A¬O·Q ³s±µ¦r¦ê ÁÙ¬Opºâ ©u«×¥N¸¹ .....
Sub Macro10()
¤½¥q¥N¸¹ = 2330
¦~«×¥N¸¹ = 2010
¤ë¥÷¥N¸¹ = 3
If (¤ë¥÷¥N¸¹ = 3 Or 4) Then
'©u«×¥N¸¹ = 2010 - 1 & ³s±µ¦r¦ê 4
'§Y¬O 20094
©u«×¥N¸¹ = ¦~«×¥N¸¹ - 1 & "4"
MsgBox ©u«×¥N¸¹
End If
end sub
¤j®a¤¬¬ÛÀ°§U ¤¬¬Û¥æ¬y ´N¾Ç·|¤F EXCEL¤F ¥[ªo |
|