ªð¦^¦Cªí ¤W¤@¥DÃD µo©«

[µo°Ý] §Ú¦³Ãö©óVlookup ªº°ÝÃD·Q½Ð°Ý

¥i¥H¨Ï¥Î¡y½s¿è¡z¡÷¡y³sµ²¡z¡÷¡y§ó·s¼Æ­È¡z
³o¼ËÀ³¸Ó´N¥i¥H§ó·s¤F
·íµM¦pªG­n°µ¦¨VBA
¥u­n¿ý»s¥¨¶°¡AÀ³¸Ó´N¥i¥H¤F

¤£ª¾¹D¨ä¥L«e½ú¦³¨S¦³§ó¤è«Kªº¤èªk?
°Ê©À¦¨¦]¿n¦]¦¨ªG by huijuang

TOP

¦^´_ 4# peellau

THISWORKBOOK:
Private Sub Workbook_Open()
Call "§ó·s"
End Sub

MODULE1:

Sub §ó·s()
T1 = Now + TimeSerial(0, 0, 1)
Range("l2:l20000").QueryTable.Refresh BackgroundQuery:=False
Application.OnTime T1, "§ó·s"
End Sub

±NRange("l2:l20000").QueryTable.Refresh BackgroundQuery:=False
§ï¬°    ActiveWorkbook.UpdateLink Type:=xlExcelLinks
¦A¸Õ¸Õ¬Ý
°Ê©À¦¨¦]¿n¦]¦¨ªG by huijuang

TOP

        ÀR«ä¦Û¦b : ¡i¥Í©R¦b©I§l¶¡¡j¦òªû»¡¡G¡u¥Í©R¦b©I§l¶¡¡C¡v¤HµLªkºÞ¦í¦Û¤vªº¥Í©R¡A§óµLªk¾×¦í¦º´Á¡AÅý¦Û¤v¥Ã¦í¤H¶¡¡C¬JµM¥Í©R¥h¨Ó³o»òµL±`¡A§Ú­Ì§óÀ³¸Ó¦n¦n¦a·R±¤¥¦¡B§Q¥Î¥¦¡B¥R¹ê¥¦¡AÅý³oµL±`¡BÄ_¶Qªº¥Í©R¡A´²µo¥¦¯uµ½¬üªº¥ú½÷¡A¬M·Ó¥X¥Í©R¯u¥¿ªº»ù­È¡C
ªð¦^¦Cªí ¤W¤@¥DÃD