µù¥U
µn¿ý
º¶
½×¾Âª©³W
¸T¤î¦Cªí
»¡©ú
¦a¹Ï
¼Æ¦ì®Ñ»
¨p¤H®ø®§ (0)
¤½¦@®ø®§ (0)
½×¾Â¥ô°È (0)
¨t²Î®ø®§ (0)
¦n¤Í®ø®§ (0)
©«¤l®ø®§ (0)
³Â»¶®a±Ú°Q½×ª©ª©
»
Excelµ{¦¡°Ï
» excel ´¡¤J¹Ï¤ù«á,§O¥x¹q¸£µLªk¶}±Ò
ªð¦^¦Cªí
¤U¤@¥DÃD
¤W¤@¥DÃD
µo©«
[µo°Ý]
excel ´¡¤J¹Ï¤ù«á,§O¥x¹q¸£µLªk¶}±Ò
PKKO
µoµu®ø®§
¥[¬°¦n¤Í
PKKO
(PKKO)
·í«eÂ÷½u
UID
14751
©«¤l
549
¥DÃD
152
ºëµØ
0
¿n¤À
691
ª÷¿ú
691
ÂI¦W
0
§@·~¨t²Î
WIN7
³nÅ骩¥»
OFFICE 2010
¾\ŪÅv
50
©Ê§O
¨k
¦b½u®É¶¡
506 ¤p®É
µù¥U®É¶¡
2013-8-10
³Ì«áµn¿ý
2022-9-7
¡@¼ÊºÙ:
PKKO
°ª¤¤¥Í
©«¤l
549
¥DÃD
152
ºëµØ
0
¿n¤À
691
ÂI¦W
0
§@·~¨t²Î
WIN7
³nÅ骩¥»
OFFICE 2010
¾\ŪÅv
50
©Ê§O
¨k
µù¥U®É¶¡
2013-8-10
³Ì«áµn¿ý
2022-9-7
1
#
¸õÂà¨ì
»
˧Ǭݩ«
¥´¦L
¦rÅé¤j¤p:
t
T
µoªí©ó 2015-3-9 10:56
|
¥u¬Ý¸Ó§@ªÌ
[µo°Ý]
excel ´¡¤J¹Ï¤ù«á,§O¥x¹q¸£µLªk¶}±Ò
¥»©«³Ì«á¥Ñ PKKO ©ó 2015-3-9 10:58 ½s¿è
For Each h In arr2
'´¡¤J¹Ï¤ù
Set MyPic = ActiveSheet.Pictures.Insert(myfloder & "PIC\" & E & "\" & h)
'¬°¦ó¤W±ªº¤è¦¡¥un´«¤Fì©l¹Ï¤ùªº¦ì¸m´N·|µLªkÅã¥Ü¹Ï¤ù
'n§ï¬°¦óºØCODE¤~¥i¥H¯u¥¿ªº½Æ»s·Ó¤ù¦ÜEXCEL?
'------------------------------¤U±¬O§Ú¥Ø«eªº¸É±Ï¤è¦¡----------------------------
Num = Num + 1
ActiveSheet.Shapes.Range(Array("Picture " & Num)).Select
Selection.Copy
ActiveSheet.Pictures.Paste.Select
ActiveSheet.Shapes.Range(Array("Picture " & Num)).Delete
Num = Num + 1
'-----------------------------------------------------------------------
Next
½Æ»s¥N½X
¼Ó¥D¼ö©«
¦p¦ó¥Îvbaª¾¹D§@¥ÎÀx¦s®æ&Äæ&¦Cªº¦ì¸m
ExcelÀɮצ³¿ìªk¨¾¤î§O¤H½Æ»s±NÀÉ®×±a¨«¶Ü?
Userform³Ì¤j¤Æ(¥B¤º®e¤ñ¨Ò¦Û°Ê©ñ¤j?)
¦p¦ó²¾°£°}¦C¤º«½Æªº³¡¤À(STRING)
¦³¤Hª¾¹D¥ß¬W¸I¸Ó«ç¼Ëpºâ¶Ü?(±Æ¦C²Õ¦X°ÝÃD
§A¶}±ÒÀɮ׮ɷ|°Ý§A¬O§_n§ó·s¶Ü?¤À¨É¨ú®ø³s
¦p¦ó³z¹LVBAÀH¾÷"¸U¤¤¨ú¤@"(¦ý¤£¯à«½Æ),©â
³Ì§Ö³tªº¤ñ¹ï¸ê®Æ¤è¦¡?
vba¥i§_¤£¥´¶}excelªí§Y¥iª¾¹Da1ªºÈ?
20Ó¬Û¦P¥\¯àComboBox¦p¦ó¥i¥H¬Ù¤u¼¶¼g?
¦¬ÂÃ
¤À¨É
PKKO
lpk187
µoµu®ø®§
¥[¬°¦n¤Í
lpk187
·í«eÂ÷½u
UID
20047
©«¤l
552
¥DÃD
3
ºëµØ
0
¿n¤À
578
ª÷¿ú
578
ÂI¦W
0
§@·~¨t²Î
win7
³nÅ骩¥»
office 2010
¾\ŪÅv
50
©Ê§O
¨k
¦b½u®É¶¡
892 ¤p®É
µù¥U®É¶¡
2015-2-8
³Ì«áµn¿ý
2024-7-9
°ª¤¤¥Í
©«¤l
552
¥DÃD
3
ºëµØ
0
¿n¤À
578
ÂI¦W
0
§@·~¨t²Î
win7
³nÅ骩¥»
office 2010
¾\ŪÅv
50
©Ê§O
¨k
µù¥U®É¶¡
2015-2-8
³Ì«áµn¿ý
2024-7-9
2
#
µoªí©ó 2015-3-9 14:09
|
¥u¬Ý¸Ó§@ªÌ
¦^´_
1#
PKKO
§Ú³£¥ÎADD¤è¦¡©ñ¤J
¨Ò¦p:
¤u§@ªí3.Shapes.AddPicture ThisWorkbook.Path & "1.png", True, True, 70, 360, 230, 145
TOP
PKKO
µoµu®ø®§
¥[¬°¦n¤Í
PKKO
(PKKO)
·í«eÂ÷½u
UID
14751
©«¤l
549
¥DÃD
152
ºëµØ
0
¿n¤À
691
ª÷¿ú
691
ÂI¦W
0
§@·~¨t²Î
WIN7
³nÅ骩¥»
OFFICE 2010
¾\ŪÅv
50
©Ê§O
¨k
¦b½u®É¶¡
506 ¤p®É
µù¥U®É¶¡
2013-8-10
³Ì«áµn¿ý
2022-9-7
¡@¼ÊºÙ:
PKKO
°ª¤¤¥Í
©«¤l
549
¥DÃD
152
ºëµØ
0
¿n¤À
691
ÂI¦W
0
§@·~¨t²Î
WIN7
³nÅ骩¥»
OFFICE 2010
¾\ŪÅv
50
©Ê§O
¨k
µù¥U®É¶¡
2013-8-10
³Ì«áµn¿ý
2022-9-7
3
#
µoªí©ó 2015-3-9 17:17
|
¥u¬Ý¸Ó§@ªÌ
¦^´_
2#
lpk187
³oºØ¤è¦¡n¦p¦ó"¨Æ¥ý"±oª¾¹Ï¤ùªºªø»P¼e©O?
ÁקK¼vÅT¤F·Ó¤ù쥻ªº¤ñ¨Ò!
PKKO
TOP
ÀR«ä¦Û¦b :
¡i°µ¤Hªº¶}©l¡j¨C¤@¤Ñ³£¬O¬G¤Hªº¶}©l¡A¨C¤@Ӯɨ賣¬O¦Û¤vªºÄµ±§¡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¯»µ·