Àx¦s®æ¤º¿ï¨ú"-"¤§«e¤Î¤§«áªº¦r²´¡C
- ©«¤l
- 12
- ¥DÃD
- 6
- ºëµØ
- 0
- ¿n¤À
- 19
- ÂI¦W
- 0
- §@·~¨t²Î
- window 7
- ³nÅ骩¥»
- Excel 2013
- ¾\ŪÅv
- 10
- µù¥U®É¶¡
- 2015-7-15
- ³Ì«áµn¿ý
- 2022-2-2
|
Àx¦s®æ¤º¿ï¨ú"-"¤§«e¤Î¤§«áªº¦r²´¡C
A1 Àx»W®æ¤º:
suiji008ker-suiji5656----¸j©wÂI¼Æ¡G¢¯¦W¦r¡G¦Ñ¦ò·Ýªí¥Ü¾§¦n«Ó µ¥¯Å¡G¢²¢¯¾Ô°«¤O¡G5,727 ¬q¦ì¡G»ÈµP¢×¢ä
¦U¦ì¤j¤j§A̦n¡A§Ú·Q¦bA1¤¤¡A¿ï¨úsuiji008ker ªº¦r ¶K¨ì B1¤¤ ¡A¤§«á·Q¿ï¨úsuiji5656ªº¦r¶K¦bC1 ¤¤¡C
¥i¥H§P©w¬O"-" «e±ªº¦r²´ ¤Î"----"«eªº¦r²´¡C
§Ú¥Î¤FFOR NEXT ¦ýµ²ªG¨«¤£³q¡A¦b³oÓ¹Lµ{¤¤§Ú³]©w¤F¶W¹L3ÓÅܼƥh°µFOR NEXT ..µ²ªG.....
§Æ±æ¤j¤j¥i¥H¥Î¤@Ó¤ñ¸û²©öªº¤èªk±Ð¤@±Ð¤p§Ì~·P¿E¸U¤À |
|
|
|
|
|
|
- ©«¤l
- 2025
- ¥DÃD
- 13
- ºëµØ
- 0
- ¿n¤À
- 2053
- ÂI¦W
- 0
- §@·~¨t²Î
- WIN7
- ³nÅ骩¥»
- Office2007
- ¾\ŪÅv
- 100
- ©Ê§O
- ¨k
- ¨Ó¦Û
- ¥x¥_¥«
- µù¥U®É¶¡
- 2011-3-2
- ³Ì«áµn¿ý
- 2024-3-14
|
¦^´_ 1# tc1701
Sub ex()
For i = 1 To Cells(Rows.Count, 1).End(xlUp).Row
Cells(i, 2).Resize(, 2) = Split(Cells(i, 1), "-")
Next
End Sub |
|
{...} ªí¥Ü»Ýn¥Î CTRL+SHIFT+ENTER ¤TÁä¿é¤J¤½¦¡
|
|
|
|
|
- ©«¤l
- 12
- ¥DÃD
- 6
- ºëµØ
- 0
- ¿n¤À
- 19
- ÂI¦W
- 0
- §@·~¨t²Î
- window 7
- ³nÅ骩¥»
- Excel 2013
- ¾\ŪÅv
- 10
- µù¥U®É¶¡
- 2015-7-15
- ³Ì«áµn¿ý
- 2022-2-2
|
¦^´_ 2# ML089
Á¤j¤j¡A
·Q°Ý¤@¤U¬°¤°»òn¥Î¨ìRESIZE? ¦ÓRESIZE (,2) ¬O¤°»ò·N«ä? |
|
|
|
|
|
|
- ©«¤l
- 2025
- ¥DÃD
- 13
- ºëµØ
- 0
- ¿n¤À
- 2053
- ÂI¦W
- 0
- §@·~¨t²Î
- WIN7
- ³nÅ骩¥»
- Office2007
- ¾\ŪÅv
- 100
- ©Ê§O
- ¨k
- ¨Ó¦Û
- ¥x¥_¥«
- µù¥U®É¶¡
- 2011-3-2
- ³Ì«áµn¿ý
- 2024-3-14
|
RESIZE (,2) ¬O¤°»ò·N«ä?
RESIZE (,2)´N¬O½d³ò¼W¥[¬°2Äæ
Cells(i, 2).Resize(, 2) ´N¬O RANGE(Cells(i, 2), Cells(i, 3))
Cells(i, 2).Resize(, 3) ´N¬O RANGE(Cells(i, 2), Cells(i, 4))
Cells(i, 2).Resize(, 4) ´N¬O RANGE(Cells(i, 2), Cells(i, 5))
´å¼Ð²¾¦Ü Resize «öF1 ´N¯à¬Ý¨ì»¡©ú |
|
{...} ªí¥Ü»Ýn¥Î CTRL+SHIFT+ENTER ¤TÁä¿é¤J¤½¦¡
|
|
|
|
|
- ©«¤l
- 12
- ¥DÃD
- 6
- ºëµØ
- 0
- ¿n¤À
- 19
- ÂI¦W
- 0
- §@·~¨t²Î
- window 7
- ³nÅ骩¥»
- Excel 2013
- ¾\ŪÅv
- 10
- µù¥U®É¶¡
- 2015-7-15
- ³Ì«áµn¿ý
- 2022-2-2
|
¦^´_ 4# ML089
©ú¥Õ¤F~ÁÂÁ§A~§Ú·|¦h¬Ý¬Ý»¡©ú¦Aµo°Ý!!¤S¤W¤F¤@½Ò°ó~·P®¦ |
|
|
|
|
|
|