Nu reusesc sa-mi dau seama de ce acest macro nu face nimic .
Ar trebui sa boldeze randurile dintre tabelele din fisierul atasat.
Ma puteti ajuta ?
Multumesc.
Sub Numerotare_si_boldare()
'
' Boldeaza 1. si ce urmeaza, intre tabele
'
On Error GoTo err
Dim oRng As Word.Range
Set oRng = ActiveDocument.Range
With oRng.Find
.ClearFormatting
.MatchWildcards = True
.Text = "(^13)<([0-9]{1,})(. UNIVERSITATEA)(*)(^13)"
With .Replacement
.Text = "^&"
.Font.Bold = True
End With
.Execute Replace:=wdReplaceAll
End With
Exit Sub
err:
MsgBox err.Description, vbOKOnly, "eroare"
End Sub
Boldare rand intre tabele
Înapoi la “Visual Basic for Application (VBA) - Intrebari tehnice”
Mergi la
- Administrative
- ↳ Anunturi
- ↳ Concursuri
- ↳ Condica de sugestii si reclamatii
- Comunitati IT Learning
- ↳ Office Specialist: Comunitatea Microsoft Office din Romania
- ↳ Microsoft Excel - Intrebari tehnice (legatura catre forumul dedicat Dr.Excel)
- ↳ Microsoft Access - Intrebari tehnice
- ↳ Invata Microsoft Access cu Echipa IT Learning
- ↳ Intrebari despre Access 2019
- ↳ Intrebari despre Access 2016
- ↳ Intrebari despre Access 2013
- ↳ Intrebari despre Access 2010
- ↳ Intrebari despre Access 2007
- ↳ Intrebari despre Access 2003
- ↳ Tips and tricks in Access (indiferent de versiune)
- ↳ Microsoft Word - Intrebari tehnice
- ↳ Invata Microsoft Word cu Echipa IT Learning
- ↳ Intrebari despre Word 2019
- ↳ Intrebari despre Word 2016
- ↳ Intrebari despre Word 2013
- ↳ Intrebari despre Word 2010
- ↳ Intrebari despre Word 2007
- ↳ Intrebari despre Word 2003
- ↳ Tips and tricks in Word (indiferent de versiune)
- ↳ Microsoft Outlook - Intrebari tehnice
- ↳ Invata Microsoft Outlook cu Echipa IT Learning
- ↳ Intrebari despre Outlook 2019
- ↳ Intrebari despre Outlook 2016
- ↳ Intrebari despre Outlook 2013
- ↳ Intrebari despre Outlook 2010
- ↳ Intrebari despre Outlook 2007
- ↳ Intrebari despre Outlook 2003
- ↳ Tips and tricks in Outlook (indiferent de versiune)
- ↳ Microsoft Powerpoint- Intrebari tehnice
- ↳ Invata Microsoft Powerpoint cu Echipa IT Learning
- ↳ Intrebari despre Powerpoint 2019
- ↳ Intrebari despre Powerpoint 2016
- ↳ Intrebari despre Powerpoint 2013
- ↳ Intrebari despre Powerpoint 2010
- ↳ Intrebari despre Powerpoint 2007
- ↳ Intrebari despre Powerpoint 2003
- ↳ Tips and tricks in Powerpoint (indiferent de versiune)
- ↳ Visual Basic for Application (VBA) - Intrebari tehnice
- ↳ Invata sa programezi in VBA de la Echipa IT Learning
- ↳ Alte programe din suita Microsoft Office
- ↳ Invata Microsoft Project cu Echipa IT Learning
- ↳ Dr.Excel: Comunitatea Microsoft Excel din Romania
- ↳ Microsoft Excel - Intrebari tehnice
- ↳ Invata Microsoft Excel cu Echipa Dr.Excel
- ↳ Intrebari despre Excel 2019
- ↳ Intrebari despre Excel 2016
- ↳ Intrebari despre Excel 2013
- ↳ Intrebari despre Excel 2010
- ↳ Intrebari despre Excel 2007
- ↳ Intrebari despre Excel 2003
- ↳ Tips and Tricks Excel
- ↳ Probleme cu aplicatiile ce folosesc Excel ca aplicatie ajutatoare
- ↳ Visual Basic for Application (VBA) cu Excel - Intrebari tehnice
- ↳ Invata sa programezi in VBA de la Echipa Dr.VBA
- ↳ Power Query & Power Pivot
- ↳ Dr.Windows: Comunitatea Microsoft Windows din Romania
- ↳ Microsoft Windows - Intrebari tehnice
- ↳ Invata Microsoft Windows cu Echipa IT Learning
- ↳ Intrebari despre Windows 10
- ↳ Intrebari despre Windows 8
- ↳ Intrebari despre Windows 7
- ↳ Intrebari despre Windows Vista
- ↳ Intrebari despre Windows XP
- ↳ Intrebari despre ALTE versiuni de Windows
- Servicii IT Learning
- ↳ Despre cursurile in clasa
- ↳ Despre cursurile online (www.office-learning.ro)
- ↳ Discutii despre Cursurile Office-Learning
- ↳ Cursurile interactive de Excel
- ↳ Cursurile interactive de Access
- ↳ Cursurile interactive de Powerpoint
- ↳ Cursurile interactive de Word
- ↳ Cursurile interactive de Outlook
- ↳ Despre certificarile Microsoft
- Diverse
- ↳ Discutii libere (Cafenea)
- ALTE FORUMURI ROMANESTI
- ↳ CODEXPERT