daryk taip:
Open "C:\mano_katalogas\" & cells(5,3).value & "\Failas.txt" For Random As 
#FileNumber Len =  Len(Kodai)

"b2b" <b2b@gmail.com> wrote in message 
news:hq6a78$t2n$1@trimpas.omnitel.net...
> as dabar esu irases taip:
> Open "C:\mano_katalogas\" & "Failas.txt" For Random As #FileNumber Len = 
> Len(Kodai)
>
> man reikia, kad fraze "x" butu paimta is tam tikros excel'io celes ir 
> padeta tarp C:\mano_katalogas\" ir & "Failas.txt
>
> pvz. excel'io celeje (5,3) yra reiksme K1, tai as ta K1 noriu patalpinti 
> taip:
> C:\mano_katalogas\K1\Failas.txt
>
> sorry, jei pirmame poste ne visai aiskiai parasiau.
>
>
>
>
> "Raimis" <somebody@nomail.com> wrote in message 
> news:hq6722$p74$1@trimpas.omnitel.net...
>>
>> dim kelias as string
>> kelias= "c:\mano_katalogas\" & range("laukas_5").value
>>
>> panaudoji kintamaji kelias ten, kur reikia
>>
>>
>>
>> "b2b" <b2b@gmail.com> wrote in message 
>> news:hq4tig$vp4$1@trimpas.omnitel.net...
>>> Is excel'io VB pagalba eksportuoju informacija (laukas_1, laukas_2, 
>>> laukas_3, laukas_4) i TXT faila, kuris gali buti keliuose kataloguose, 
>>> pvz. c:\mano_katalogas\mano_1
>>>
>>> c:\mano_katalogas\mano_2
>>>
>>> c:\mano_katalogas\mano_3
>>> VB skript'e noreciau nurodyti kelia "c:\mano_katalogas\" o is excel'io 
>>> celes "laukas_5" noreciau paimti reiksme pvz. mano_1.
>>>
>>> Gal galite kas padeti ?
>>>
>>>
>>
>>
>
>
>