Workbooks("userform_ukazka.xls").Activate
Worksheet("List1").Activate
Range("A1").Value = "Něco"
Pak se vrať do sešitu a na list
A nebo jen zkontroluj, zda Tvůj sešit je otevřený a pak přímo piš ...
Workbooks("userform_ukazka.xls").Worksheet("List1").Range("A1").Value = "Něco"citovat