ªð¦^¦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 : «H¤ß¡B¼Ý¤O¡B«i®ð¤TªÌ¨ã³Æ¡A«h¤Ñ¤U¨S¦³°µ¤£¦¨ªº¨Æ¡C
ªð¦^¦Cªí ¤W¤@¥DÃD