¿¢¼¿¿¡°Å »çÁø³Ö±â-m  
 ±Û¾´ÀÌ:ÇÇÅ°

, Hit : 2144

¿¹Àü¿¡ ´©°¡ ¾Ë·ÁÁ༭ Àß »ç¿ëÇÏ´ø ±â´ÉÀε¥

¿¢¼¿¿¡ Ä­ ¾È¿¡ »çÁøÀ» ¾ÆÁÖ¾ÆÁÖ ½±°Ô ³Ö´Â ¹æ¹ýÀÌ ÀÖ¾ú´Âµ¥¿ä

÷ºÎ»çÁø ¿ë·®µµ ¾ó¸¶ ¾ÈµÇ°í ÁÁ¾Ò´Âµ¥



¹º°¡ Ãß°¡ ÆÄÀÏÀ» ¹Þ¾Æ¼­ ¼³Ä¡ÇÏ°í ±×·¨´Âµ¥

Çϵµ ¿À·¡µÇ¼­ ±â¾ïÀÌ ¾È³ª³×¿ä



°í¿ë·® »çÁøÀ» ±×´ë·Î ³Ö´Ùº¸´Ï ¿¢¼¿ÆÄÀÏ ¿ë·®ÀÌ ³Ê¹« Ä¿Á®¼­ ¹ö¹÷°Å¸®°í..
Ãßõ:¹è¿ò°¡µå

  ÇÇÅ°
¸Þ·Õ~
Á¤º¸·Â:41380
Ä£Àýµµ:27821

bluejay
Á¤º¸·Â:1510
Ä£Àýµµ:3583
 
12-03 10:19
±×¸² µµ±¸ ³» ¼­½Ä¿¡ ¾ÐÃàÇϱⰡ ÀÖ½À´Ï´Ù. Àú´Â ±×³É Æ÷Åä¿÷½º·Î ¾ÐÃàÇؼ­ »ðÀÔÇÕ´Ï´Ù.
¸¶½ºÅÍ
Á¤º¸·Â:1410
Ä£Àýµµ:1447
 
12-03 10:38
vba ¸¦ ÀÌ¿ëÇؼ­ ³Ö´Â ¹æ¹ýÀÌ ÀÖ½À´Ï´Ù. ¹öÆ°À» ¸¸µé¾îµµ µÇ°í. ´õºíŬ¸¯À¸·Î Çصµ µÇ°í¿ä. . ³×À̹ö °°Àºµ¥¼­. ¿¢¼¿ vba ±×¸²»ðÀÔ °Ë»öÇÏ¸é ¹æ¹ý ³ª¿Ã²¨¿¡¿ä.
²Üµ¹´ëµð
Á¤º¸·Â:3340
Ä£Àýµµ:27621
 
12-03 12:03
VBA¸¦ »ç¿ëÇÏ½Ç ¼ö ÀÖ´Ù¸é ¸ðµâÀ» Çϳª Ãß°¡Çؼ­ ¾Æ·¡ Äڵ带 ºÙ¿©³Ö°í ½ÇÇàÇØ º¸¼¼¿ä.
(¾Æ·¡ ÄÚµå´Â ¿¢¼¿·¯´åÄÄ¿¡¼­ °¡Á®¿Â°ÍÀ¸·Î Á¦°¡ ¼öÁ¤Çؼ­ ´Ã »ç¿ëÇÏ´Â °ÍÀÔ´Ï´Ù.)

Sub ImportImage()

With Selection
x1 = .Left
x2 = .Width
y1 = .Top
y2 = .Height
SF = x2 / y2
End With


Dim strFile As String
Dim sht As Worksheet
Dim pic As Object

Application.ScreenUpdating = True
Set sht = ActiveSheet


strFile = Application.GetOpenFilename(filefilter:="±×¸²ÆÄÀÏ(*.JPG),*.JPG", _
Title:="»ðÀÔÇÒ ±×¸²À» ¼±ÅÃÇϼ¼¿ä//VB0048")

If strFile = "False" Then
MsgBox "¾Æ¹« ±×¸²µµ ¼±ÅõÇÁö ¾Ê¾Ò½À´Ï´Ù", , "http://www.iexceller.com"
Exit Sub
End If

sht.Pictures.Insert(strFile).Select

With Selection
SF2 = .Width / .Height

If SF > SF2 Then
.Top = y1
.Height = y2
.Left = x1 + (x2 - .Width) / 2
Else
.Left = x1
.Width = x2
.Top = y1 + (y2 - .Height) / 2
End If
End With

End Sub


vendetta
Á¤º¸·Â:6860
Ä£Àýµµ:36650
 
12-03 12:58
¼¿ ¼±Åà ÈÄ
¸Þ´º - »ðÀÔ - µµÇü - Á÷»ç°¢Çü
ALT ´©¸£°í ¼¿ Å©±â¿¡ ¸ÂÃç Á÷»ç°¢Çü ±×¸®±â
µµÇü ¼±Åà ÈÄ Ã¤¿ì±â - ±×¸² - ±×¸² ä¿ì±â - ¿øÇÏ´Â À̹ÌÁö ¼±ÅÃ

¿ä¾àÇÏÀÚ¸é
µµÇü -> ±×¸² ä¿ì±â ±â´ÉÀ¸·Î »çÁø³Ö±â°¡ °¡´ÉÇÕ´Ï´Ù.
̵̧:roggy
¸ð¸ù
Á¤º¸·Â:1840
Ä£Àýµµ:5339
 
12-03 13:10
°ü½É ÀÖ´Â ±ÛÀ̾ Á¦ ºí·Î±×¿¡ ½ºÅ©·¦ÇÏ¿´½À´Ï´Ù.°¨»ç^^.
¹è¿ò°¡µå
Á¤º¸·Â:4880
Ä£Àýµµ:15327
 
12-03 13:20
Á¦ ºí·Î±×¿¡ ÆÛ°¥²²¿ä °¨»çÇÕ´Ï´Ù.
µÎ¸ñ
Á¤º¸·Â:3060
Ä£Àýµµ:3653
 
12-03 13:28
Á¦ ºí·Î±×¿¡ ´ã¾Ò½À´Ï´Ù. ÁÁÀº±Û °¨»çÇÕ´Ï´Ù.^^
´ÃóÀ½Ã³·³...
Á¤º¸·Â:2370
Ä£Àýµµ:3018
 
12-03 18:35
Á¦ ºí·Î±×¿¡ ´ã¾Ò½À´Ï´Ù. ÁÁÀº±Û °¨»çÇÕ´Ï´Ù.^^
¹éµÎ»êÀå
Á¤º¸·Â:1430
Ä£Àýµµ:5267
 
12-03 19:17
Á¦ ºí·Î±×¿¡ ÆÛ°¥²²¿ä °¨»çÇÕ´Ï´Ù.
³ªµðµå
Á¤º¸·Â:710
Ä£Àýµµ:595
 
12-03 22:44
Á¦ ºí·Î±×¿¡ ´ã¾Ò½À´Ï´Ù. ÁÁÀº±Û °¨»çÇÕ´Ï´Ù.^^
¹æÄÛ¸Ç
Á¤º¸·Â:200
Ä£Àýµµ:18
 
12-07 10:58
Á¦ ºí·Î±×¿¡ ÆÛ°¥²²¿ä °¨»çÇÕ´Ï´Ù.