Live-Forum - Die aktuellen Beiträge
Datum
Titel
18.04.2024 21:09:11
4 Spalten aus smarter Tabelle in andere smarte Tab. kopieren
18.04.2024 20:45:35
Worksheet_Activate für alle Sheets
18.04.2024 19:30:20
VBA - Tabelle mit Mannschaftsergebnissen sortieren
18.04.2024 18:04:29
Formel fehler Wert#
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
360to364
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
360to364
360to364
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Benutzernamen im Dateinamen

Benutzernamen im Dateinamen
13.01.2004 17:38:01
aljoscha
Hallo,
ich würde gerne mitHilfe von SaveCopyAs eine Datein unter folgendem Namen speichern:
"aktuelles Datum YY-MM-DD" & "Benutzername" & xyz.xls
Das Datum bekomme ich hin, aber wie mache ich den Benutzernamen.
Wir sind ein Büro, in dem jeder eine eindeutige ID hat.
Vielen Dank schon mal
Aljoscha

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Benutzernamen im Dateinamen
13.01.2004 17:52:49
Panicman
Hallo Aljoscha,
hier ist ein Ansatz: (in Modul kopieren)
Private Declare 

Function getusername& Lib "advapi32.dll" Alias "GetUserNameA" (ByVal _
lpBuffer As String, nSize As Long)


Sub Speichern()
Dim username$, Länge&
'Username = Application.Username
username = String(256, 0)
Länge = 255
Call getusername(username, Länge)
USN = Left(username, Länge - 1)
ActiveWorkbook.SaveAs FileName:="C:\" & USN, _
FileFormat:=xlNormal, Password:="", WriteResPassword:="", _
ReadOnlyRecommended:=False, CreateBackup:=False
End Sub



Muß du noch anpassen.

Gruß

Holger
Anzeige
AW: Benutzernamen im Dateinamen
13.01.2004 17:53:13
andre
hallo aljoscha,
1. schaue mal in die recherche
2. schaue mal in die excel-faq
gruss andre
Die firma dankt...
13.01.2004 18:02:11
Aljoscha
...und wünscht einen schönen Abend

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige