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

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

¦^´_ 10# owen06
  1. Option Explicit
  2. Sub Ex()  ''¦p¤u§@ªí¨S¦³³]©w«OÅ@: °õ¦æ³oµ{¦¡
  3.         ActiveSheet.ScrollArea = ""
  4. End Sub
½Æ»s¥N½X
©Î¦p¹Ï

·P®¦ªº¤ß......(¦b³Â»¶®a±Ú°Q½×°Ï.¥Î¤ß¾Ç²ß·|¦³¶i¨Bªº)
¦ý¸ê·½µL­­,«á´©¦³­­,  ¤@¤Ñ1¤¸ªºÃÙ§U,¤H¤H¦³¯à¤O.

TOP

¥»©«³Ì«á¥Ñ onegirl0204 ©ó 2013-7-16 21:57 ½s¿è

¦^´_ 10# owen06

¤£ºÞÂIÄæ©Î¦C³£·|¥X²{ÁôÂûP¨ú®øÁôÂ꺥\¯à¡A¥i±¤ÂI¿ï¨ú®øÁôÂëo¤´µMµLªkÅã¥Ü·íªì³QÁôÂ꺦C¸ê®Æ§r¡I
¦Ü©ó±z´£ªº«OÅ@¥\¯à¡A¦Ñ¹ê»¡§Ú¤£·|¥Î¤]¥¼´¿¨Ï¥Î¹L¡A©Ò¥H¤u¨ã¡Ð«OÅ@©³¤U·íµM§ä¤£¨ì¨ú®ø«OÅ@ªº¥\¯àÅo¡I

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

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

TOP

¦^´_ 14# GBKEE


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

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

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

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

¦^´_ 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

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

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

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

George Ma

TOP

        ÀR«ä¦Û¦b : ¤£­n¤p¬Ý¦Û¤v¡A¦]¬°¤H¦³µL­­ªº¥i¯à¡C
ªð¦^¦Cªí ¤W¤@¥DÃD