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

[µo°Ý] ¦p¦óÅã¥ÜÁôÂ꺦C¸ê®Æ

[µo°Ý] ¦p¦óÅã¥ÜÁôÂ꺦C¸ê®Æ

§Úª¾¹D¦p¦ó¨Ï¤å¥ó¤¤¡]«D²Ä¤@¦æ©Î²Ä¤@¦C¡^ÁôÂ꺦æ©Î¦C¨ú®øÁôÂáA¦ý¬O¥H«e¦³­ÓÀɮרϥΤFÁôÂÃ¥\¯à¡A«o¬OÅý²Ä¤@¦C¦Ü²Ä¤­¦C¤£³Q¤H¬Ý¨ì¡A²{¦b·Q¨ú®øÁôÂëo¤£ª¾¦p¦ó«ì´_¬°¥¿±`­¶­±¡H·Ð½Ð¦U¦ì«e½ú½ç±Ð¡AÁÂÁ¡I

ªí®æ¥ª¤W¤è[¦WºÙ¤è¶ô]¤º¿é¤J 1:9¡A´N¥i¥H¿ï¨ú¦C1~¦C9¡A
¦b¤Ï¥Õ°Ï(¿ï¨ú°Ï) «ö¥kÁä ¨ú®øÁôÂÃ
{...} ªí¥Ü»Ý­n¥Î CTRL+SHIFT+ENTER ¤TÁä¿é¤J¤½¦¡

TOP

¥i¸Õ¸Õ¬Ý¦b¦WºÙ¤è¶ô¤¤¿é¤J"1:5"«á¦A«öEnterÁä¡A¦b¨ú®øÁôÂæC¡C

¿ï¾ÜÁôÂæCªº¤è¦¡.jpg (29.03 KB)

¿ï¾ÜÁôÂæCªº¤è¦¡.jpg

George Ma

TOP

¦^´_ 18# owen06
¥i¦p¦¹²M°£¤º®e
  1. Sub Ex()
  2.    With Sheets("ÁôÂæCªº¤u§@ªí")
  3.         .Rows("1:5") = ""
  4.         MsgBox IIf(Application.CountA(.Rows("1:6")) = 0, "²M°£§¹²¦", "ÁÙ¦³¸ê®Æ")
  5.   End With
  6. End Sub
½Æ»s¥N½X
·P®¦ªº¤ß......(¦b³Â»¶®a±Ú°Q½×°Ï.¥Î¤ß¾Ç²ß·|¦³¶i¨Bªº)
¦ý¸ê·½µL­­,«á´©¦³­­,  ¤@¤Ñ1¤¸ªºÃÙ§U,¤H¤H¦³¯à¤O.

TOP

¦^´_ 1# onegirl0204


    §A·íªìÁôÂ꺮ɫá¡A¬O¥Î¤u§@ªí¤W­±ªº¾Þ§@

ÁÙ¬O¨Ï¥Î¤FVBA ¸Ì­±ªº¼vÂáA§A­n¬O¨Ï¥Î¤FVBAªºÁôÂÃ

§Ú°O±o­n¨ì¸Ì­±¥h°µ¨ú®ø¡A¥~­±§A°µ¦A¦h°Ê§@¤]¨S¦³¥Î¡A©Ò¥H³o­ÓÀÉ®×·íªì¬O§A¦Û¤vÁôÂêº???

TOP

­ìpo³Ì¤£¯àÅý¤H¬Ý¨ìªº´N¬OÁôÂêº1~5¦C¡A©Ò¥H´Nºâ¨ä¥L¦a¤è§R±¼¡A¨º¤­¦Cªº¤º®eÁÙ¦b¡A¥L´N¤£¯à¤Wµ¹§O¤H¬Ý@@

TOP

¦³¤@­Ó³]©w¦C¼eªº¦a¤è,§A³]¬°¦Û°Ê½Õ¾ã´N¥i¥H¤F.

§A¥i¥H§âÀɮפº®e²M°£,¥t¦s·sÀÉ ¦A¤W¶Çµ¹¬Ý¬Ý
³o¼Ë´N¤£·|¦³°ÝÃD¤F§a

TOP

¦^´_ 14# GBKEE


¤£¦n·N«ä¡ã¦¹ÀÉÄÝ©ó¾÷±K©Ê¸û°ª¡A¤£«K¤W¶Ç°Õ¡I

TOP

¦^´_ 12# onegirl0204
¦ó¤£¤W¶Ç³oÀɮ׬ݬÝ
·P®¦ªº¤ß......(¦b³Â»¶®a±Ú°Q½×°Ï.¥Î¤ß¾Ç²ß·|¦³¶i¨Bªº)
¦ý¸ê·½µL­­,«á´©¦³­­,  ¤@¤Ñ1¤¸ªºÃÙ§U,¤H¤H¦³¯à¤O.

TOP

¦^´_ 11# GBKEE


­è­è¶i¨ì¥¨¶°ªºVisual Basic½s¿è¾¹¸Ì¬d¬Ý¡AScrollArea­ì¥»´N¬OªÅ¥Õ¨S¦³¥ô¦ó¸ê®Æ§r¡I

§Ú¤]¤£¦n·N«ä¦A³Â·Ð±z¶O¤ß¤F¡A¦]¬°¯uªº«Ü¥È°Õ¡I§Ú¤w¸g©ñ±ó¤£©ê¥ô¦ó§Æ±æ¤F¡I

µL½×¦p¦ó¡A«D±`·PÁ±zÁæ¦Ó¤£±Ë¦a§V¤OÀ°§Ú´M¨D¸Ñ¨M¤èªk¡I

TOP

        ÀR«ä¦Û¦b : ­ì½Ì§O¤H´N¬Oµ½«Ý¦Û¤v¡C
ªð¦^¦Cªí ¤W¤@¥DÃD