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 37 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.119

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

_______________________________________

DPG 15.6 (15.60.200.015) auf Windows 10 Pro (64-bit)
SpeechMike Premium (LFH3500) + SpeechMike II
HP ZBook 17 G2 (Refurbished) - i7-4910qm - 8MB SmartCache - 32 GB RAM - 512 GB SSD - 1 TB HSSD - 2 TB HDD

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.119

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

_______________________________________

DPG 15.6 (15.60.200.015) auf Windows 10 Pro (64-bit)
SpeechMike Premium (LFH3500) + SpeechMike II
HP ZBook 17 G2 (Refurbished) - i7-4910qm - 8MB SmartCache - 32 GB RAM - 512 GB SSD - 1 TB HSSD - 2 TB HDD

R.Wilke Offline



Beiträge: 6.119

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

_______________________________________

DPG 15.6 (15.60.200.015) auf Windows 10 Pro (64-bit)
SpeechMike Premium (LFH3500) + SpeechMike II
HP ZBook 17 G2 (Refurbished) - i7-4910qm - 8MB SmartCache - 32 GB RAM - 512 GB SSD - 1 TB HSSD - 2 TB HDD

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.119

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

_______________________________________

DPG 15.6 (15.60.200.015) auf Windows 10 Pro (64-bit)
SpeechMike Premium (LFH3500) + SpeechMike II
HP ZBook 17 G2 (Refurbished) - i7-4910qm - 8MB SmartCache - 32 GB RAM - 512 GB SSD - 1 TB HSSD - 2 TB HDD

Dioskur Offline



Beiträge: 511

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: 511

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.119

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!!!

_______________________________________

DPG 15.6 (15.60.200.015) auf Windows 10 Pro (64-bit)
SpeechMike Premium (LFH3500) + SpeechMike II
HP ZBook 17 G2 (Refurbished) - i7-4910qm - 8MB SmartCache - 32 GB RAM - 512 GB SSD - 1 TB HSSD - 2 TB HDD

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
Schwierigkeiten mit Skripten unter 15.3
Erstellt im Forum Skripte und Zusatzprogramme von
4 17.10.2018 18:24
von Meinhard • Zugriffe: 103
DPI für Mac: Skript für die Arbeit mit Hilfseditor
Erstellt im Forum Skripte und Zusatzprogramme von
0 13.03.2017 14:09
von Meinhard • Zugriffe: 51
Skript zum Aufruf von Microsoft Outlook Adressbüchern in Word
Erstellt im Forum Skripte und Zusatzprogramme von
2 25.09.2015 10:27
von P.Roch • Zugriffe: 35
Silbentrennung ein/aus in MS Word 2013
Erstellt im Forum Skripte und Zusatzprogramme von
9 25.05.2015 01:09
von R.Wilke • Zugriffe: 44
Wunsch: Skript zum Ein- und Ausschalten des Diktierfensters
Erstellt im Forum Skripte und Zusatzprogramme von
18 18.03.2013 19:48
von Dioskur • Zugriffe: 78
Benötige Skript für Zoom in Outlook (Office 2007)
Erstellt im Forum Skripte und Zusatzprogramme von
4 24.10.2011 18:56
von Dioskur • Zugriffe: 31
Öffnen des Explorer-Ordners für ein offenes Word-Dokument
Erstellt im Forum Skripte und Zusatzprogramme von
2 02.03.2011 21:00
von R.Wilke • Zugriffe: 35
Fußnote mit erstem Wort groß in Word
Erstellt im Forum Skripte und Zusatzprogramme von
1 19.02.2011 15:18
von R.Wilke • Zugriffe: 31
Einstellung "Geschwindigkeit/Genauigkeit" im laufenden Betrieb ändern
Erstellt im Forum Skripte und Zusatzprogramme von
4 05.06.2010 15:35
von R.Wilke • Zugriffe: 37
 Sprung  
Xobor Ein Kostenloses Forum | Einfach ein Forum erstellen
Datenschutz