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.
Excel VBA spojeni dvou dvourozmernych poli
- Branscombe
- Level 3
- Příspěvky: 469
- Registrován: červen 09
- Pohlaví:
- Stav:
Offline
Re: Excel VBA spojeni dvou dvourozmernych poli
Jde, jde skoro všechno, ale nějaký názorný příklad by pomohl. Zadání vs požadovaný výsledek.
Re: Excel VBA spojeni dvou dvourozmernych poli
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
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
Re: Excel VBA spojeni dvou dvourozmernych poli
...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
- 4791
-
od Riviera kid
Zobrazit poslední příspěvek
02 zář 2024 16:21
-
-
- 7
- 4301
-
od vasekpetr1
Zobrazit poslední příspěvek
03 úno 2025 10:39
-
- 2
- 12206
-
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
-
-
- 1
- 4657
-
od atari
Zobrazit poslední příspěvek
07 kvě 2025 09:41
Kdo je online
Uživatelé prohlížející si toto fórum: Žádní registrovaní uživatelé a 3 hosti