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

test

test

test :'(




Sub ¤@Áä²MªÅ()


    Range("B3:U1000").Select
    Range("B3:U1000").Activate
    Selection.FormulaR1C1 = ""
   
   
    Sheets("Àˬd¥¼¦^·Å").Select
    Range("B2").Select
   
    [B1] = ""
        

MsgBox "²M°£§¹¦¨¡I"
   
   
End Sub

        ÀR«ä¦Û¦b : ¤f»¡¦n¸Ü¡B¤ß·Q¦n·N¡B¨­¦æ¦n¨Æ¡C
ªð¦^¦Cªí ¤W¤@¥DÃD