Top-Themen

AppleEntwicklungHardwareInternetLinuxMicrosoftMultimediaNetzwerkeOff TopicSicherheitSonstige SystemeVirtualisierungWeiterbildungZusammenarbeit

Aktuelle Themen

Administrator.de FeedbackApache ServerAppleAssemblerAudioAusbildungAuslandBackupBasicBatch & ShellBenchmarksBibliotheken & ToolkitsBlogsCloud-DiensteClusterCMSCPU, RAM, MainboardsCSSC und C++DatenbankenDatenschutzDebianDigitiales FernsehenDNSDrucker und ScannerDSL, VDSLE-BooksE-BusinessE-MailEntwicklungErkennung und -AbwehrExchange ServerFestplatten, SSD, RaidFirewallFlatratesGoogle AndroidGrafikGrafikkarten & MonitoreGroupwareHardwareHosting & HousingHTMLHumor (lol)Hyper-VIconsIDE & EditorenInformationsdiensteInstallationInstant MessagingInternetInternet DomäneniOSISDN & AnaloganschlüsseiTunesJavaJavaScriptKiXtartKVMLAN, WAN, WirelessLinuxLinux DesktopLinux NetzwerkLinux ToolsLinux UserverwaltungLizenzierungMac OS XMicrosoftMicrosoft OfficeMikroTik RouterOSMonitoringMultimediaMultimedia & ZubehörNetzwerkeNetzwerkgrundlagenNetzwerkmanagementNetzwerkprotokolleNotebook & ZubehörNovell NetwareOff TopicOpenOffice, LibreOfficeOutlook & MailPapierkorbPascal und DelphiPeripheriegerätePerlPHPPythonRechtliche FragenRedHat, CentOS, FedoraRouter & RoutingSambaSAN, NAS, DASSchriftartenSchulung & TrainingSEOServerServer-HardwareSicherheitSicherheits-ToolsSicherheitsgrundlagenSolarisSonstige SystemeSoziale NetzwerkeSpeicherkartenStudentenjobs & PraktikumSuche ProjektpartnerSuseSwitche und HubsTipps & TricksTK-Netze & GeräteUbuntuUMTS, EDGE & GPRSUtilitiesVB for ApplicationsVerschlüsselung & ZertifikateVideo & StreamingViren und TrojanerVirtualisierungVisual StudioVmwareVoice over IPWebbrowserWebentwicklungWeiterbildungWindows 7Windows 8Windows 10Windows InstallationWindows MobileWindows NetzwerkWindows ServerWindows SystemdateienWindows ToolsWindows UpdateWindows UserverwaltungWindows VistaWindows XPXenserverXMLZusammenarbeit

VB6: Range-Objekt Word nach Style suchen, Fehler, wenn Style nicht vorhanden!

Frage Entwicklung VB for Applications

Mitglied: stoperror

stoperror (Level 1) - Jetzt verbinden

09.11.2005, aktualisiert 17.10.2012, 8859 Aufrufe, 1 Kommentar

Wir verwenden in einem VB6 Projekt das Range-Objekt für Word um nach einem Style zu suchen.
Und die Find-Methode. Ist das Format im Dokument jedoch gar nicht vorhanden, bekomme ich einen VB - Laufzeitfehler!

Folgender Fehler wird in VB ausgegeben (beim Debuggen):
Laufzeitfehler '5834'
Ein Element mit dem angegebenen Namen ist nicht vorhanden.

Funktion:
Public Sub parseStyle()

Dim p As Paragraph 'Der zu analysierende Paragraph
Set p = m_para

Dim r As Range 'Das zu durchsuchende Range-Object

Dim iter As Boolean 'Loop-Variable

Dim fm As Variant 'Name des Formates nach dem gesucht wird

'Fuer jedes Format suche das Format solange, bis das Ende des
'Range-Objektes erreicht ist, oder es nicht mehr gefunden wird
For Each fm In m_formats
Set r = p.Range
iter = True
While iter And r.Start < p.Range.End
iter = False
With r.Find

.Style = fm <--- HIER Tritt der Fehler auf!!!
If .Execute(FindText:="", Forward:=True, Format:=True) = True Then
parseStyleAddChunk fm, r
If r.End + 1 < p.Range.End Then
Set r = ActiveDocument.Range(r.End + 1, p.Range.End)
iter = True
End If
End If
End With
Wend
Next fm
End Sub



Wie vermeide ich nun diesen Laufzeitfehler? Das Programm soll einfach weiterlaufen, wenn es den Style nicht findet und er auch nicht im Worddokument enthalten ist.
Mitglied: Biber
12.11.2005, aktualisiert 17.10.2012
Moin stoperror,
Du kannst diesen Fehler abfangen oder auch ignorieren.
Schau mal in der Hilfe unter "On Error goto.." bzw. "On Error Resume Next".

Ich hab auch so ein Beispiel verwandt in <a href=http://www.administrator.de/wissen/outlook-automatisierte-mailverarbeit ... target="blank">Outlook: Automatisierte Mailverarbeitung mit VBA </a>

Sonst poste noch mal bitte.
HTH
Frank / der Biber aus Bremen
Bitte warten ..
Ähnliche Inhalte
Microsoft Office
Outlook 2016 Fehler Link einfügen

Frage von Florian86 zum Thema Microsoft Office ...

Microsoft Office
Excel (2016): Enthaltenen Text suchen (2)

Frage von ralfkausk zum Thema Microsoft Office ...

Visual Studio
Vb.net Datenfelder aus Word 2003 Dokument auslesen (3)

Frage von Herbrich19 zum Thema Visual Studio ...

Neue Wissensbeiträge
Tipps & Tricks

Wie Hackt man sich am besten in ein Computernetzwerk ein

(38)

Erfahrungsbericht von Herbrich19 zum Thema Tipps & Tricks ...

Humor (lol)

Bester Vorschlag eines Supporttechnikers ever: APC

(15)

Erfahrungsbericht von DerWoWusste zum Thema Humor (lol) ...

Heiß diskutierte Inhalte
Webbrowser
Windows 7 unbeliebte Internetseite sperren (15)

Frage von Daoudi1973 zum Thema Webbrowser ...

ISDN & Analoganschlüsse
gelöst Splitter - RJ45 zu RJ11? (13)

Frage von Waishon zum Thema ISDN & Analoganschlüsse ...

LAN, WAN, Wireless
gelöst Suche Firmware Image für Cisco Aironet 1252 (10)

Frage von Herbrich19 zum Thema LAN, WAN, Wireless ...

Netzwerke
VLAN Verständnissproblem (9)

Frage von Dragan123 zum Thema Netzwerke ...