Microsoft Excel 2003 - benötigt sehr viel Zeit um Dateien vom Netzwerk zu öffnen

Problem :

Microsoft Excel 2003 - benötigt sehr viel Zeit um Dateien vom Netzwerk zu öffnen , dies war in meinem Fall direkt auf das Update "Office File Validation Add-In" zurück zu verfolgen. Eine Deinstallation dieses Add-Ins hat nur temporär geholfen da es beim nächsten Updaten wieder mit angeboten wird. In meinem Fall werden die Updates über WSUS ausgerollt weswegen ich einen Weg gesucht habe dieses Add-In zu deaktivieren.

Lösung :

1.) Alle Office Applikationen schließen
2.) Erstellt eine Reg Datei und kopiert diesen Inhalt hinein :
Windows Registry Editor Version 5.00

[HKEY_CURRENT_USER\Software\Microsoft\Office\11.0\Excel\Security]

[HKEY_CURRENT_USER\Software\Microsoft\Office\11.0\Excel\Security\FileValidation]
"EnableOnLoad"=dword:00000000

3.) importiert die Reg Datei und das Add-In ist zwar installiert aber deaktiviert.

Wer sich weiter einlesen möchte hier mehr zu diesem Add-In :

PCWelt : Exploit-Schutz-Office-File-Validation-jetzt-auch-fuer-Office-2003-2007
Microsoft : http://support.microsoft.com/kb/2501584

!! Microsoft hat sich sicher Gedanken gemacht diese Update auszurollen , wer den beschriebenen Weg ausführt ist selbst dafür verantwortlich !!

Outlook 2010: Skripte und Code in einem benutzerdefinierten Formular werden nicht ausgeführt

Problem:
Man hat ein benutzerdefiniertes Outlook-Formular erstellt und darin Skripte bzw. Code hinterlegt.
Wenn man das Formular testweise ausführt, klappt alles ohne Probleme.
Wenn man das Formular veröffentlicht und dann versucht das Skript per Button o.ä. auszuführen, passiert nichts!
Das Problem tritt nur bei Clients mit OUTLOOK 2010 auf.

Lösung:
Seit Outlook 2010 wird per default das Ausführen von Code in öffentlichen Ordnern verhindert.
Dies kann umgangen werden, in dem man folgende Änderung in der Registry durchführt:
HKCU\Software\Microsoft\Office\14.0\Outlook\Security

DWORD Entry: PublicFolderScript

Value: 1

Nach einem Outlook-Neustart funktioniert das Formular problemlos.

In der unten genannten Quelle findet man auch einen Lösungsweg per Policy mit ADM-Datei.

Quelle: faq-o-matic.net: Homepage für Öffentliche Ordner in Outlook 2010 anzeigen

Tastatur: Sprache Tastaturlayout ändert sich - Tastenkombination

Problem:
Plötzlich stellt sich das Tastaturlayout von Deutsch auf Englisch um, ohne dass man etwas ersichtlich geklickt hat.
Manchmal passiert das bei der Anmeldung.

Lösung:
Es gibt eine etwas unsinnige Tastenkombination, mit der man das Tastaturlayout ändern kann.
ALT + linke SHIFT

Man kann die Kombination jederzeit betätigen, sowohl beim Anmeldefenster als auch während der Windows-Bedienung.

Quelle: Computerleben.net: Das Tastaturlayout ändert sich ungewollt

VBS / WSH Funktion um Meldungen auszugeben je nach Interpreter

Problem :

Wenn man ein VBS Skript schreibt und Meldungen ausgeben möchte stehen einem mehrere Wege zur Verfügung die gängigsten sind eine MsgBox und WScript.Echo das Echo wird meistens verwendet wenn das Skript über cscript.exe gestartet wird , startet man es dann mit wscript.exe bekommt man für jede Zeile die ein Echo enthällt eine gesonderte Messagebox (MsgBox)

Lösung :

Ich hab hier eine kleine Funktion geschrieben die ermittelt über welchen Interpreter wscript / cscript das Skript gestartet wurde und die Meldung anpasst.


Function ShowMessage(MSG,Titel)
Dim StrScriptInt : StrScriptInt = LCase(WScript.FullName)
' --- Check Interpreter
If Right(StrScriptInt,11) = "wscript.exe" Then
	MsgBox MSG,vbOKOnly + vbInformation,Titel
Else
	WScript.Echo Titel & "--------------" & vbCrLf & MSG & vbCrLf
End If
End Function

Neues Tool zum umziehen von Druckern

Problem :

Der Name des Druckservers hat sich verändert und soll jetzt automatisch beim anmelden der user in den verbundenen Drucker korrigiert werden.
Getestet mit Win 2000 / XP / 7

Lösung :

Ich hab mich ran gesetzt und eine neue Version ohne speichern auf File System Ebene geschrieben.

Hier die möglichen Parameter :


-o:[Servername] or /o:[Servername] = old print server
-n:[Servername] or /n:[Servername] = new print server
-l:[Logfile] or /l:[Logfile] = create an Logfile (path:filename)
-? or /? = shows this help

replace [Servername] with the hostname / ip-adress without [ and ]


Beispielaufruf sieht dann so aus :

Move_Printer.exe -o:ALTSERVER -n:NEUSERVER -l:C:\Logfile.txt


Download Tool : Move_Printer.exe (freier Download)

Hier der download des Source Codes : Source Code (nur für registrierte Mitglieder)

EXCEL VBS: Ermitlung letzte Zeile/Spalte im Worksheet

Problem:
Hier noch die Ermittlung der letzten Zeile/Spalte unter VBS in Excel

Lösung:

VBS
'letzte Zeile in "A" suchen
Zeilenanzahl = objXLS.Cells(objXLS.Rows.Count, 1).End(xlUp).Row

'letzte Spalte in Zeile 1 suchen
Spaltenanzahl = LZ = objXLS.Cells(objXLS.Columns.Count, 1).End(xlUp).Column


Selbstverständlich benötigen wir hierzu noch das entsprechende Objekt und eine Excel Workbook:

'Excel-Objekt und Workbook erstellen
set objXLS = CreateObject("Excel.Application")
set objWB = objXLS.Workbooks
objWB.Add
“Das einzig sichere System müsste ausgeschaltet, in einem versiegelten und von Stahlbeton ummantelten Raum und von bewaffneten Schutztruppen umstellt sein.”
Gene Spafford (Sicherheitsexperte)