Új hozzászólás Aktív témák
-
karzol73
csendes tag
Sziasztok!
A gondom a következő: van egy hosszú szövegem, amiből szeretnék törölni helyenként egy több soros szakaszt, ami mindig ugyanazzal a sorral kezdődik, mondjuk BLA és ugyanazzal is zárul, mondjuk ZVA. Mivel több ezer oldalas doksiról van szó, jó lenne automatizálni vhogy. Az alábbi makrót találtam, ami egy kijelölt részt képes törölni, viszont nálam a BLA és ZVA között nem feltétlenül ugyanaz a tartalom, tehát ez így nem is működik. Ha jól értem, az 5-dik sort kéne megváltoztatnom úgy, hogy a szövegkijelölés egy tömbre vonatkozzon BLA-tól ZVA-ig. Mi ennek a szintaktikája?
Előre is kösz a segítséget!
Sub torles()
Selection.Find.ClearFormatting
Selection.Find.Replacement.ClearFormatting
With Selection.Find
.Text = Selected.Text
.Replacement.Text = ""
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
End Sub[ Szerkesztve ]
-
Johannes15
újonc
Sziasztok!
Word makró írásában szeretném segítségeteket kérni:
Makróból szeretnék a dokumentum bizonyos oldalaira, navigásiós ablakaira vagy soraira ugrani, vagy elrejteni, előhozni adott részeket.
Hogyan lehet ezt megoldani?
Köszi a segítségeteket!
Üdvözlettel:
J.
Új hozzászólás Aktív témák
- Poco F5 - pokolian jó ajánlat
- AMD K6-III, és minden ami RETRO - Oldschool tuning
- Formula-1
- Tudományos Pandémia Klub
- A fociról könnyedén, egy baráti társaságban
- Óra topik
- Realme GT Neo2 - ők már nem zöldfülűek
- Háztartási gépek
- Milyen GPS-t vegyek?
- Fejhallgató erősítő és DAC topik
- További aktív témák...
- AKCIÓ! - STEAM kulcsok /Anuchard, Aragami, Children of Morta, stb. - 2024.04.17.
- Microsoft licencek a KIVÉTELES ÁRAK - UTALÁSSAL IS AUTOMATIKUS KÉZBESÍTÉS - Windows és Office
- Eredeti Windows, telepítéssel! Digital Doctor Számítógép Szerviz
- Eredeti Microsoft termékek - MEGA Akciók! Windows, Office Pro Plus, Project Pro, Visio Pro stb.
- Bontatlan - BATTLEFIELD 1 Collectors Edition - Játékszoftver nélkül