½Ð°Ý¦p¦ó²M°£¦r¦ê«e±ªº"0"
- ©«¤l
- 49
- ¥DÃD
- 3
- ºëµØ
- 0
- ¿n¤À
- 74
- ÂI¦W
- 0
- §@·~¨t²Î
- windows
- ³nÅ骩¥»
- XP
- ¾\ŪÅv
- 20
- ©Ê§O
- ¨k
- ¨Ó¦Û
- ¶³ªL
- µù¥U®É¶¡
- 2014-2-13
- ³Ì«áµn¿ý
- 2020-9-18
|
§Ú·Q¨ìªº¤èªk¬O¨Ï¥ÎVBA Function
°µªk¬O¥ý¦bVBA¼Ò²Õ¤¤·s¼W¤@Ófunction(¦p¤U)- Function DIn0(x As String) As String
- xindex = Len(x)
- Do
- If Left(x, 1) = 0 Then
- x = Right(x, xindex - 1)
- xindex = xindex - 1
- End If
- Loop Until Left(x, 1) <> "0"
- DIn0 = x
- End Function
½Æ»s¥N½X ±µµÛ¦bÀx¦s®ækeyin
=DIn0(A1)
´N¦æ¤F
§Ú°µ¦nªºÀɮצp¤U
https://onedrive.live.com/redir?resid=6CB845AED0C935E7%21175 |
|
°Ê©À¦¨¦]¿n¦]¦¨ªG by huijuang
|
|
|
|
|
- ©«¤l
- 49
- ¥DÃD
- 3
- ºëµØ
- 0
- ¿n¤À
- 74
- ÂI¦W
- 0
- §@·~¨t²Î
- windows
- ³nÅ骩¥»
- XP
- ¾\ŪÅv
- 20
- ©Ê§O
- ¨k
- ¨Ó¦Û
- ¶³ªL
- µù¥U®É¶¡
- 2014-2-13
- ³Ì«áµn¿ý
- 2020-9-18
|
·PÁÂnewlink
¤§«e§Ú§¹¥þ¨S·Q¹L¨Ï¥Î¡u¸ê®ÆåªR¡÷¤À®æ²Å¸¹¡v
¦]¬°¨Ï¥Îfunction¬O¦³¯ÊÂIªº
¥¦³Ì¤jªº¯ÊÂI´N¬O®e©ö³y¦¨excelÅܺC
©Ò¥H¥±`§Ú¤]¬O¾¨¶q¤Ö¥Îfunction |
|
°Ê©À¦¨¦]¿n¦]¦¨ªG by huijuang
|
|
|
|
|