🚀 go-pugleaf

> Mam taki kod:
> --------------------------------------------------------------------------
> Dim Parametry As Variant
> Parametry = Array("Time", "tzewn", "tzas_msc", "tpow_msc")
> Range("A1:D1").Value = Application.WorksheetFunction.Transpose(Parametry)
> --------------------------------------------------------------------------
> Wstawienie skutkuje wypełnieniem całego zakresu A1:D1 pierwszym elementem z tablicy. Jak wypełnić zakres prawidłowymi elementami tablicy?
>
> Dzięki za wszelkie sugestie (:
>

Zupełnie nie rozumiem co Wy kombinujecie ... :( (we wszystkich 
pozostałych odpowiedziach)

jak chcesz wstawić tablicę do zakresu, robisz to wprost:
Range("A1:D1").Value = Parametry

jeśli chcesz odwrócić (przez .Transpose) zakres by mieć wartości w 
wierszach, robisz to tak:
Range("A1:A4").FormulaArray = 
Application.WorksheetFunction.Transpose(Parametry)

Po co te pętle i liczniki ? :)
Pozdrawiam

-- 
IDKrzych

"Jakkolwiek będzie - będzie inaczej, aniżeli sobie wyobrażamy
- ponieważ między Dobrem a Złem znajdujemy się w życiu i w świecie
wielowymiarowym,
w którym dokumentnie pomieszane jest Przypadkowe z Nieuchronnym."
(S. Lem 1999)