aggiungere testi in excel 2007

[piero54]

Salve, vorrei chiedervi se mi potete aiutare non essendo esperto specialmente di scritture VBA da inserire in macro, se si può fare questo: in foglio1 nelle celle B4,B6,B8,B10,B12,B14,B16,B18,B20,B22,B24 inserire dei testi che vengano riportati in foglio2 nelle celle A5,B5,C5,D5,E5,F5,G5,H5,I5,J5,K5 poi, ritornando in foglio1 sempre nelle stesse celle cambiare i testi e che si riportino in foglio2 nelle celle A6,B6,C6,D6,...K6. Così a scalare con altri testi. Spero di essere stato chiaro nel formulare la domanda. Grazie Piero

[Flash30005]

Ciao Piero54 e benvenuto nel Forum
Penso di aver capito al 70%
per migliorare questa percentuale sarebbe opportuno che pubblicassi un'immagine o un file con esempio

Ciao

[Anthony47]

Penso di aver capito l' altro 30%, quindi abbozzo una risposta...
Fai in modo che in A4 di Foglio2 ci sia gia' scritto qualcosa, es una intestazione, e poi usa questa macro:

Codice: Seleziona tutto

Sub piero1()
Range("B4,B6,B8,B10,B12,B14,B16,B18,B20,B22,B24").Copy
Sheets("Foglio2").Cells(Rows.Count, 1).End(xlUp).Offset(1, 0).PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
        :=False, Transpose:=True
Range("B4,B6,B8,B10,B12,B14,B16,B18,B20,B22,B24").ClearContents  '<< Nota 1
Application.CutCopyMode = False
End Sub


ogni volta che la lancerai i dati del range B4,B6,B8,B10,B12,B14,B16,B18,B20,B22,B24 del foglio corrente (quello su cui stai caricando i dati) verranno caricat nella prima riga libera sotto A4 di Foglio2.

Operativamente:
-da excel, Alt-F11 per aprire l' editor delle macro
-Menu /Inserisci /Modulo
-copia il codice e incollalo nel frame vuoto di dx

Torna poi su excel, Foglio1; scrivi i tuoi dati, manda in esecuzione la macro (Alt-F8, scegli piero1 dall' elenco che ti propone, premi Esegui) e controlla l' esito su Foglio2.

Se e' ok, allora puoi crearti su Fogli1 un pulsante (trovi questa forma nella barra degli strumenti Moduli), e vi associ la macro piero1 (nella fase di creazione del plsante ti sara' espressamente chiesto quale macro abbinare al pulsante); in questo modo bastera' premere il pulsante per avere i dati copiati in Foglio2.

Nota1: l' istruzione marcata << cancella le celle appena copiate su Foglio2; se questo non corrisponde al tuo processo allora cancella la riga.

Ciao, fai sapere.