µù¥U
µn¿ý
º¶
½×¾Âª©³W
¸T¤î¦Cªí
»¡©ú
¦a¹Ï
¼Æ¦ì®Ñ»
¨p¤H®ø®§ (0)
¤½¦@®ø®§ (0)
½×¾Â¥ô°È (0)
¨t²Î®ø®§ (0)
¦n¤Í®ø®§ (0)
©«¤l®ø®§ (0)
³Â»¶®a±Ú°Q½×ª©ª©
»
Office¤£¤À°Ï
» EXCEL §Ö³t°Ñ·Ó¤u§@ªí
ªð¦^¦Cªí
¤U¤@¥DÃD
¤W¤@¥DÃD
µo©«
EXCEL §Ö³t°Ñ·Ó¤u§@ªí
sschristy
µoµu®ø®§
¥[¬°¦n¤Í
sschristy
·í«eÂ÷½u
UID
39766
©«¤l
13
¥DÃD
2
ºëµØ
0
¿n¤À
15
ª÷¿ú
15
ÂI¦W
0
§@·~¨t²Î
Windows 11 ±M·~ª©
³nÅ骩¥»
OFFICE 365
¾\ŪÅv
10
©Ê§O
¤k
¦b½u®É¶¡
6 ¤p®É
µù¥U®É¶¡
2023-2-14
³Ì«áµn¿ý
2023-3-21
¤p¾Ç¥Í
©«¤l
13
¥DÃD
2
ºëµØ
0
¿n¤À
15
ÂI¦W
0
§@·~¨t²Î
Windows 11 ±M·~ª©
³nÅ骩¥»
OFFICE 365
¾\ŪÅv
10
©Ê§O
¤k
µù¥U®É¶¡
2023-2-14
³Ì«áµn¿ý
2023-3-21
1
#
¸õÂà¨ì
»
˧Ǭݩ«
¥´¦L
¦rÅé¤j¤p:
t
T
µoªí©ó 2023-3-17 16:38
|
¥u¬Ý¸Ó§@ªÌ
EXCEL §Ö³t°Ñ·Ó¤u§@ªí
·Q½Ð°Ý¦U¦ì«e½ú¡A¦pªG§Ú¦bEXCEL¤º«Ø¤F¤@ÓÁ`ªí¦³10Ó¶µ¥Ø¡AµM«á¦A«Ø¥ß10Ó·s¤u§@ªí¡A²Ä1Ó¤u§@ªín°Ñ·ÓÁ`ªíªºA¦C¡A²Ä2Ó¤u§@ªín°Ñ·ÓÁ`ªíªºB¦C¡A¥H¦¹²Ö±À¡A¦³¨S¦³¤°»ò¤ñ¸û§Ö³tªº¤èªk¥i¥H§¹¦¨©O¡H
¦¬ÂÃ
¤À¨É
³Ì·s JavaScript ºë½o½d¨Ò¦r¨å¡G¹ïÀ³ ECMAScript ·s»yªk³W«h
¡@¡@
³Ì·s HTML5¡DCSS3 ºë½o½d¨Ò¦r¨å (+ RWD §Ö³t¤W¤â)
Andy2483
µoµu®ø®§
¥[¬°¦n¤Í
Andy2483
(«pÁy¥Öªº¾Ç¥Í)
·í«e¦b½u
UID
36777
©«¤l
881
¥DÃD
31
ºëµØ
0
¿n¤À
897
ª÷¿ú
897
ÂI¦W
0
§@·~¨t²Î
Windows 7
³nÅ骩¥»
Excel 2010&2016
¾\ŪÅv
50
©Ê§O
¨k
¨Ó¦Û
¥xÆW
¦b½u®É¶¡
847 ¤p®É
µù¥U®É¶¡
2020-7-15
³Ì«áµn¿ý
2023-6-9
¡@¼ÊºÙ:
«pÁy¥Öªº¾Ç¥Í
°ª¤¤¥Í
©«¤l
881
¥DÃD
31
ºëµØ
0
¿n¤À
897
ÂI¦W
0
§@·~¨t²Î
Windows 7
³nÅ骩¥»
Excel 2010&2016
¾\ŪÅv
50
©Ê§O
¨k
¨Ó¦Û
¥xÆW
µù¥U®É¶¡
2020-7-15
³Ì«áµn¿ý
2023-6-9
2
#
µoªí©ó 2023-3-20 11:14
|
¥u¬Ý¸Ó§@ªÌ
¦^´_
1#
sschristy
ÁÂÁ«e½úµoªí¦¹¥DÃD»P±¡¹Ò
«á¾Ç½m²ßVBAªº¼ÒÀÀ¸Ñ¨M¤è®×»P½d¨Ò¦p¤U,½Ð«e½ú°Ñ¦Ò
EXCEL §Ö³t°Ñ·Ó¤u§@ªí_20230320-1.zip
(24.25 KB)
¤U¸ü¦¸¼Æ: 4
2023-3-20 11:11
°õ¦æ«e:
2023-3-20 11:12
°õ¦æµ²ªG:
2023-3-20 11:13
Option Explicit
Sub TEST()
Application.ScreenUpdating = False
'¡ô¥O¿Ã¹õ¤£ÀHµ{§Ç§@µ²ªGªºÅܤÆ
Dim i&, Sh As Worksheet
'¡ô«Å§iÅܼÆ:i¬Oªø¾ã¼Æ,Sh¬O¤u§@ªíÅܼÆ
Set Sh = ActiveSheet
'¡ô¥OSh³o¤u§@ªíÅܼƬO²{¥Î¤u§@ªí
For i = 1 To 10
'¡ô³]¶¶°j°é!i±q1¨ì 10
With Sheets.Add
'¡ô¥H¤U¬OÃö©ó¼W¥[¤@Ó·s¤u§@ªíªºµ{§Ç
.Name = Sh.Cells(1, i)
'¡ô¥O¤u§@ªí¦W¦r¬O ShÅܼƪº²Ä1¦C²Äi°j°éÄæÀx¦s®æÈ
.Move After:=Sheets(Worksheets.Count)
'¡ô¥O±N¤u§@ªí²¾°Ê¨ì³Ì«á¤@Ó
Sh.Columns(i).Copy .[A1]
'¡ô¥OShÅܼƪº²Ä1Äæ½Æ»s¨ì ¦¹ªí[A1]
End With
Next
Application.Goto Sh.[A1]
'¡ô¥OÀx¦s®æ´å¼Ð¸õ¨ì ShÅܼƪº[A1]
End Sub
¬Ý±oÀ´¬OÀ³¸Óªº,À´±oÀ³¥Î¤~¹³¾Ç¥Í,Áy¥Ö«pÂI¾Ç·|§óÂÔ·V¿n·¥
TOP
ÀR«ä¦Û¦b :
¤Hn¦Û·R¡A¤~¯à·R´¶¤Ñ¤Uªº¤H¡C
ªð¦^¦Cªí
¤U¤@¥DÃD
¤W¤@¥DÃD
EXCEL±MÄݰQ½×°Ï
Excel£¸¯ë°Ï
Excelµ{¦¡°Ï
¶i¶¥À³¥Î±M°Ï
OFFICE ¨t¦C
Word
PowerPoint
Access
Office¤£¤À°Ï
µ{¦¡»y¨¥
VB »P VB.Net
C »P C#
Java »P J#
µ{¦¡³]p¤£¤À°Ï
¸ê®Æ®w
ORACLE
My SQL
MS SQL
ºô¶³]p
ASP »P ASP.NET
PHP
PHP+MySQL ¤Jªù¹ê§@
JavaScript
FLASH / ActionScript
HTM/ HTML/ CSS
ºô¶³]p¤£¤À°Ï
¹q¸£»P§@·~¨t²Î
¹q¸£¦UºØµwÅé°Q½×
¤@¯ë¹q¸£³nÅé°Q½×
½×¾Â¨Æ°È
ºÞ²z¤½§i
§ë¶D¤Ï¬M
·s¤â´ú¸Õ
·R ¡E ¥Í¬¡
¤½¯q§G§iÄæ
¥Í¬¡»P·P°Ê
[¦¬Âæ¹¥DÃD]
[Ãöª`¦¹¥DÃDªº·s¦^´_]
[³q¹L QQ¡BMSN ¤À¨Éµ¹ªB¤Í]
¥Ó½Ð¤Í±¡Ãì±µ
Facebook¯»µ·