🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: be.comp.programming
Article #12247

VB - vraagje

#12247
From: Luc
Date: Wed, 05 Dec 2001 14:38
20 lines
1363 bytes
Hoe kan ik de naam(msgbox) in mijn word document in het rood krijgen?

Heb probleem met de selectie

ziehier volgend stukje code :

On Error GoTo errorhandler
  Dim strbestand As String
  cmdstart_Click
  Set objWordDoc = Nothing

  Set objWordDoc = objWordApp.Documents.Add("adres.dot")
  objWordDoc.Activate
  objWordDoc.Bookmarks("naam").Range.Text = InputBox("Geef naam")
  objWordDoc.Bookmarks("naam").Range.Select
  Selection.Font.ColorIndex = 3


Wie kan mij helpen ?
Groeten van Luc
Technical Details
Message-ID: <3c0e30a5$0$27953$ba620e4c@news.skynet.be>
Path: arc1-ca.pugleaf.net!archiver1.google.com!news1.google.com!sn-xit-02!supernews.com!news.tele.dk!small.news.tele.dk!195.238.2.15!skynet.be!skynet.be!louie!not-for-mail

Show Full Headers
Complete Article Headers
X-Google-Language: DUTCH,ASCII-7-bit
X-Google-Thread: fcea4,3df03acaf3b876ca,start
X-Google-Attributes: gidfcea4,public
X-Google-ArrivalTime: 2001-12-05 06:35:39 PST
Path: arc1-ca.pugleaf.net!archiver1.google.com!news1.google.com!sn-xit-02!supernews.com!news.tele.dk!small.news.tele.dk!195.238.2.15!skynet.be!skynet.be!louie!not-for-mail
From: "Luc" <bobke@skynet.be>
Newsgroups: be.comp.programming
Subject: VB - vraagje
Date: Wed, 5 Dec 2001 15:38:21 +0100
X-Priority: 3
X-MSMail-Priority: Normal
X-Newsreader: Microsoft Outlook Express 6.00.2600.0000
X-MimeOLE: Produced By Microsoft MimeOLE V6.00.2600.0000
Lines: 24
Message-ID: <3c0e30a5$0$27953$ba620e4c@news.skynet.be>
Organization: -= Skynet Usenet Service =-
NNTP-Posting-Host: 217.136.125.106
X-Trace: 1007562917 reader0.news.skynet.be 27953 217.136.125.106
X-Complaints-To: abuse@skynet.be