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

[µo°Ý] ½Ð±Ð¦p¦ó ¨Ï¥Îrange ©M Replace ¨ú¥N¯S©w¦r¤¸¡H

[µo°Ý] ½Ð±Ð¦p¦ó ¨Ï¥Îrange ©M Replace ¨ú¥N¯S©w¦r¤¸¡H

§Ú·Q­n¨ú¥N¦r¤¸  $  ¬°¦r¤¸  *
¦Ó¤£¨Ï¥Îfor°j°é¡C½Ð±Ð¦p¦ó¿ë¨ì¡H
ÁÂÁÂ¥ý¶i«ü±Ð~~~~¡C·P®¦¡I

Sub TEST1()  '·|¥X²{«¬ºA¤£²Å¿ù»~°T®§¡C
Range("A1:A35") = Replace(Range("A1:A35"), "$", "*")
End Sub

Sub TEST_2()
For X = 1 To 35
Cells(X, 1) = Replace(Cells(X, 1), "$", "*")
Next X
End Sub


°Ý°ÝÃD.rar (6.02 KB)

¦^´_ 1# ji12345678
  1. Sub TEST1()
  2.     Range("A1:A35").Replace "$", "**"
  3. End Sub
½Æ»s¥N½X
·P®¦ªº¤ß......(¦b³Â»¶®a±Ú°Q½×°Ï.¥Î¤ß¾Ç²ß·|¦³¶i¨Bªº)
¦ý¸ê·½µL­­,«á´©¦³­­,  ¤@¤Ñ1¤¸ªºÃÙ§U,¤H¤H¦³¯à¤O.

TOP

¦^´_ 2# GBKEE


    ¤£¦æ£z@@

TOP

¦^´_ 3# popomilk

TOP

¦^´_ 4# c_c_lai


  ¹ï¤£°_¬O§Ú½k¶î¤F

¦¨¥\¤F ¾Ç¨ì¤F ·PÁ°ª¤â

TOP

        ÀR«ä¦Û¦b : ¤@­Ó¤H¤£©È¿ù¡A´N©È¤£§ï¹L¡A§ï¹L¨Ã¤£Ãø¡C
ªð¦^¦Cªí ¤W¤@¥DÃD