Hallo,
wenn ich in eine neue Exceltabelle ein Kommentarfeld einfüge steht dort „Vorname Nachname:“ und ich kann den passenden Text beilegen.
Speicher ich die Datei- steht da nicht mehr mein pers. Name, sondern
nur noch „Autor:“ und der zuvor eingegebene Text.
Das Problem habe ich auf zwei Rechnern. Entweder haben beide dasselbe Problem, oder einfach nur eine Einstellung falsch, oder???!?!?!!?!
Weiss jemand Rat?
DANKE!
wewewe
Hallo we³,
wenn ich in eine neue Exceltabelle ein Kommentarfeld einfüge
steht dort „Vorname Nachname:“
dort steht was Excel von dir als Usernamen kennt.
Speicher ich die Datei- steht da nicht mehr mein pers. Name,
sondern nur noch „Autor:“ und der zuvor eingegebene Text.
Nicht nachvollziehbar mit XL2007 H&S.
Als Wirkungsbekämpfung, nicht als Urschanebekämpfung! könnte man per Vba, zur Not bei jedem Start der Mappe o.ä., alle Kommentare überprüfen und „Autor:“ durch den Usernamen ersetzen oder sogar ganz entfernen, sehe da eh keinen Sinn drin daß das da steht.
Gruß
Reinhard
Hm, okay danke- vielleicht fällt noch jemandem was dazu ein. Alternativ für jemanden der es nicht so mit VBA und deren Einbindung hat… Wie schwer ist es das umzusetzen?
Danke!
wewewe
Wie schwer ist es das umzusetzen?
Hallo we³,
Das könnte dann so aussehen, Code gehört in das Modul „DieseArbeitsmappe“. Er ersetzt Autor: durch Nmae :
Private Sub Workbook\_Open()
Dim Zelle As Range, wks As Worksheet, Txt As String
On Error Resume Next 'wegen Specialcells
For Each wks In ThisWorkbook.Worksheets
For Each Zelle In wks.UsedRange.SpecialCells(xlCellTypeComments)
If UCase(Zelle.Comment.Text) Like "AUTOR:\*" Then
Txt = Mid(Zelle.Comment.Text, InStr(Zelle.Comment.Text, vbLf) + 1)
Txt = Application.UserName & " :" & vbLf & Txt
Zelle.Comment.Text Txt
End If
Next Zelle
Next wks
End Sub
Gruß
Reinhatd
Dankeschön!!!