ªð¦^¦Cªí ¤W¤@¥DÃD µo©«

[µo°Ý] ¦p¦ó¨Ïµª®×Åܦâ?

[µo°Ý] ¦p¦ó¨Ïµª®×Åܦâ?

§Ú·Q­n³]­p·í¤@­Ó­È¹F¨ìº¡¨¬ªº±ø¥ó«á·|ÅÜÃC¦â!
½Ð°Ý­n¥Î¤°»ò¨ç¼Æ?

¥t¥~¤@­Ó°ÝÃD:
A:³Ì§C­È      B:¤¤¶¡­È     C:³Ì°ª­È
²{¦b§Ú·Q³]·íDªº­È°ª¹LC®É·|¥X²{"¹L¼ö",¦Ó·íD­È¤¶©óBC¥X²{"ĵ§i",·íD¤¶©óAB­È®É¥X²{"¦w¥þ",·íD§C©óA«h¹L§N
½Ð°Ý·í¦³«Ü¦h±ø¥óªº®É­Ô­n«ç»ò¼g?

ÁÂÁÂ
¹G¦Û¤v´N¬O³Ì¤jªº¾Ç²ß°Ê¤O

¦^´_ 1# pisso

¥Î®æ¦¡¤Æ±ø¥ó
ss

TOP

ÁÂÁÂ~ ©Ò¥H¨â­Ó°ÝÃD³£¬O¥Î®æ¦¡¤Æ±ø¥ó¨Ó¸Ñ¨M´N¹ï¤F?
¹G¦Û¤v´N¬O³Ì¤jªº¾Ç²ß°Ê¤O

TOP

¦^´_ 3# pisso

¥t¤@­Ó
  1. Sub Testtes()
  2. With ActiveSheet
  3. If .Range("D2") > .Range("C2") Then
  4. MsgBox ("too hot")
  5. ElseIf (.Range("D2") > .Range("B2") And .Range("C2") > .Range("D2")) Then
  6. MsgBox ("warning")
  7. ElseIf (.Range("D2") > .Range("A2") And .Range("B2") > .Range("D2")) Then
  8. MsgBox ("safe")
  9. Else: MsgBox ("too cold")
  10. End If
  11. End With
  12. End Sub
½Æ»s¥N½X

TOP

[µo°Ý] ¦p¦ó¨Ïµª®×Åܦâ?

§Ú·Q­n³]­p·í¤@­Ó­È¹F¨ìº¡¨¬ªº±ø¥ó«á·|ÅÜÃC¦â!
½Ð°Ý­n¥Î¤°»ò¨ç¼Æ?

¦^ÂÐ: ¨Ï¥Î®æ¦¡¤Æ±ø¥ó

¥t¥~¤@­Ó°ÝÃD:
A:³Ì§C­È      B:¤¤¶¡­È     C:³Ì°ª­È
²{¦b§Ú·Q³]·íDªº­È°ª¹LC®É·|¥X²{"¹L¼ö",¦Ó·íD­È¤¶©óBC¥X²{"ĵ§i",·íD¤¶©óAB­È®É¥X²{"¦w¥þ",·íD§C©óA«h¹L§N
½Ð°Ý·í¦³«Ü¦h±ø¥óªº®É­Ô­n«ç»ò¼g?

¦^ÂÐ:
­Y¬O¤@Ãä¿é¤J­n¤Î®É´£¿ô´N¥Î ¸ê®ÆÅçÃÒ
­Y¬O·í®æÅã¥Ü°Ï§O¡A¥i¥H¨Ï¥Î®æ¦¡¤Æ±ø¥ó¥HÃC¦â°Ï¤À
­Y­n¨ä¥L®æÅã¥Ü¤å¦rĵ§i¡A¥ÎIF¨ç¼Æ´N¥i
{...} ªí¥Ü»Ý­n¥Î CTRL+SHIFT+ENTER ¤TÁä¿é¤J¤½¦¡

TOP

        ÀR«ä¦Û¦b : ¦h°µ¦h±o¡C¤Ö°µ¦h¥¢¡C
ªð¦^¦Cªí ¤W¤@¥DÃD