Top-Themen

Aktuelle Themen (A bis Z)

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

gelöst Macro ANSI Tabelle - Schriftzeichen in Word auslesen und anzeigen lassen 2003 (vorgefertigte alte Version)

Mitglied: Cataclysm

Cataclysm (Level 1) - Jetzt verbinden

23.10.2009, aktualisiert 27.10.2009, 5092 Aufrufe

Hallo zusammen

Wer kann mir bei der scriptschreibung behilflich sein ?
Ich brauche dies für die Word Version Prof. Edition 2003 SP3
Wenn ich dieses script einfüge erkennt er die Kommandos nicht wie Markierung erweitern.
Da ich eigentlich nichts mit Macros schreiben am Hut habe mache ich evtl auch was falsch.
In VB kopiere ich den Text hinein aber erhalte nach dem start schon die Fehlermeldung
Compile Error " Sub or Function not defined"

Wer könnte mir kurz helfen dies richtig ins Word zu implementieren, danke.

Sub MAIN()

MarkierungErweitern

Rem schaltet den Markierungsmodus ein

ZeichRechts 1

Rem erweitert die Markierung um ein Zeichen nach rechts

a$ = Markierung$()

Rem die Markierung wird der Variablen a$ übergeben

Dim Schrift As FormatZeichen

GetCurValues Schrift

c$ = Schrift.Schriftart

Rem die Schriftart wird ausgelesen

Abbrechen

Rem der Markierungsmodus wird ausgeschaltet

ZeichLinks 1

Rem die Markierung wird zurückgesetzt, d. h., der Cursor befindet sich wieder an der ursprünglichen Position

z = Asc(a$)

Rem der ANSI-CODE des Zeichens wird bestimmt

b$ = Str$(z)

Rem die Zahl wird in einen String verwandelt

MsgBox "ANSI-Code = " + b$, c$

Rem Ausgabe des Ergebnisses in einer Messagebox

End Sub
Ähnliche Inhalte
VB for Applications

Wie kann ich automatisch aus neu angelegten Tabellen Zellen auslesen lassen ?

Frage von Joerg18470VB for Applications4 Kommentare

Hallo zusammen, ich habe eine Mappe erstellt, in der es einen Button gibt mit dem eine neue Tabelle generiert ...

Microsoft Office

Alte Excel Version öffnet sich

Frage von BoomBastiMicrosoft Office3 Kommentare

Hallo liebe Admin gemeinde, ich habe ein merkwürdiges Phänomen. Ich habe einen Win7 64Bit Client im Domänennetzwerk. Auf diesem ...

Webbrowser

Chrome Download ältere Version

gelöst Frage von horstvogelWebbrowser10 Kommentare

Hallo, ich suche nach einen Downloadbereich für ältere Versionen von Chrome. Wir haben eine Anwendung die lokal im Netzwerk ...

Datenbanken

EcoDMS - Ordnerstruktur nicht anzeigen lassen

Frage von geromaDatenbanken10 Kommentare

Hallo zusammen Ich hoffe, ich bin hier richtig. Folgende Ausgangssituation. Mein Kollege und ich sind zurzeit in Gründung eines ...

Neue Wissensbeiträge
Humor (lol)
IoT-Gefahr: Smartes Aquarium leckt!
Information von Lochkartenstanzer vor 1 TagHumor (lol)3 Kommentare

Moin, Die IoT-Manie hat weitere Opfer gefunden. Ein Casino-Leck durch ein smartes Aquarium: Allerdings haben sie kein Wasser, sondern ...

Router & Routing

Alte Fritzbox 7270 mit VPN und SIP-Telefonie hinter O2 Homebox 6641 als "Modem"

Erfahrungsbericht von the-buccaneer vor 2 TagenRouter & Routing3 Kommentare

Nun war es soweit: Auch O2 hat mich mit VOIP zwangsbeglückt. Heute am Privatanschluss, in 2 Wochen ist das ...

Sicherheit

Ungepatchte Remote Code Execution-Lücke in LG NAS

Information von kgborn vor 2 TagenSicherheit

Nutzt wer LG NAS-Einheiten? In den NAS-Einheiten der LG Network Storage-Einheiten gibt es eine sehr unschöne Schwachstelle, die einen ...

Windows Update

Neue Version KB4099950 NIC Einstellungen gehen verloren

Information von sabines vor 3 TagenWindows Update2 Kommentare

Es ist eine neue Version des KB4099950 verfügbar, die das Problem mit den verlorenen Netzwerkeinstellungen lösen soll. Das Datum ...

Heiß diskutierte Inhalte
Linux Netzwerk
Raspberry Pi 3: WLAN Power save deaktivieren
Frage von nordie92Linux Netzwerk14 Kommentare

Moin moin, mein Raspberry Pi 3 Model B benötigt eine dauerhaft aktive WLAN-Verbindung. Leider bricht die WLAN-Verbindung nach einigen ...

Netzwerkmanagement
Netzwerkmanagment im Haus mit Switch, Panel und pfsense
gelöst Frage von CorraggiounoNetzwerkmanagement13 Kommentare

hi zusammen, wir sind gerade dabei das ganze Haus bzw. die einzelnen Zimmer mit netzwerkdosen zu versorgen. Vom Keller ...

Vmware
Server 2008 r2 vmware terminalserver
Frage von MasterCVmware12 Kommentare

Guten Abend zusammen, ich hoffe , dass einer von euch mir weiterhelfen kann ,bei meinem kack Problem ! Ist ...

Google Android
Empfehlung: Android Ortungsapp
gelöst Frage von certifiedit.netGoogle Android12 Kommentare

Guten Morgen, grundsätzlich vorweg, ich wollte mich eben schlau machen, bzgl einer Ortungsapp, welche Androidbasiert einem anderen Androidsmartphone mitteilt, ...