½Ð±Ð¤@Ó§ì¨ú©T©w¦r¼Æ«á¡A«D¬£¨ì¤£¦P¦æªºvba¡C
- ©«¤l
- 209
- ¥DÃD
- 43
- ºëµØ
- 0
- ¿n¤À
- 262
- ÂI¦W
- 0
- §@·~¨t²Î
- win 7
- ³nÅ骩¥»
- office 20**
- ¾\ŪÅv
- 20
- ©Ê§O
- ¨k
- µù¥U®É¶¡
- 2011-11-3
- ³Ì«áµn¿ý
- 2017-4-16
|
½Ð±Ð¤@Ó§ì¨ú©T©w¦r¼Æ«á¡A«D¬£¨ì¤£¦P¦æªºvba¡C
¦U¦ì¤j¤j¦n¡Aªþ¥óÀÉ®×¥]§t¤é¤å¦r¦ê(¥]§t¥°²»P¤ù°²)¡A§Ú¼g¤F¤@¬qVBA¡An¨D±Na1Àx¦s®æªº¤é¤å¦r¦ê¡A¨C35Ó¦r´«¨ì§OªºÀx¦s®æ¡C¦ý§Úµo²{±a¥Xªº¦r¦ê«D§¹¾ã¦r¦ê¡C½Ð°Ý¬O§_¦³»yªk¥i¥H¸Ñ¨M¡H
¯Ê¤Ö¤U¹Ï¬õ®Ø¤ºªº¦r:
ÀɮפU¸ü¡G
¤é¤å ´ú¸Õ.rar (14.37 KB)
|
|
|
|
|
|
|
- ©«¤l
- 1018
- ¥DÃD
- 15
- ºëµØ
- 0
- ¿n¤À
- 1058
- ÂI¦W
- 0
- §@·~¨t²Î
- win7 32bit
- ³nÅ骩¥»
- Office 2016 64-bit
- ¾\ŪÅv
- 50
- ©Ê§O
- ¨k
- ¨Ó¦Û
- ®ç¶é
- µù¥U®É¶¡
- 2012-5-9
- ³Ì«áµn¿ý
- 2022-9-28
|
¦^´_ 1# tku0216
¸Õ¥X¨Ó¤F , °Ñ¦Ò¬Ý¬Ý- Sub sep()
- Dim i As Long, j As Long
- Application.ScreenUpdating = False
-
- For i = 1 To Int(Len([A1]) / 35)
- With Cells(i, "B")
- .Value = Mid([A1], 35 * (i - 1) + 1, 35)
- For j = 1 To 35
- .Characters(j, 1).PhoneticCharacters = [A1].Characters(35 * (i - 1) + j, 1).PhoneticCharacters
- Next
- End With
- Next i
-
- Range("B1:B" & Int(Len([A1]) / 35)).Phonetics.Visible = True
- Application.ScreenUpdating = True
- End Sub
½Æ»s¥N½X |
|
|
|
|
|
|
- ©«¤l
- 1018
- ¥DÃD
- 15
- ºëµØ
- 0
- ¿n¤À
- 1058
- ÂI¦W
- 0
- §@·~¨t²Î
- win7 32bit
- ³nÅ骩¥»
- Office 2016 64-bit
- ¾\ŪÅv
- 50
- ©Ê§O
- ¨k
- ¨Ó¦Û
- ®ç¶é
- µù¥U®É¶¡
- 2012-5-9
- ³Ì«áµn¿ý
- 2022-9-28
|
¸É¥R¤@¤U
Range.Phonetics.Visible = True ¬O¥´¶}ª`µ¼Ð¥ÜÄæ¦ì
|
|
|
|
|
|
|
- ©«¤l
- 209
- ¥DÃD
- 43
- ºëµØ
- 0
- ¿n¤À
- 262
- ÂI¦W
- 0
- §@·~¨t²Î
- win 7
- ³nÅ骩¥»
- office 20**
- ¾\ŪÅv
- 20
- ©Ê§O
- ¨k
- µù¥U®É¶¡
- 2011-11-3
- ³Ì«áµn¿ý
- 2017-4-16
|
³o¦ì¤j¤j·PÁ±zªº¦^ÂСA¥i§_½Ð±Ð±zªºµ{¦¡½X²Ä8~9¦æªº°j°é¬O¦b°õ¦æþ¤@¥ó¨Æ±¡¡H |
|
|
|
|
|
|
- ©«¤l
- 1018
- ¥DÃD
- 15
- ºëµØ
- 0
- ¿n¤À
- 1058
- ÂI¦W
- 0
- §@·~¨t²Î
- win7 32bit
- ³nÅ骩¥»
- Office 2016 64-bit
- ¾\ŪÅv
- 50
- ©Ê§O
- ¨k
- ¨Ó¦Û
- ®ç¶é
- µù¥U®É¶¡
- 2012-5-9
- ³Ì«áµn¿ý
- 2022-9-28
|
¦^´_ 4# tku0216
A1¦r¦ê¤¤¥]§t¤ù°²¦W©Mº~¦r ,
º~¦r¤W¤è¼Ðµùªº¥°²¦W¬O©ñ¦bª`µ¼Ð¥ÜÄæ¦ì , ¥L¤£ÄÝ©ó¦r¦ê¥»¨
¤S¨C¤@Óº~¦rªº¥°²¦W¥i¯à¬°¦hÓ¦r¤¸ , §Yª`µ¼Ð¥Ü¦r¦ê
8,9¦æ¥u¬O¨ú¥X¨CÓ¦rªº"ª`µ¼Ð¥Ü¦r¦ê", ¦Aµ¹¨ìB¤¤¨CÓ¦rªºª`µ¼Ð¥ÜÄæ¦ì |
|
|
|
|
|
|
- ©«¤l
- 209
- ¥DÃD
- 43
- ºëµØ
- 0
- ¿n¤À
- 262
- ÂI¦W
- 0
- §@·~¨t²Î
- win 7
- ³nÅ骩¥»
- office 20**
- ¾\ŪÅv
- 20
- ©Ê§O
- ¨k
- µù¥U®É¶¡
- 2011-11-3
- ³Ì«áµn¿ý
- 2017-4-16
|
¦^´_ tku0216
A1¦r¦ê¤¤¥]§t¤ù°²¦W©Mº~¦r ,
º~¦r¤W¤è¼Ðµùªº¥°²¦W¬O©ñ¦bª`µ¼Ð¥ÜÄæ¦ì , ¥L¤£ÄÝ©ó¦r¦ê¥» ...
stillfish00 µoªí©ó 2012-12-9 19:31
·PÁ¤j¤jªº¦^ÂСA´£¿ô±z¤£¥i¥H¨ú¾ã¼Æ¡A§_«h·|µLªk§ì¨ìµLªk¾ã°£ªº³Ì«á¤@¦æ¡C |
|
|
|
|
|
|