±±¾©Ê¯ÓÍ»¯¹¤Ñ§Ôº2026ÄêÑо¿ÉúÕÐÉú½ÓÊÕµ÷¼Á¹«¸æ
²é¿´: 1258  |  »Ø¸´: 3
µ±Ç°Ö»ÏÔʾÂú×ãÖ¸¶¨Ìõ¼þµÄ»ØÌû£¬µã»÷ÕâÀï²é¿´±¾»°ÌâµÄËùÓлØÌû

zhangyj1257

гæ (³õÈëÎÄ̳)

[ÇóÖú] ÈçºÎÔÚexcelÖÐʵÏÖ£º³ÉÅúÁ¿²éÕÒ×Ö·û´®ÖÐÖ¸¶¨Î»ÖõÄ×Ö·û£¬²¢±êΪºìÉ« ÒÑÓÐ2È˲ÎÓë

¸÷λ´óÏÀ£¬

ÏëÇë½Ìһϴó¼Ò£¬ÈçºÎÔÚexcelÖÐʵÏÖ£º³ÉÅúÁ¿²éÕÒ×Ö·û´®ÖÐÖ¸¶¨Î»ÖõÄ×Ö·û£¬²¢½«²éÕÒµ½µÄ×Ö·û±êΪºìÉ«¡£

ÈçͼËùʾ£ºÁÐ1ÖÐÓÐÉÏÍòÐдý²éÕÒµÄ×Ö·û´®£¬ÁÐ2ÖÐÊÇÏëÒªÔÚÁÐ1×Ö·û´®ÖÐÖвéÕÒµÄλÖá£ÏëҪʵÏÖµÄÄ¿µÄ£ºÔÚÁÐ1ÖвéÕÒÁÐ2Ö¸¶¨Î»ÖõÄ×Ö·û£¬²¢ÓúìÉ«±ê³ö£¨Í¼ÖÐËùʾºìɫΪÎÒ×Ô¼ºÊÖ¶¯±ê³öµÄ£©¡£

²»ÖªµÀ´ó¼ÒÓÐûÓÐʲôºÃµÄ°ì·¨£¬¿ÒÇë¸÷λ´óÏÀ°ïÎÒ³ö³öÖ÷Ò⣬·Ç³£·Ç³£·Ç³£¸Ðл´ó¼Ò£¡£¡£¡

ÈçºÎÔÚexcelÖÐʵÏÖ£º³ÉÅúÁ¿²éÕÒ×Ö·û´®ÖÐÖ¸¶¨Î»ÖõÄ×Ö·û£¬²¢±êΪºìÉ«
example.PNG
»Ø¸´´ËÂ¥

» ²ÂÄãϲ»¶

» ±¾Ö÷ÌâÏà¹Ø¼ÛÖµÌùÍÆ¼ö£¬¶ÔÄúͬÑùÓаïÖú:

ÒÑÔÄ   »Ø¸´´ËÂ¥   ¹Ø×¢TA ¸øTA·¢ÏûÏ¢ ËÍTAºì»¨ TAµÄ»ØÌû

deephill

Ìú¸Ëľ³æ (Ö°Òµ×÷¼Ò)

¡¾´ð°¸¡¿Ó¦Öú»ØÌû

¸Ðл²ÎÓ룬ӦÖúÖ¸Êý +1
Â¥ÉϵĺܺÃ
ÎÒÂ¼ÖÆÁ˸övba £¬ÐÞ¸ÄÁËÏ£¬Ò²¿ÉÒÔ¡£
Äã°ÑÏÂÃæµÄvba ´úÂëÌù½øÈ¥Ò²¿ÉÒÔ£¬ÄãÒ²¿ÉÒÔ¸ù¾ÝÇé¿ö×Ô¼ºÐ޸ġ£

'===============================
Sub Macro1()
'
' Macro1 Macro
For i = 1 To Range("a65536".End(xlUp).Row
'' ×Ö·û´®·ÅÔÚ  A  ÁУ¬¿ªÊ¼±äºìµÄλÖÃÊý¾Ý ·ÅÔÚ B  ÁС£
    Range("A" & i).Select
    ActiveCell.FormulaR1C1 = Range("A" & i).Value
    With ActiveCell.Characters(Start:=Range("B" & i).Value, Length:=1).Font
        .Name = "Arial"
        .FontStyle = "³£¹æ"
        .Size = 10
        .Strikethrough = False
        .Superscript = False
        .Subscript = False
        .OutlineFont = False
        .Shadow = False
        .Underline = xlUnderlineStyleNone
        .Color = -16776961
        .TintAndShade = 0
        .ThemeFont = xlThemeFontNone
    End With

Next i
End Sub
'==================
3Â¥2015-02-08 21:04:50
ÒÑÔÄ   »Ø¸´´ËÂ¥   ¹Ø×¢TA ¸øTA·¢ÏûÏ¢ ËÍTAºì»¨ TAµÄ»ØÌû
²é¿´È«²¿ 4 ¸ö»Ø´ð

me_yu

ľ³æ (ÕýʽдÊÖ)

¡¾´ð°¸¡¿Ó¦Öú»ØÌû

¸Ðл²ÎÓ룬ӦÖúÖ¸Êý +1
½âѹÔËÐÐNPOI_Test.exe,È»ºóÔÙ´ò¿ªTest.xls¿´Ð§¹û

» ±¾Ìû¸½¼þ×ÊÔ´Áбí

  • »¶Ó­¼à¶½ºÍ·´À¡£ºÐ¡Ä¾³æ½öÌṩ½»Á÷ƽ̨£¬²»¶Ô¸ÃÄÚÈݸºÔð¡£
    ±¾ÄÚÈÝÓÉÓû§×ÔÖ÷·¢²¼£¬Èç¹ûÆäÄÚÈÝÉæ¼°µ½ÖªÊ¶²úȨÎÊÌ⣬ÆäÔðÈÎÔÚÓÚÓû§±¾ÈË£¬Èç¶Ô°æÈ¨ÓÐÒìÒ飬ÇëÁªÏµÓÊÏ䣺xiaomuchong@tal.com
  • ¸½¼þ 1 : OK.zip
  • 2015-02-08 00:15:39, 547.21 K
Ìý£¬¼Å¾²µÄÒ¹ÀÌïÒ°ÀïÍÜÉùºÍ³æÃù£¬ºÃ²»»¶¿ì£¡
2Â¥2015-02-08 00:16:50
ÒÑÔÄ   »Ø¸´´ËÂ¥   ¹Ø×¢TA ¸øTA·¢ÏûÏ¢ ËÍTAºì»¨ TAµÄ»ØÌû

deephill

Ìú¸Ëľ³æ (Ö°Òµ×÷¼Ò)

ЦÁ³´¦ Ϊ Ó¢ÎÄµÄ ÓÒÀ¨ºÅ¡£
4Â¥2015-02-08 21:06:02
ÒÑÔÄ   »Ø¸´´ËÂ¥   ¹Ø×¢TA ¸øTA·¢ÏûÏ¢ ËÍTAºì»¨ TAµÄ»ØÌû
×î¾ßÈËÆøÈÈÌûÍÆ¼ö [²é¿´È«²¿] ×÷Õß »Ø/¿´ ×îºó·¢±í
[¿¼ÑÐ] Ò»Ö¾Ô¸¹þ¶û±õ¹¤Òµ´óѧ²ÄÁÏÓ뻯¹¤·½Ïò336·Ö +7 ³½ãå5211314 2026-03-26 7/350 2026-03-28 10:09 by lbsjt
[¿¼ÑÐ] 321Çóµ÷¼Á +5 è±Óñ~~ 2026-03-25 5/250 2026-03-28 08:27 by Iveryant
[¿¼ÑÐ] 329Çóµ÷¼Á +5 ÐÇÒ°? 2026-03-26 5/250 2026-03-28 08:17 by Iveryant
[¿¼ÑÐ] 0703»¯Ñ§/290Çóµ÷¼Á/±¾¿Æ¾­Àú·á¸»/¹¤¿ÆÒ²¿É +9 µ¤ÇàÄÌ¸Ç 2026-03-26 10/500 2026-03-28 07:45 by barnett0632
[¿¼ÑÐ] 085701»·¾³¹¤³ÌÇóµ÷¼Á +9 ¶à¾ÃÉϿΠ2026-03-27 9/450 2026-03-28 03:58 by fmesaito
[¿¼ÑÐ] 352·Ö »¯¹¤Óë²ÄÁÏ +5 º£Äɰٴ¨Ly 2026-03-27 5/250 2026-03-28 03:39 by fmesaito
[¿¼ÑÐ] һ־Ը̫ԭÀí¹¤°²È«¹¤³Ì300·Ö£¬Çóµ÷¼Á +4 0857Çóµ÷¼Á. 2026-03-24 4/200 2026-03-27 14:03 by ¾²¾²¾²¾²¾²¾²¾²¾
[¿¼ÑÐ] Çóµ÷¼Á +3 Áõ¿Â@ 2026-03-24 4/200 2026-03-27 11:28 by shangxh
[¿¼ÑÐ] 292Çóµ÷¼Á +4 ÇóÇóÁËÊÕÏÂÎÒ°É£ 2026-03-26 4/200 2026-03-27 10:37 by zhshch
[¿¼ÑÐ] 071000ÉúÎïѧÇóµ÷¼Á£¬³õÊԳɼ¨343 +6 ССÌðÃæÍÅ 2026-03-25 6/300 2026-03-26 23:01 by ²»³Ôô~µÄ؈
[¿¼ÑÐ] 340Çóµ÷¼Á +3 Amber00 2026-03-26 3/150 2026-03-26 18:57 by ²»³Ôô~µÄ؈
[¿¼ÑÐ] »úеѧ˶×Ü·Ö317Çóµ÷¼Á£¡£¡£¡£¡ +4 Acaciad 2026-03-25 4/200 2026-03-25 19:59 by hanserlol
[¿¼ÑÐ] ÍøÂç¿Õ¼ä°²È«0839Õе÷¼Á +4 w320357296 2026-03-25 6/300 2026-03-25 17:59 by 255671
[¿¼ÑÐ] 0854µç×ÓÐÅÏ¢Çóµ÷¼Á +7 ¦Á____ 2026-03-22 9/450 2026-03-25 13:37 by ¦Á____
[¿¼ÑÐ] 086003ʳƷ¹¤³ÌÇóµ÷¼Á +6 íµíµ111 2026-03-24 6/300 2026-03-25 10:29 by 3Strings
[¿¼ÑÐ] »¯Ñ§µ÷¼Á +6 yzysaa 2026-03-21 6/300 2026-03-25 09:27 by aa331100
[¿¼ÑÐ] Ò»Ö¾Ô¸ÎäÀí085500»úеרҵ×Ü·Ö300Çóµ÷¼Á +3 an10101 2026-03-24 7/350 2026-03-25 00:00 by ɽ¹í0-
[¿¼ÑÐ] ÇóÀÏʦÊÕÎÒ +3 zzh16938784 2026-03-23 3/150 2026-03-23 12:56 by ztnimte
[¿¼ÑÐ] 293Çóµ÷¼Á +3 ÌÎÌÎWjt 2026-03-22 5/250 2026-03-22 22:21 by jiangpengfei
[¿¼ÑÐ] ²ÄÁÏѧ˶301·ÖÇóµ÷¼Á +7 Liyouyumairs 2026-03-21 7/350 2026-03-21 22:31 by peike
ÐÅÏ¢Ìáʾ
ÇëÌî´¦ÀíÒâ¼û