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

¦p¦ó¦b¶}±ÒÀɮ׮ɴå¼Ð©T©w¦b¬Y¤@Àx¦s®æ

¦^´_ 8# p212


¥Ø¼Ð¡G¦b«D¬°¡u»¡©ú¡v¤u§@ªí¤§ÀH¾÷ªºÀx¦s®æ°õ¦æ¦sÀÉ¡BÃöÀÉ¡A¤§«á¦A«×¶}±ÒÀɮסAµe­±´å¼Ð±N©T©w©ó¡u»¡©ú¡v¤u§@ªíªºB3Àx¦s®æ¡C

¨Ï¥Î 2# ªº»¡©ú¤è¦¡´N¥i
Private Sub workbook_Open()
    With Sheets("»¡©ú")
        .Activate
        .Range("B3").Activate
    End With
End Sub
{...} ªí¥Ü»Ý­n¥Î CTRL+SHIFT+ENTER ¤TÁä¿é¤J¤½¦¡

TOP

        ÀR«ä¦Û¦b : ¸Ü¦h¤£¦p¸Ü¤Ö¡A¸Ü¤Ö¤£¦p¸Ü¦n¡C
ªð¦^¦Cªí ¤W¤@¥DÃD