Note: The other languages of the website are Google-translated. Back to English

Sut i ddewis a chopïo pob hyperddolen o ddogfen Word?

Mewn rhai achosion, mae gennych ddogfen hir gyda sawl dolen gyswllt yn bodoli, a dim ond ar unwaith o'r ddogfen hon y mae angen i chi gopïo'r holl hypergysylltiadau ac yna eu pastio i un arall. A oes unrhyw ffordd y gall copïo pob un ohonynt yn gyflym ar unwaith yn lle eu copïo fesul un?

Copïwch yr holl hypergysylltiadau â VBA

Tynnwch yr holl gyfeiriadau hyperddolenni gyda VBA

Copïwch yr holl hyperddolenni neu gyfeiriadau yn unig i'r clipfwrdd gyda Kutools for Wordsyniad da3


swigen dde glas saeth Copïwch yr holl hypergysylltiadau â VBA

1. Agorwch y ddogfen Word rydych chi am gopïo'r hypergysylltiadau, a gwasgwch Alt + F11 i agor y Ffenestr Cymhwysiad Seiliedig ar Weledol Microsoft.

2. Cliciwch Mewnosod > Modiwlau, a chopïwch y VBA canlynol i'r Ffenestr.

VBA: Copïwch yr holl hyperddolenni

Sub HyperlinksExtract()
'Updateby20140214
    Dim oLink As Hyperlink
    Dim docCurrent As Document 'current document
    Dim docNew As Document 'new document
    Dim rngStory As StoryRanges
    Set docCurrent = ActiveDocument
    Set docNew = Documents.Add
    For Each oLink In docCurrent.Hyperlinks
        oLink.Range.Copy
        docNew.Activate
        Selection.Paste
        Selection.TypeParagraph
    Next
    
    Set docNew = Nothing
    Set docCurrent = Nothing
End Sub

3. Cliciwch ar y Run botwm i redeg y cod VBA. Yna mae'r holl hypergysylltiadau yn cael eu copïo i ddogfen newydd. Gallwch arbed y ddogfen newydd yn nes ymlaen. Gallwch weld y canlyniad fel a ganlyn.

Nodyn: Dim ond pan fydd yr holl hypergysylltiadau wedi'u cysylltu â gair y gall y VBA hwn redeg, os oes lluniau gyda hypergysylltiadau, ni all y cod VBA hwn weithio.


swigen dde glas saeth Tynnwch yr holl hypergysylltiadau cyfeiriadau VBA

1. Agorwch y ddogfen Word yr ydych am ei thynnu'r hypergysylltiadau, a gwasgwch Alt + F11 i agor y Ffenestr Cymhwysiad Seiliedig ar Weledol Microsoft.

2. Cliciwch Mewnosod > Modiwlau, a chopïwch y VBA canlynol i'r Ffenestr.

VBA: Tynnwch yr holl gyfeiriadau hyperddolenni

Function GetAllHyperlinks()
'Updateby20140214
    Dim docCurrent As Document
    Dim docNew As Document
    Dim oLink As Hyperlink
    Dim rng As Range
    Application.ScreenUpdating = False
    Set docCurrent = ActiveDocument
    Set docNew = Documents.Add
    For Each oLink In docCurrent.Hyperlinks
        Set rng = docNew.Range
        rng.Collapse
        rng.InsertParagraph
        rng.InsertAfter (oLink.Address)
    Next
    docNew.Activate
    Application.ScreenUpdating = True
    Application.ScreenRefresh
End Function

3. Cliciwch ar y Run botwm i redeg y cod VBA. Yna mae'r holl gyfeiriadau hypergysylltiadau yn cael eu tynnu mewn dogfen newydd, gallwch ei chadw yn nes ymlaen.

Nodyn: Nid yw'r cyfeiriad hypergysylltiadau dyfyniad yn y drefn wreiddiol.


swigen dde glas saeth Copïwch yr holl hyperddolenni neu gyfeiriadau yn unig i'r clipfwrdd gyda Kutools for Word

Os ydych chi am gopïo pob hyperddolen neu gyfeiriadau yn unig i glipfwrdd o ddogfen Word yn hawdd ac yn gyflym, bydd y Copïwch Hyperlink cyfleustodau Kutools am Word yn gallu gwneud y ffafr hon i chi.

Kutools am Word, gyda mwy na 100 swyddogaethau defnyddiol, yn gwneud eich swyddi yn haws. 

Ar ôl gosod Kutools for Word, gwnewch fel isod:(Kutools i'w lawrlwytho am ddim ar gyfer Word Nawr!)

1. Cliciwch Kutools Byd Gwaith > Copïwch Hyperlink.
copi doc hypergysylltiadau 1

2. Yn y dialog popping, dewiswch un opsiwn yn ôl yr angen.
copi doc hypergysylltiadau 2

Nawr, dewiswch un lleoliad rydych chi am osod yr hypergysylltiadau, pwyswch Ctrl + V i'w pastio.

Copïo a gludo hypergysylltiadau
copi doc hypergysylltiadau 3
Copïo a gludo cyfeiriad hyperddolen
copi doc hypergysylltiadau 4

Pori tabbed a golygu nifer o ddogfennau Word / llyfrau gwaith Excel fel Firefox, Chrome, Internet Explore 10!

Efallai y byddwch chi'n gyfarwydd â gweld sawl tudalen we yn Firefox / Chrome / IE, a newid rhyngddynt trwy glicio tabiau cyfatebol yn hawdd. Yma, mae Office Tab yn cefnogi prosesu tebyg, sy'n eich galluogi i bori trwy sawl dogfen Word neu lyfrau gwaith Excel mewn un ffenestr Word neu ffenestr Excel, a newid rhyngddynt yn hawdd trwy glicio ar eu tabiau.
Cliciwch i dreialu Tab y Swyddfa am ddim!

Porwch ddogfennau sawl gair mewn un ffenestr fel Firefox

Erthyglau Perthynas:


Offer Cynhyrchedd Geiriau a Argymhellir

 

Kutools Ar gyfer Word - Mwy Na 100 Nodweddion Uwch Ar gyfer Word, Arbedwch Eich 50% Amser

  • Gellir gwneud gweithrediadau cymhleth ac ailadroddus brosesu un-amser mewn eiliadau.
  • Mewnosodwch ddelweddau lluosog ar draws ffolderau yn nogfen Word ar unwaith.
  • Uno a chyfuno ffeiliau Word lluosog ar draws ffolderau yn un gyda'r drefn a ddymunir gennych.
  • Rhannwch y ddogfen gyfredol yn ddogfennau ar wahân yn ôl pennawd, toriad adran neu feini prawf eraill.
  • Trosi ffeiliau rhwng Doc a Docx, Docx a PDF, casglu offer ar gyfer trawsnewid a dewis cyffredin, ac ati ...
sylwadau (16)
Dim sgôr eto. Byddwch y cyntaf i sgorio!
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Omg mae hyn yn stwff chwedlonol. Mor ddefnyddiol. Diolch yn fawr! :-)
Lleihawyd y sylw hwn gan y safonwr ar y wefan
waw, mae'n wych. Diolch yn fawr iawn
Lleihawyd y sylw hwn gan y safonwr ar y wefan
mae'n annog " Gwall Llunio: Gwall Cystrawen" Helpwch fi, mae angen i mi wneud llawer o waith gan ddefnyddio hwn .Reply cyn gynted â phosibl
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Yn wir! Flwyddyn yn ddiweddarach, rwy'n cael problemau tebyg ac wedi fy syfrdanu'n llwyr gan eich cymorth gwych!! Dduw Bendithia Chi!!
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Diolch. Yr union beth oedd ei angen arnaf i ddosrannu dogfen.
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Ardderchog! Fe helpodd fi i dynnu rhai dolenni o ffeil html a agorais gyda Word (roedd Excel yn taflu rhai dolenni). Dyma'r cod wedi'i addasu fel bod modd adeiladu ffeil csv y gellid ei defnyddio ymhellach. [dyfyniad]SubGetAllHyperlinks() ' Updateby20160504 ' https://www.extendoffice.com/documents/word/1411-word-select-copy-all-hyperlinks.html+&cd=1&hl=en&ct=clnk&gl=us<br /> Dim docCurrent Fel Dogfen Dim docNew Fel Dogfen Dim oCyswllt Fel Hypergyswllt Dim rng Fel Ystod Application.ScreenUpdating = Gosod Anghywir docCurrent = ActiveDocument Set docNew = Documents.Ychwanegu Ar gyfer Pob oLink Yn docCurrent.Hyperlinks Set rng = docNew.RangeAfter rng (Inn. oLink.TextToDisplay) rng.InsertAfter (", ") rng.InsertAfter (oLink.Address) rng.InsertAfter (vbCrLf) Next docNew.Activate Application.ScreenUpdating = Gwir Application.ScreenRefresh End Is[/quote]
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Diolch yn fawr iawn am y sgript yma. Fe wnaeth hyn fy helpu i dynnu dolenni 5K. Diolch yn fawr iawn.
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Mae'r cod hwn yn gweithio'n iawn i mi. Nid yw'r ddau ar enghreifftiau yn nisgrifiad yr erthygl yn gwneud hynny. Diolch yn fawr a fy nghofion gorau.
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Mae hyn yn stwff gwych! Diolch yn fawr. Pa newidiadau sydd angen i mi eu gwneud i GetAllHyperlinks() ar gyfer yr achos canlynol? -- mae'r ddogfen wreiddiol yn cynnwys testun a dolenni arferol -- canlyniad eisiau: yr un ddogfen ond dilynir pob dolen gan fwlch a'r URL Diolch
Lleihawyd y sylw hwn gan y safonwr ar y wefan
A allaf gael yr un sgript i redeg yn outlook?
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Uchder y Chwedlonol, diolch miliwn
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Yr wyf yn rhyfeddu. Dyna aur. Fe wnaethoch chi arbed tunnell o waith i mi.
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Diolch yn fawr iawn! Dyma'n union beth roeddwn i'n edrych amdano!
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Argraffiadol! Millón de gracias.Me wedi acercado a la solución muchísimo pero si fuera possible copiarlos en la fila 1 de un excel ya creado sería impresionante. Mae hyn yn berthnasol i'r fformiwla a gwahanwch gysylltiadau o'r testun.

Lleihawyd y sylw hwn gan y safonwr ar y wefan
Sut allwn ni allforio hypergysylltiadau ffeil geiriau a'i arddangosfa Testun i ffeil excel ? 
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Gwybodaeth dda! Fe'm cynorthwyodd i dynnu dolenni o ffeil html yr oeddwn wedi'i hagor yn Word. Cyfeiriwch at cliciwr cwci yn syniad newydd.
Nid oes unrhyw sylwadau wedi'u postio yma eto
Gadewch eich sylwadau
Postio fel Gwestai
×
Graddiwch y swydd hon:
0   Cymeriadau
Lleoliadau a Awgrymir