PaloPa

-

Pôvodne som si to takto predstavoval. To transpose som síce našiel, ale ďalej som to už neskúšal. V marci mám dosť inej roboty.
Pekný deň ti prajem

Ahoj Pali. Celkom by ma zaujímalo prečo to musím presúvať do jednorozmerného poľa. Akosi mi uniká dôvod.
Option Base 1
Public Function spoj(rozsah As Range) As String
arr = rozsah
ReDim b(UBound(arr, 1))
For i = LBound(arr) To UBound(arr, 1)
b(i) = arr(i, 1)
Next i

spoj = Join(b, ",")
End Function

Dakujem

-

Ahoj

Pozrieš sa mi na toto? http://www.porada.sk/t258590-prevod-...ml#post2667598 možno budeš vedieť niečo poradiť. Hlavičku a pätu si nevšímaj. Prepísala som ministerstvo na Evika

-

-

-