ªð¦^¦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ÂI¤ô¤§®¦¡A¶··í´é¬u¥H³ø¡C
ªð¦^¦Cªí ¤W¤@¥DÃD