SkyBear

¦^´_ 10# mamimumemo

¤U¸ü (57.76 KB)

2016-12-7 08:51

¤£¦n·N«ä³Ìªñ¤ñ¸û¦£¡A¨ä¹ê³o¥Îªk«Ü²³æ¡A¨Ì·Ó¤W¹Ï¨Ó»¡¡A¥Î¤@¦æ¤½¦¡´N¥i¥H¤F¡A¦ý§Ú¥Ø«e¤£¯à§ì¨ú¦b¥kÃ䪺ª`­µ¡A¥u¯à§ì¤å¦r¤W­±ªº¸ê®Æ¡@¡@

mamimumemo

¤U¸ü (4.34 KB)

2016-12-8 05:55

§Ú¸Õ¹L¤F¡A¯uªº¥i¥H­C¡C:lol
¦³·N«ä¡I¡I

¥u¬Oª`­µ³£¥²¶·­n¤â°Ê¤@­Ó¤@­Ó¥´¤W¥h ¡A¯uªº«Ü¤£¤è«K¡C><"

ª`­µ¦b¥kÃ䪺¡A¯uªº§ì¤£¨ìª`­µ²Å¸¹¡A¥u§ì±o¨ì¤å¦r¡C:(

mamimumemo

§Ú·Q¨ì¤@¥ó¨Æ¡A¥i¥H¥Î¥¨¶°¿ý»s¡A¬Ý¥¦ªºµ{¦¡½X«ç»ò¼g¡A
§Ú¿ý¤F¤@¬q¡A¥i¥Hµ¹§A°Ñ¦Ò¬Ý¬Ý¡G
¡y
    ActiveCell.FormulaR1C1 = "«È"
    Range("A1").Select
    ActiveCell.FormulaR1C1 = "«È"
    ActiveCell.Characters(1, 1).PhoneticCharacters = "£}£­£¿ "
    Range("D1").Select
    ActiveCell.FormulaR1C1 = "=MID(PHONETIC(RC[-3]),1,1)"
    Range("D2").Select
¡z
»¡¤£©w¥i¥Hµ¹§A¤@ÂI±Òµo¡C^^

mamimumemo

1.     Selection.Phonetics.Visible = True
   
2.     With Selection.Font
   
3.         .Name = "¤ýº~©v¤¤·¢Åéª`­µ"
   
4.         .Size = 12
   
5.         .Strikethrough = False
   
6.         .Superscript = False
   
7.         .Subscript = False
   
8.         .OutFont = False
   
9.         .Shadow = False
   
10.         .Under = xlUnderStyleNone
    
11.         .ThemeColor = xlThemeColorLight1
    
12.         .TintAndShade = 0
    
13.         .ThemeFont = xlThemeFontNone
    
14.     End With

½Æ»s¥N½X

³o¤@¬q¬O¡A§Ú¿ï¾Ü¦r«¬®É¡A¥X²{¦bµ{¦¡½X¤ù¬q¡C
§¹¥þ¬Ý¤£¨ì¦³¥ô¦óªºª`­µ²Å¸¹¡A¤£ª¾¹D¡A¥¦¬O¥Î¤°»ò¤è¦¡¡AÅã²{ª`­µªº¡C><"

SkyBear

¦^´_ 12# mamimumemo

ª`­µªº³¡¤À§Ú³£¬O¥Îwordªº¥\¯àÂà¥X¨Óªº,
³o¬O¥Ø«e¸Õ¥X¨Ó³Ì§Öªº¤èªk ^^

SkyBear

¦^´_ 13# mamimumemo



ActiveCell.Characters(1, 1).PhoneticCharacters = "£}£­£¿ "
³o¤@¬qÀ³¸Ó¬O­n¦Û¤v¿é¤Jªº§a?

mamimumemo

¦^´_ 16# SkyBear

¬O§r¡I
§Ú¤]¦³¦b·Q¡A¦³¨S¦³¤°»ò¥i¥H¦Û°Êªº¤èªk¡A
µ{¦¡½X¯à°÷¦Û°Ê¿ëÃÑ¥Xª`­µ²Å¸¹¡AµM«á§â¥¦¼g¶i¥h¡C
¦³­Óºô­¶´N¯à°÷°µ¨ì³o­Ó¥\¯à
https://www.chineseconverter.com/zh-tw/convert/zhuyin
¤£ª¾¥¦¸Ì­±ªº¾÷¨î(µ{¦¡âó¬O«ç»ò¶]ªº)¬O«ç»ò¼Ë¡H¡H

SkyBear

¦^´_ 17# mamimumemo

³o¬O¤@­Ó¦nºô¯¸¡A§Ú¦b·Q³Ì§Öªº¤è¦¡´N¬O¡G¸ê®Æ®w
§Q¥Î¸ê®Æ¤ñ¹ï¸ê®Æ®w¡A¨q¥X¬Û¹ïÀ³ªºª`­µ¡I¡I

mamimumemo

¦^´_ 18# SkyBear

³o­Ó¤èªk¡A¤£¿ù³á¡I

¥u¬O¡A³o­Ó¸ê®Æ®w¡A·|«ÜÃe¤j®@¡I
­n§â«Ü¦hªº°ê¦r¤Î°ê¦rªºª`­µ³£¯Ç¶i¥h
¦A§Q¥Î¤ñ¹ïªº¤è¦¡¡A§ä¥X¸Ó°ê¦r¦s¦b¦¹¸ê®Æ®wªºª`­µ¡C

³oªº½T¬O¤@­Ó¦n¤èªk¡C
¥u¬O¤£ª¾¹D¨C­Ó¦r³£­n¥h¸ê®Æ®w¸Ì¤ñ¹ï¡A·|¤£·|«Ü®øÓN®É¶¡©O¡H
ÁÙ¦³³o­Ó¸ê®Æ®w­n«ç»ò¯à°÷§Ö³t¦a«Ø°_¨Ó©O¡H

lpk187

¦^´_ 19# mamimumemo


    ª`­µ¦r¨å¸ê®Æ®w¨ä¹ê¨Ã¤£·|Ãe¤j¡A­Y¥HC#¨Ó«Ø¥ßª`­µ¦r¨å¤]¤£¬O«Ü§xÃøªº¨Æ¡C
¤U­±ÀɮסA¥u´£¨Ñ³¡¥÷¸ê®Æ®w(®¤¤£´£¨Ñ§¹¾ã¸ê®Æ®w)¡A¨ä¹ê¥¦´N¬O¤@­Ó¤å¦rÀɮצӤw
Debug.rar (9.64 KB)

¤U¸ü¦¸¼Æ: 1

2017-1-17 00:25