![[경기]Interneeds™](http://www.kiasportage.net/files/member_extra_info/profile_image/896/860/008/8860896.gif?20110823172625)
자유 이젠 진짜 폐인이 됐나봄돠~
- [경기]Interneeds™
- 조회 수 92
- 2005.02.15. 20:29
어제 회사에 자리를 비워서..
일이 엄청 밀려 버린 관계로..
저녁을 먹고.. 야근or밤샘을 계획하고..
회사를 나왔는데..
안켜도 될 컴터를 켜서는..
주소창에 다가..
--- 이하 슬로우 비디오 모션으로 ---
http://w
http://ww
http://www
http://www.
http://www.k
http://www.ki
http://www.kia
http://www.kias
http://www.kiasp
http://www.kiaspo
http://www.kiaspor
http://www.kiasport
http://www.kiasporta
http://www.kiasportag
http://www.kiasportage
http://www.kiasportage.
http://www.kiasportage.n
http://www.kiasportage.ne
http://www.kiasportage.net
--- 요기까지 ---
이러고 있으니..
제정신인지..
에휴~~~
댓글
9
![[경기]Interneeds™](//www.kiasportage.net/files/member_extra_info/profile_image/896/860/008/8860896.gif?20110823172625)
[경기]Interneeds™
[경기]Interneeds™
[성남]질주본능
[안산]★꽃미남
[忠/서]겨울바라기
스뽀띠지
EQzero[JY]
[수원]짬뽕
EQzero[JY]
20:40
2005.02.15.
2005.02.15.
20:41
2005.02.15.
2005.02.15.
20:44
2005.02.15.
2005.02.15.
21:12
2005.02.15.
2005.02.15.
21:20
2005.02.15.
2005.02.15.
겨울 바라기님 첫째 댓글은 엑셀에서 베이직 언어를 이용하여 매크로 만든 것입니다. 본문의 쓰신 URL 내용이 일일히 타자 친것이 아니고 프로그램 돌려서 만들어 복사해 붙인것입니다.
22:44
2005.02.15.
2005.02.15.
23:35
2005.02.15.
2005.02.15.
23:48
2005.02.15.
2005.02.15.
23:48
2005.02.15.
2005.02.15.
Dim a, b As String
Dim c, d As Double
a = "http://www.kiasportage.net"
c = Len(a)
For d = 1 To c
b = Left(a, d)
ActiveSheet.Cells(d, 1).Value = b
Next d
End Sub