🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: pl.comp.lang.vbasic
Article #104455

Re: funkcja do zlaczania wszystkich elem tbl(y,x) w jeden string...

#104455
From: Michal AKA Miki
Date: Tue, 02 Feb 2010 07:55
41 lines
2312 bytes
Uzytkownik "ThomasX" <matuss@o2.pl> napisal w wiadomosci 
news:98addcb2-c2b0-4d08-a438-d2fb2a5ad89d@n33g2000yqb.googlegroups.com...
> Chce wypisac wszystkie elementy dynamicznej tabl(y, x) tak by
> znajdowaly sie w jednej komorce excela.
> Wartosciami tablicy sa stringi. Funkcja Join nie dziala do tablic
> wielowymiarowych :(
> Napewno zrobie to w petli:
>
> for x=1 to UBound(tabl,2) Step 1
>      .....
> next x
>
> Probowalem tez poprzez &, ale VBA wywala bledy (pewnie za duzo zlaczen)

Pewnie dlatego nie robi tego dla wielowymiarowych, ze nie wiadomo, jaka jest 
kolejnosc laczenia.. czy najpierw powinien isc po x, czy po y, czy po z czy 
po innych wymiarach...
A moze dlatego, ze w tablicy wielowymiarowej moga sie znajdowac tablice 
jednowymiarowe o zmiennych dlugosciach...

Pytanko tez, czy tablica jest zadeklarowana w taki sposob, ze zaczyna od 
indeksu 1 (jak u ciebie) czy tez od indeksu 0 (jak jest domyslnie).

taki krotki test - u mnie zadzialal

Sub test()
x = Array(Array(1, 2), Array(3, 4))

    For i = 0 To UBound(x, 1)
        tmp = tmp & Join(x(i), " ") & " "
    Next i
    MsgBox tmp
End Sub


aha - pamietaj, ze jesli chcesz potem zmienna przepisac do komorki, to 
zawsze trzeba pamietac, ze w excelu komorka ma ograniczona ilosc znakow.

Pozdrawiam
Michal
Technical Details
Message-ID: <hk8lpl$ai4$1@inews.gazeta.pl>
Path: mbox-mo1.pugleaf.net!news-archive.icm.edu.pl!news.gazeta.pl!not-for-mail
References: <98addcb2-c2b0-4d08-a438-d2fb2a5ad89d@n33g2000yqb.googlegroups.com>

Show Full Headers
Complete Article Headers
Path: mbox-mo1.pugleaf.net!news-archive.icm.edu.pl!news.gazeta.pl!not-for-mail
From: "Michal AKA Miki" <jakistammichal@z.onetu.pl>
Newsgroups: pl.comp.lang.vbasic
Subject: Re: funkcja do zlaczania wszystkich elem tbl(y,x) w jeden string...
Date: Tue, 2 Feb 2010 08:55:28 +0100
Organization: "Portal Gazeta.pl -> http://www.gazeta.pl"
Lines: 43
Message-ID: <hk8lpl$ai4$1@inews.gazeta.pl>
References: <98addcb2-c2b0-4d08-a438-d2fb2a5ad89d@n33g2000yqb.googlegroups.com>
NNTP-Posting-Host: mjelinski.tsi.tychy.pl
X-Trace: inews.gazeta.pl 1265097333 10820 83.142.120.170 (2 Feb 2010 07:55:33 GMT)
X-Complaints-To: usenet@agora.pl
NNTP-Posting-Date: Tue, 2 Feb 2010 07:55:33 +0000 (UTC)
X-MimeOLE: Produced By Microsoft MimeOLE V6.00.2900.5512
X-Priority: 3
X-RFC2646: Format=Flowed; Original
X-Newsreader: Microsoft Outlook Express 6.00.2900.5512
X-User: michalakamiki
X-MSMail-Priority: Normal
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 7bit