nors tvarkingiau butu taip:

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




> 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 ?
>>>>
>>>>
>>>
>>>
>>
>>
>>
>
>