Excel VBA spojeni dvou dvourozmernych poli

Programy pro práci v kanceláři (Word, Excel, Access…=>Office)

Moderátor: Mods_senior

honzZ
nováček
Příspěvky: 1
Registrován: březen 11
Pohlaví: Nespecifikováno
Stav:
Offline

Excel VBA spojeni dvou dvourozmernych poli

Příspěvekod honzZ » 16 bře 2011 13:07

Zdravim,

Je nejaka cesta jak spojit 2 dvourozmerna pole? (x,14)
Jde v podstate o dve nactene tabulky x radky, 14 sloupcu.
Je treba je spojit aby sly zasebou.

Nemohu pole nacist v definici(14,x) nebot vzhledem ke zdrojovym datum narazim na omezeni funkce transpose.

Za pripadnou pomoc dekuji.

Reklama
Uživatelský avatar
Branscombe
Level 3
Level 3
Příspěvky: 469
Registrován: červen 09
Pohlaví: Muž
Stav:
Offline

Re: Excel VBA spojeni dvou dvourozmernych poli

Příspěvekod Branscombe » 16 bře 2011 13:48

Jde, jde skoro všechno, ale nějaký názorný příklad by pomohl. Zadání vs požadovaný výsledek.

Uživatelský avatar
vonv
Level 1
Level 1
Příspěvky: 93
Registrován: leden 08
Pohlaví: Nespecifikováno
Stav:
Offline

Re: Excel VBA spojeni dvou dvourozmernych poli

Příspěvekod vonv » 22 bře 2011 21:47

Nešlo by to třeba takhle?

pole1(x1,14)
pole2(x2,14)

dim pole3(lbound(pole1,1),(ubound(pole1,1)-lbound(pole1,1) + 1) + (ubound(pole2,1) - lbound(pole2,1)+1)

for i=lbound(pole1,1) to (ubound(pole1,1)
for j=1 to 14
pole3(i,j)=pole1(i,j)
next j
next i

for i=ubound(pole1)+1 to (ubound(pole2,1) - lbound(pole2,1)+1)
for j=1 to 14
pole3(i,j)=pole(i,j)
next j
next i
diky všem za rady

Uživatelský avatar
vonv
Level 1
Level 1
Příspěvky: 93
Registrován: leden 08
Pohlaví: Nespecifikováno
Stav:
Offline

Re: Excel VBA spojeni dvou dvourozmernych poli

Příspěvekod vonv » 23 bře 2011 14:45

...mimochodem limit funkce Transpose je 5461 prvků v dvourozměrném poli (v matici).
diky všem za rady


  • Mohlo by vás zajímat
    Odpovědi
    Zobrazení
    Poslední příspěvek
  • EXCEL -jak otevřít 2 excel sobory abych je viděla současne a samostatně
    od Ketty02 » 30 srp 2024 21:19 » v Vše ostatní (sw)
    2
    4790
    od Riviera kid Zobrazit poslední příspěvek
    02 zář 2024 16:21
  • Výpadky spojení Wi-Fi Příloha(y)
    od vasekpetr1 » 24 led 2025 15:38 » v Sítě - hardware
    7
    4301
    od vasekpetr1 Zobrazit poslední příspěvek
    03 úno 2025 10:39
  • Přechod z Excel 21 na Excel 24
    od Snekment » 29 led 2025 13:46 » v Kancelářské balíky
    2
    12203
    od Snekment Zobrazit poslední příspěvek
    29 led 2025 15:05
  • Jaký z těchto dvou notebooků vybrat?
    od Speed_dead » 10 říj 2024 21:49 » v Rady s výběrem hw a sestavením PC
    11
    1968
    od Speed_dead Zobrazit poslední příspěvek
    12 říj 2024 21:07
  • Pohoda a excel Příloha(y)
    od brownwld » 06 kvě 2025 17:28 » v Kancelářské balíky
    1
    4649
    od atari Zobrazit poslední příspěvek
    07 kvě 2025 09:41

Zpět na “Kancelářské balíky”

Kdo je online

Uživatelé prohlížející si toto fórum: Žádní registrovaní uživatelé a 2 hosti