problemi con il comando "Union"

[Ale75]

Salve,

ho un problema che non capisco.

ho creato una macro che copia dei campi da un foglio e li incolla in un altro foglio di un altro documento.
Essendo i dati su colonne non conigue ho usato il comando Union

Set UnioneColonne = Union(AAA, BBB, CCC, DDD, EEE)

dove AAA , BBB ecc ecc sono le colonne.
il problema è che la macro gira ... ma solo quando gli PARE !!!

gira correttamente poi ogni tanto mi manda un messaggio assurdo:
RUN-TIME ERROR "1004":
This action won't work on multiple selection

è mi evidenzai il comando con cui incollo il campo union

UnioneColonne.Copy Worksheets("NomePagina").Range("A1")

sapete dirmi da cosa puo dipendere?
perche ripeto, a volte gira correttamente ....


grazie,
ale

[Marius44]

Ciao
Prova mettendo il copia/incolla su due righe, cioè

UnioneColonne.Copy
Worksheets("NomePagina").Range("A1").PasteSpecial

Ciao,
Mario

[Anthony47]

Hummm... non credo che il suggerimento di Mario possa essere risolutivo.

Per poter funzionare, i vari AAA, BBB, CCC etc devono produrre un'area rettangolare, cioe' cominciare sulla stessa riga e avere la stessa altezza; evidentemente spesso questo non succede...

Puoi aggirare eseguendo copie separate per le varie aree; es

Codice: Seleziona tutto

Range("A1:A100").Copy Worksheets("NomePagina").Range("A1")
Range("C1:C50").Copy Worksheets("NomePagina").Range("B1")
Range("F10:F20").Copy Worksheets("NomePagina").Range("C1")

Ciao

[Ale75]

ok grazie