Beh, in effetti in questo secondo messaggio hai detto come sono rappresentati il foglio e l' indirizzo target (su cui copiare), anche se non hai ancora detto dove (in quale cella) quel risultato si trova.
Sulla base di queste nuove informazioni la macro puo' essere del tipo
- Codice: Seleziona tutto
Sub Exmacro()
Dim Var1
LaCella="H1" '<<< L' indirizzo della cella con Foglio+Cella
'
'Var1 = Split(WorksheetFunction.Trim(Sheets("Foglio1").Range(LaCella)), " ")
Thisworkbook. Sheets("Foglio1").Range("A1").Copy _
Destination:=workbook("Risultati.xls").Sheets(Var1(0)).Range(Var1(1))
End Sub
Da excel, Alt-F11; ti si apre l' editor delle macro; Menu /Inserisci /Modulo; copi il ccodice e lo incolli nel frame di destra; compili l' istruzione marcata <<< con l' indirizzo da cui prelevare Foglio e cella di destinazione.
Torni su excel, eventualmente associ la macro a un pulsante in modo da poterla lanciare piu' facilmente; infine collaudi se la macro fa quello che ti aspetti.
Se No, allora spiega cosa produce la macro e che cosa invece vorresti ottenere, se hai dei messaggi di errore, di che tipo e su quale istruzione.
Ciao, fai sapere.