сохранение %username% в файл

[gabii]

Excel 2003, прошу подсказать как с помощью макроса из excel сохранить %username% в user.bat
Необходимо, чтобы при выполнении макроса, формировался батник, который потом будет запускаться на др. компе
но в батнике должно быть имя пользователя, который выполнил данный макрос
т.е. при выполнении макроса в файл должен выгрузиться
file.exe "имя пользователя"
file.exe - не изменяемый параметр
"имя пользователя" - %username% зависит от имени пользователя

[IgorGO]

application.username -это имя владельца пакета MSOffice
environ("username") - это логин, под которым пользователь загрузил Windows
и вообще-то эти два имени не должны совпадать

[slan]

Dim f As Integer, nm$
nm = "user.bat"
f = FreeFile
Open nm For Output As f
Print #f, "file.exe " & Application.UserName
Close f


создаст файл в текущей папке, чтобы в нужной, надо писать полное имя, включающее путь

[gabii]

Сообщение от slan

Dim f As Integer, nm$
nm = "user.bat"
f = FreeFile
Open nm For Output As f
Print #f, "file.exe " & Application.UserName
Close f


создаст файл в текущей папке, чтобы в нужной, надо писать полное имя, включающее путь

Почему то не получается.. в файле уже есть макрос, при выполнении которого происходит сохранение файла. Где в данном макросе необходимо разместить ваш код (прошу прощения, далек от программирования )

Sub Test1()
'
ActiveWorkbook.Save
Range("B3:G3").Select
Selection.Hyperlinks(1).Follow NewWindow:=False, AddHistory:=True
End Sub

[gabii]

Вопрос закрыт, разобрался.