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ą.