MS Excel

????
Jaký userform? Nic takového v souboru není.
Nebo motáš několik věcí dohromady?
Nevidím důvod, proč by ten řádek kódu neměl být funkční pod UserFormem. Jakou hodnotu má proměnná RowsA?citovat

poznámka:
v:
'MaxRadekV = List3.Cells(Rows.Count, 4).End(xlUp).Row 'poslední obsazený řádek v listu Vstupy .... nevím jestli muže být jmeno listu

používáte zde název listu3 jako označení pořadí toho listu jak ho nazval excel?
Můžu ho přejmenovat takto?

MaxRadekV = Worksheets("Vstupy").Cells(Rows.Count, 4).End(xlUp).Row 'poslední obsazený řádek v listu Vstupy

pokud ano, asi to musím nahradit všude v makru, že ? List3 za Worksheets("Vstupy").citovat

ad 19:25
Konkrétně Makro1 předává hodnotu Makru2 né naopak.
Pokud chceš, aby byla proměnná dostupná pro více procedur a byla dostupná i po ukončení některé z nich, tak ji deklaruj na začátku modulu (mimo jakoukoliv proceduru).
https://macerayarislari.com/cs/300-examples/300-excel-vba-byref-and-byval.html
https://www.youtube.com/watch?v=OY6vA_3w96M

ad 20:36
List3 a List4 je tzv CodeName listu, který si můžeš změnit na něco smysluplnějšího v okně Properties např wsVstupy a wsICA.
Fór je v tom, že tento název je dostupný pouze v editoru VBA a je nezávislý na názvu (Name) listu, který se Ti zobrazuje na oušku.

Samozřejmě můžeš v kódu místo Codename List3 použít Worksheets("Vstupy") a ano je potřeba provést změnu v celém kódu.
Pokud ale uvedeš jméno listu "natvrdo" do kódu [(Worksheets("Vstupy")] a poté se rozhodneš Ty nebo někdo jiný název listu změnit, kód nebude funkční a budeš muset provést úpravu kódu.
Pokud budeš používat CodeName listu, tento problém odpadá.

ad 21:11
soubor upravencitovat

Zdravím
vyměnil jste pouze řádek na konci ?

.Cells(3, 6).Resize(UBound(arrA)).Value = Application.Transpose(arrA)
za
.Cells(3, 6).Resize(UBound(arrA)).Value = arrA

jinak nic, žádná změna v kodu ?citovat

OK, už jsem to prošel, funguje, Děkuju !
Hezký večercitovat