Médiakezelő
Névterek
Névtér kiválasztása
Médiafájl kiválasztása
Fájlok itt: egyetemplus:hallgatoi_elet:hallgatoi_szervezetek:hok
- 26029_1300043549081_1470206834_30982389_2345729_jpg.jpg
- 719×477
- 2018/06/14 03:05
- 108.6 KB
- 26813_1156725497213_1800024317_305354_3285306_jpg.jpg
- 720×540
- 2018/06/14 03:05
- 91.9 KB
- 38653_147849391893328_913623_n.jpg
- 720×540
- 2018/06/14 03:05
- 76.8 KB
- 39037_147849251893342_7395167_n.jpg
- 720×540
- 2018/06/14 03:05
- 96 KB
- 40023_147849771893290_5154121_n.jpg
- 720×540
- 2018/06/14 03:05
- 73.6 KB
- 156380_1345382213513_4251035_n.jpg
- 720×540
- 2018/06/14 03:05
- 94.1 KB
- 181269_10150860261853772_137635754_n.jpg
- 720×540
- 2018/06/14 03:05
- 45.8 KB
- 304678_496396193705311_1443676641_n.jpg
- 540×720
- 2018/06/14 03:05
- 41.2 KB
- 318246_10151727439465319_968700094_n.jpg
- 960×720
- 2018/06/14 03:05
- 49.7 KB
- 396121_4214691452790_1948598650_n.jpg
- 720×960
- 2018/06/14 03:05
- 56.9 KB
- 398207_394615250577001_1899796520_n.jpg
- 960×640
- 2018/06/14 03:05
- 80.5 KB
- 399408_496395313705399_1253299411_n.jpg
- 960×720
- 2018/06/14 03:05
- 77.6 KB
- 428811_496395693705361_13384451_n.jpg
- 960×720
- 2018/06/14 03:05
- 129.7 KB
- 481944_4214687732697_1606651922_n.jpg
- 960×720
- 2018/06/14 03:05
- 227.7 KB
- 522219_394615727243620_844661281_n.jpg
- 960×640
- 2018/06/14 03:05
- 77.5 KB
- 538808_394615973910262_499222865_n.jpg
- 720×480
- 2018/06/14 03:05
- 91.1 KB
- 540614_10150860262183772_264486341_n.jpg
- 960×720
- 2018/06/14 03:05
- 99.3 KB
- 547344_10151727431270319_837233441_n.jpg
- 960×720
- 2018/06/14 03:05
- 64.3 KB
- biotinilalas_001_jpg.jpg
- 1024×768
- 2018/06/14 03:05
- 144.6 KB
- biotinilalas_019_jpg.jpg
- 1024×768
- 2018/06/14 03:05
- 175.4 KB
- biotinilalas_084_jpg.jpg
- 1024×768
- 2018/06/14 03:05
- 137.6 KB
- dsc01070.jpg
- 512×384
- 2018/06/14 03:05
- 40.6 KB
- dsc01117.jpg
- 300×400
- 2018/06/14 03:05
- 25.9 KB
- img_3404.jpg
- 800×533
- 2018/06/14 03:05
- 79.1 KB
- img_9105_00.jpg
- 720×481
- 2018/06/14 03:05
- 76.9 KB
- medikus_zenekar_jpg.jpg
- 640×427
- 2018/06/14 03:05
- 228.3 KB
- p5020119.jpg
- 512×384
- 2018/06/14 03:05
- 24.5 KB
- sdc15113_jpg.jpg
- 800×600
- 2018/06/14 03:05
- 170.7 KB
- sdc15206_jpg.jpg
- 800×600
- 2018/06/14 03:05
- 182.6 KB
Fájl
- Megtekintés
- Szerkesztés
- Korábbi változatok
- Cím:
- fzVNnuEs
- Dátum:
- 2012/09/15 12:12
- Fájlnév:
- ucd_medical_center_2012.jpg
- Képaláírás:
- 剛才測試發現用find物件,execute方法的replaceall引數(即word全部取代功能)果然很慢,若改為下式則快多了:只是我目前還抓不穩range的start 和 end的數值.還須多加測試.關鍵是不要用range去比對,而是先將range的text值賦予一字串變數.我也想過用open for input as 的敘述試試.再說.Sub replacetest0() '2012/6/5Dim a As Range, x As Long, q As StringDim s As Date, e As Date, g, i'Set a = ActiveDocument.Range'Debug.Print Len(a)s = VBA.Timerq = ActiveDocument.Rangex = InStr(q, "翁方綱")'x = InStr(a.Text, "翁方綱")For Each g In ActiveDocument.Comments g.DeleteNextWith ActiveDocument Do Until x = 0' .Range(x - 1, x + 3 - 1).Select .Range(x - 1, x + Len("翁方綱") - 1).Text = "孫守真" i = i + 1' If i = 68 Then Stop x = InStr(x + 1, q, "翁方綱") If .Range(x - 1, x + 3 - 1) <> "翁方綱" Then e = VBA.Timer Debug.Print e - s Debug.Print i Stop End If 'a.Text = Replace(a.Text, "翁方綱", "孫守真") 'a.Find.Execute "翁方綱", , , , , , , , , "孫守真", wdReplaceAll '果然太慢!! LoopEnd Withe = VBA.TimerDebug.Print e - sEnd Sub
- Készítette:
- dkch4WjrgSfg
- Szerzői jogok:
- 995Vnk7r72V0
- Formátum:
- JPEG
- Méret:
- 1MB
- Szélesség:
- 2048
- Magasság:
- 1456
- Kulcsszavak:
- oAsYplcV5YzS
- Hivatkozások:
- UC Davis tanulmányi ösztöndíj, Kalifornia, USA