Sie sind vermutlich noch nicht im Forum angemeldet - Klicken Sie hier um sich kostenlos anzumelden Impressum 
Sie können sich hier anmelden
Dieses Thema hat 15 Antworten
und wurde 161 mal aufgerufen
 Skripte und Zusatzprogramme
Seiten 1 | 2
Marius Raabe Offline



Beiträge: 718

07.06.2010 07:39
RE: Skript zum Einstellen des Word-Zooms Zitat · Antworten

Liebe Leute,
ich wünsche mir ein Skript, um relativ stufenlos einen bestimmte Ansichtsgröße in Word einstellen zu können.

Hier mein Versuch (in der Vorschau, damit die Bibliothek sichtbar ist), aber offenbar erkennt das Programm die Listenvariable nicht unmittelbar. Was mache ich falsch?




Grüße, Marius Raabe

Dragon NaturallySpeaking 11.5 Legal
Windows 7 Prof. 64-Bit, Office 2010, Jarte Plus
Philips SpeechMike II Pro Plus, SpeechMike III, SpeechMike Air, PDCC 2.8
Intel Core2 Quad Q9550, 2,83 GHz, 2x6MB L-2, 8 GB RAM

R.Wilke Offline



Beiträge: 6.333

07.06.2010 07:54
#2 RE: Skript zum Einstellen des Word-Zooms Zitat · Antworten

Lieber Marius,

teste das erst mal mit festen Werten, anstatt der Variable, um heraus zu finden, wie sie übergeben werden müssen, und schau bei Verwendung der Liste in der Erkennungsansicht nach, falls die Werte nicht erkannt werden wie beabsichtigt.

Viel Erfolg!
Rüdiger

_______________________________________

Dragon Professional 16 auf Windows 10 Pro und Windows 11
SpeechMike Premium (LFH3500); Office 2019 Pro + Office 365 (monatliches Abo)
HP ZBook Fury 17 G8 - i7-11800H - 24 MB SmartCache - 32 GB RAM - 1 TB SSD

Marius Raabe Offline



Beiträge: 718

07.06.2010 09:04
#3 RE: Skript zum Einstellen des Word-Zooms Zitat · Antworten

Lieber Rüdiger,

Danke für den Tipp. Feste Werte funktionieren einwandfrei (so habe ich das bislang für die Einstellung 100 gemacht, wollte nunmehr aber etwas flexibler werden), die Erkennungsansicht liefert auch keinen Hinweis auf ein Problem. Als expliziter Nicht-Programmierer würde mir jetzt einfallen, für jedes Ergebnis der Listenvariable mit einer If-Funktion einen Befehl zu definieren, das wären aber bis zu 101Stück - keine gute Idee, fürchte ich.

Ach so, hatte ich vergessen: Zunächst habe ich die Listenvariable "ListVar1" genannt - dies ergibt einen Syntaxfehler.

Na ja, wirklich wichtig ist das alles natürlich nicht, eher eine Frage der Bequemlichkeit.

Marius

Dragon NaturallySpeaking 11.5 Legal
Windows 7 Prof. 64-Bit, Office 2010, Jarte Plus
Philips SpeechMike II Pro Plus, SpeechMike III, SpeechMike Air, PDCC 2.8
Intel Core2 Quad Q9550, 2,83 GHz, 2x6MB L-2, 8 GB RAM

R.Wilke Offline



Beiträge: 6.333

07.06.2010 10:28
#4 RE: Skript zum Einstellen des Word-Zooms Zitat · Antworten

Hallo Marius,

also ListVar1 muss es schon lauten, ListVar gibt es nämlich nicht. Wenn es mit festen Zahlenwerten geht, bei ListVar1 aber eine Fehlermeldung gibt, deutet das wohl darauf hin, dass die Zahl nicht ordentlich übergeben wird. Wenn ich Zeit habe, schaue ich mal danach. Gibt es keine eingebauten Natürlichen Sprachbefehle dafür? - Kann gerade nicht danach sehen.

Rüdiger

_______________________________________

Dragon Professional 16 auf Windows 10 Pro und Windows 11
SpeechMike Premium (LFH3500); Office 2019 Pro + Office 365 (monatliches Abo)
HP ZBook Fury 17 G8 - i7-11800H - 24 MB SmartCache - 32 GB RAM - 1 TB SSD

R.Wilke Offline



Beiträge: 6.333

07.06.2010 12:35
#5 RE: Skript zum Einstellen des Word-Zooms Zitat · Antworten

So geht's:

Sub Main
ActiveWindow.ActivePane.View.Zoom.Percentage = CLng(ListVar1)
End Sub



Der Fehler (Type mismatch) und die Kontextinfos zeigen an, dass für diese Eigenschaft Variablen des Typs "Long" benötigt werden, also muss ListVar1 noch umgewandelt werden. Siehe dazu "Conversion" in der online-Hilfe.

Rüdiger

_______________________________________

Dragon Professional 16 auf Windows 10 Pro und Windows 11
SpeechMike Premium (LFH3500); Office 2019 Pro + Office 365 (monatliches Abo)
HP ZBook Fury 17 G8 - i7-11800H - 24 MB SmartCache - 32 GB RAM - 1 TB SSD

Marius Raabe Offline



Beiträge: 718

07.06.2010 12:43
#6 RE: Skript zum Einstellen des Word-Zooms Zitat · Antworten

Rüdiger, du bist unglaublich!

Es dankt herzlich

Marius

Dragon NaturallySpeaking 11.5 Legal
Windows 7 Prof. 64-Bit, Office 2010, Jarte Plus
Philips SpeechMike II Pro Plus, SpeechMike III, SpeechMike Air, PDCC 2.8
Intel Core2 Quad Q9550, 2,83 GHz, 2x6MB L-2, 8 GB RAM

Vincent Offline



Beiträge: 74

10.06.2010 11:35
#7 RE: Skript zum Einstellen des Word-Zooms Zitat · Antworten

Hallo zusammen,

für alle, die eine umfassendere Lösung wünschen, um die Ansicht per Sprache einstellen zu können, hier meine Lösung, die schon seit längerem in Gebrauch ist.
Der Sprachbefehl lautet "Ansicht ", wobei für folgende Liste von Werten steht (und kann natürlich beliebig geändert werden):

100
125
150
200
25
300
400
50
75
Seitenbreite
Textbreite
etwas größer
etwas kleiner
ganze Seite
größer
kleiner
viel größer
viel kleiner

Der Scriptcode sieht folgendermaßen aus:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
 
Sub Main
With ActiveWindow.ActivePane.View.Zoom
If IsNumeric(UtilityProvider.ContextValue(0)) Then
.Percentage = CLng(UtilityProvider.ContextValue(0))
Else
iZoom = -1
Select Case UtilityProvider.ContextValue(0)
Case "Seitenbreite"
.PageFit = wdPageFitBestFit
Case "Textbreite"
.PageFit = wdPageFitTextFit
Case "ganze Seite"
.PageFit =wdPageFitFullPage
End Select
 
If iZoom 500 Or iZoom < 25 Then
Exit Sub
End If
 
.Percentage = iZoom
End If
End If
End With
End Sub
 
 



und muß mit der Word-Objectbibliothek je nach Word-Version verbunden werden. Wie das geht, hat Rüdoger ja schon an anderer Stelle beschrieben. Die Liste der Bibliotheken läßt sich mit Alt+Enter aufrufen (dauert etwas!).

Viel Vergnügen beim Zoomen!

Gruß
Hermann Meltzer

R.Wilke Offline



Beiträge: 6.333

10.06.2010 12:51
#8 RE: Skript zum Einstellen des Word-Zooms Zitat · Antworten

Sehr schönes Skript, Hermann, danke dafür!

Rüdiger

_______________________________________

Dragon Professional 16 auf Windows 10 Pro und Windows 11
SpeechMike Premium (LFH3500); Office 2019 Pro + Office 365 (monatliches Abo)
HP ZBook Fury 17 G8 - i7-11800H - 24 MB SmartCache - 32 GB RAM - 1 TB SSD

Dioskur Offline



Beiträge: 516

11.06.2010 07:59
#9 RE: Skript zum Einstellen des Word-Zooms Zitat · Antworten

Zitat von Vincent


Viel Vergnügen beim Zoomen!

Gruß
Hermann Meltzer


Guten Tag Herr Meltzer,

danke für das Skript. Haben Sie auch ein solches für "Seite einrichten". Ich würde es mit noch größerem Vergnügen benutzen.

Freundliche Grüße zum Wochenende

Hans Löhr

DPI 15 auf Windows 10 Professional (64-bit)
SpeechMike Premium. Intel i7 Core 4x2.67 GHz, 6 GB RAM

Vincent Offline



Beiträge: 74

11.06.2010 18:59
#10 RE: Skript zum Einstellen des Word-Zooms Zitat · Antworten

Hallo Herr Löhr,

ein solches Skript habe ich nicht parat. Wozu auch - ich benutze Word-Vorlagen, was für den Zweck "Seite einrichten" m.E. die geeignetere Methode ist.
Da beim Seite-Einrichten zahlreiche Parameter wählbar sind, wäre ein Sprachbefehl nur dann sinnvoll, wenn es um wenige, ausgewählte Einstellungen geht. Ansonsten kann man ja auch gleich den Word-Dialog benutzen.
Was also soll in Ihrem Fall konkret per Sprachbefehl eingerichtet werden?

Grüße
Hermann Meltzer

Dioskur Offline



Beiträge: 516

12.06.2010 23:50
#11 RE: Skript zum Einstellen des Word-Zooms Zitat · Antworten

Zitat von Vincent
ich benutze Word-Vorlagen, was für den Zweck "Seite einrichten" m.E. die geeignetere Methode ist


Hallo Herr Meltzer,

danke für die Antwort. Sie haben recht, Word-Vorlagen reichen für diesen Zweck in aller Regel aus. Zu viele Skripte bergen ohnehin die Gefahr, dass man dann bald den Wald vor lauter Bäumen nicht mehr sieht. Schon jetzt habe ich mehr Befehle definiert, als ich mir merken kann.

Einen schönen Sonntag!

Hans Löhr

DPI 15 auf Windows 10 Professional (64-bit)
SpeechMike Premium. Intel i7 Core 4x2.67 GHz, 6 GB RAM

DNSuser Offline



Beiträge: 26

14.06.2010 11:47
#12 RE: Skript zum Einstellen des Word-Zooms Zitat · Antworten

Liebe Forums-Kollegen,

ich finde das Skript auch ausgesprochen nützlich. Ich habe Word 2000 und kann leider keine Anweisung finden, wie ich das Skript mit der Methode Word-Objectbibliothek á la Rüdoger (= als nicht DNS-User geoutet) verwenden kann.
Wenn mir jemand das Skript dann noch als als .dat Datei zur Verfügung stellen könnte, ginge es vielleicht auch.

Danke im Voraus!

Gruß

Vincent Offline



Beiträge: 74

14.06.2010 12:25
#13 RE: Skript zum Einstellen des Word-Zooms Zitat · Antworten

Zitat von DNSuser
Liebe Forums-Kollegen,

ich finde das Skript auch ausgesprochen nützlich. Ich habe Word 2000 und kann leider keine Anweisung finden, wie ich das Skript mit der Methode Word-Objectbibliothek á la Rüdoger (= als nicht DNS-User geoutet) verwenden kann.
Wenn mir jemand das Skript dann noch als als .dat Datei zur Verfügung stellen könnte, ginge es vielleicht auch.

Danke im Voraus!

Gruß



Geben Sie im Befehlseditor das Skript ein. Bevor Sie speichern, drücken Sie Alt+Enter, nach mehr oder weniger Wartezeit öffnet sich eine Liste "References". In dieser Liste finden Sie die "Microsoft Word 10.0 Object Library". Setzen Sie ein Häkchen vor den Eintrag, schließen Sie den Dialog und speichern Sie den Sprachbefehl.

Gruß
H. Meltzer

R.Wilke Offline



Beiträge: 6.333

14.06.2010 13:01
#14 RE: Skript zum Einstellen des Word-Zooms Zitat · Antworten

Zitat von Vincent

Zitat von DNSuser
Liebe Forums-Kollegen,

ich finde das Skript auch ausgesprochen nützlich. Ich habe Word 2000 und kann leider keine Anweisung finden, wie ich das Skript mit der Methode Word-Objectbibliothek á la Rüdoger (= als nicht DNS-User geoutet) verwenden kann.
Wenn mir jemand das Skript dann noch als als .dat Datei zur Verfügung stellen könnte, ginge es vielleicht auch.

Danke im Voraus!

Gruß



Geben Sie im Befehlseditor das Skript ein. Bevor Sie speichern, drücken Sie Alt+Enter, nach mehr oder weniger Wartezeit öffnet sich eine Liste "References". In dieser Liste finden Sie die "Microsoft Word 10.0 Object Library". Setzen Sie ein Häkchen vor den Eintrag, schließen Sie den Dialog und speichern Sie den Sprachbefehl.

Gruß
H. Meltzer




Hallo Hermann,

das kann er nicht machen, weil er nur Preferred hat!

Rüdoger Wolke

PS: 1000. Beitrag!!!

_______________________________________

Dragon Professional 16 auf Windows 10 Pro und Windows 11
SpeechMike Premium (LFH3500); Office 2019 Pro + Office 365 (monatliches Abo)
HP ZBook Fury 17 G8 - i7-11800H - 24 MB SmartCache - 32 GB RAM - 1 TB SSD

DNSuser Offline



Beiträge: 26

14.06.2010 15:05
#15 RE: Skript zum Einstellen des Word-Zooms Zitat · Antworten

Ho Rüdoger!

Zitat

Rüdoger Wolke

= sehr schön

bevor jetzt wieder der entsprechende Hinweis bzgl. der Preferred Version kommt, die grundsätzliche Frage,
ob die Methode mit der Word-Objectbibliothek nur funktioniert, wenn ich das Skript selbst erstelle und entsprechend
mit ALT + ENTER abspeichern,
oder kann ich das vorher exportierte Skript auch bei einem Import der .dat Datei entsprechend importieren?

Besten Dank im Voraus

Gruß

Seiten 1 | 2
Ähnliche Themen Antworten/Neu Letzter Beitrag⁄Zugriffe
Einstellung Schnelligkeit/Genauigkeit
Erstellt im Forum Fragen zur Anwendung von Nutzer
2 23.03.2024 11:09
von rc.otto • Zugriffe: 113
Ich kann nicht mehr in Word diktieren.
Erstellt im Forum Fragen zur Anwendung von rc.otto
1 03.05.2023 08:36
von rc.otto • Zugriffe: 361
Wie unter Dragon 16 und MS 365 Skriptbefehle mit Word-VBA-Makros?
Erstellt im Forum Skripte und Zusatzprogramme von Marius_
4 14.03.2023 11:33
von Marius_ • Zugriffe: 342
Kommentarfunktion in Word: Dragon funktioniert nicht mehr
Erstellt im Forum Fragen zur Anwendung von rc.otto
2 12.08.2022 12:22
von Marius_ • Zugriffe: 255
Formatierung in Word 2019
Erstellt im Forum Fragen zur Anwendung von Gilby2000
1 22.01.2022 15:41
von Marius_ • Zugriffe: 280
Smileys bei Microsoft Word führen zum Absturz von Dragon
Erstellt im Forum Fragen zur Anwendung von Lena
3 29.01.2022 14:39
von Lena • Zugriffe: 369
Buchstabier(alphabet)-Skript
Erstellt im Forum Skripte und Zusatzprogramme von Marius_
2 20.10.2021 19:29
von Marius_ • Zugriffe: 469
Add-In für MS-Word.
Erstellt im Forum Fehlermeldungen von Marco
9 30.08.2021 06:56
von Marco • Zugriffe: 971
DRA-Datei in WORD erstellen/speichern
Erstellt im Forum Fragen zur Anwendung von spk347
3 14.04.2021 19:08
von spk347 • Zugriffe: 848
Microsoft Word per Sprachbefehl starten
Erstellt im Forum Fragen zur Anwendung von STAHL
5 07.04.2021 11:25
von STAHL • Zugriffe: 479
 Sprung  
Xobor Ein Kostenloses Forum | Einfach ein Forum erstellen
Datenschutz