Bei meinem Office 2007 steht in der obersten Zeile:
" Microsoft Word (Exel)nichtkommerzielle Verwendung "
kann man diese Überschrift dauerhaft entfernen?
Gruß
Moggy
Andreas42 
Moggy „Kopfzeile bei Office 2007 "nichtkommerzielle Verwendung“
Hi!
Ist das eine generelle Anzeige oder betrifft das nur einzelne Excel-Dokumente?
Bis dann
Andreas
mumpel1 Andreas42 „Hi! Ist das eine generelle Anzeige oder betrifft das nur einzelne...“
Hallo!
Dauerhaft entfernen kann man das nicht. Man kann ihn aber temporär "überschreiben". Das geht nur mit VBA. Hierbei wird der Text der Application ersetzt.
Für Excel: Rufe den VBA-Editor auf. Wähle im rechten oberen Fenster die persönliche Makroarbeitsmappe (Personal.xlsb). Wechsle in dieser in das Modul "DieseArbeitsmappe" und kopiere dort den folgenden Code hinein. "Hier deinen Wunschtext" kannst Du Deinen Wünschen entsprechend anpassen. Soll es leer bleiben, dann nur zwei Anführungszeichen.
Private Sub workbook_open()
Application.Caption = "Hier Deinen Wunschtext"
End Sub
Für Word 2007: Rufe den VBA-Editor auf. Wähle im rechten oberen Fenster "Normal". Wechsle in dieser in das Modul [b]ThisDocument[/b] und kopiere das folgende Makro hinein.
Sub AutoExec()
Application.Caption = "Hier Deinen Wunschtext"
End Sub
In den anderen Applicationen dürfte es ähnlich sein. Für diese fehlen mir aber die notwendigen Parameter für die Autostartmakros.
Gruß, Rene
Moggy Andreas42 „Hi! Ist das eine generelle Anzeige oder betrifft das nur einzelne...“
Ja, das ist eine generelle Anzeige. Normalerweise steht dort nur z.B. " Microsoft Exel Mappe 1 "
jetzt: " Mappe1 - Microsoft Exel nichtkommerzielle Verwendung "
Ist das ggf eine Einstellung der Registry ?
@ mumpel1:
Ja, die Möglichkeit mit VBA kenne ich ein wenig. Dann ist das jeweilige Dokument betroffen, richtig?
Moggy
mumpel1 Moggy „Ja, das ist eine generelle Anzeige. Normalerweise steht dort nur z.B. Microsoft...“
Nein, das genannte Makro ändert nur die Anzeige "nicht kommerzielle Verwendung". Der Arbeitsmappenname bleibt erhalten. Um diese auch noch zu entfernen, muss man in das Modul "DieseArbeitsmappe" einer jeden Arbeitsmappe das folgende Makro schreiben.
Private Sub Workbook_Open()
ActiveWindow.Caption = ""
End Sub
Moggy mumpel1 „Nein, das genannte Makro ändert nur die Anzeige nicht kommerzielle Verwendung ....“
Danke mumpel,
das ist dann allerdings recht aufwendig. Also werde ich wohl mit der Uberschrift leben, obwohl ich sie störend finde.
Grüße
Moggy
