[µo°Ý] §Æ±æ¼Æ¦r 1 Åܦ¨ 0 ¨ä¥L¼Æ¦r¤£ÅÜ

jonn0510

½Ð±Ð¦U¦ì¤j¤j:

­YA1~A10ªº¼Æ¦r¦p¤U

0 2 5 1 1 3 4 5 6 1

§Æ±æ¼Æ¦r 1 Åܦ¨ 0  ¨ä¥L¼Æ¦r¤£Åܦp¤U  ½Ð°Ý¥ÎVBA¸Ó¦p¦ó¼g?ÁÂÁÂ
0 2 5 0 0 3 4 5 6 0

jonn0510

¦^´_ 5# register313


register313 ¦Ñ®v:
­ì¥»§Ú´N¬O»Ý­n§¹¥þ¬Û¦P¤~¨ú¥N,¤£¹L±z¸Ñ»¡ªº«Ü²M·¡,Åý¤p§Ì¦h¾Ç·|¤@©Û.ÁÂÁÂ!

jonn0510

¦^´_ 4# GBKEE

GBKEE ¦Ñ®v:
·PÁ±z!§Ú¤S¦h¾Ç·|¤@©Û.ÁÂÁÂ!

register313

¦^´_ 4# GBKEE

¦r¦ê§¹¥þ¬Û¦P¤~¨ú¥N
  Àx¦s®æ½d³ò.Replace ±ý¨ú¥N¦r¦ê,¨ú¥N«á¦r¦ê, xlWhole

¦r¦ê³¡¥÷¬Û¦P§Y¨ú¥N
  Àx¦s®æ½d³ò.Replace ±ý¨ú¥N¦r¦ê,¨ú¥N«á¦r¦ê, xlPart

·íµM­n¨Ì¹ê»Ú»Ý¨D¨Ó¨M©w¨Ï¥Î¦óºØ¨ú¥N(³o¥u¦³¼Ó¥D¤~ª¾¹D¤F)

·PÁÂGBKEE¤j¤j

GBKEE

¦^´_ 2# register313
0 2 5 1 1 3 4 5 6 1 §Æ±æ¼Æ¦r 1 Åܦ¨ 0  ¨ä¥L¼Æ¦r¤£Åܦp¤U   0 2 5 0 0 3 4 5 6 0   
¼Ó¥D»¡ªº¬O§ó§ï³¡¥÷¦r¦ê     LookAt °Ñ¼Æ¬O      xlPart

1. Sub Ex()
   
2.   Sheets("Sheet1").[A1:A10].Replace 1, 0, xlPart
   
3. End Sub

½Æ»s¥N½X

jonn0510

¦^´_ 2# register313

register313 ¦Ñ®v:
OK!·PÁ±zªº«ü¾É.ÁÂÁÂ

register313

¦^´_ 1# jonn0510

1. Sub Ex()
   
2.   Sheets("Sheet1").[A1:A10].Replace 1, 0, xlWhole
   
3. End Sub

½Æ»s¥N½X