Ačiū. Lengva ir paprasta. :)
Internete radau truputi sudėtingesnį variantą, bet leidžia dar ir vartotojo 
vardą loginti, ne vien tik kompiuterio vardą.




"Raimis" <somebody@nomail.com> parašė naujienų 
news:hlipbr$8ue$1@trimpas.omnitel.net...
> na pvz :
>
> Range("I3").Value= Environ$("computername")
>
>
> "RV" <ramunasvaitkevicius@gmail.com> wrote in message 
> news:hlhk53$k80$1@trimpas.omnitel.net...
>> Sveiki visi,
>> reikia exel makrose sukurti kažkokį įrašiuką, kuris pažymėtoje celėje 
>> įrašytų kompo, iš kurio buvo atliktas šio makroso vykdymas, vardą.
>> Įrašymo metu buvusį laiką įterpiu taip:
>>
>>
>>    Range("I2").Select
>>      Selection.FormulaR1C1 = "=NOW()"
>>    ActiveCell.Select
>>    Selection.Copy
>>    Selection.PasteSpecial Paste:=xlValues, Operation:=xlNone, 
>> SkipBlanks:= _
>>        False, Transpose:=False
>>    Application.CutCopyMode = False
>>
>>
>> Kažko panašaus reikėtų ir dėl įrašo apie kompą.
>
>