Newsgroup: it.comp.os.win.software
Titolo: consiglio macro excel?

Buongiorno a tutti
qualcuno sa come utilizzare una macro in modo da
copiare la riga di un file excel in un altro file excel, per intenderci
aggiornare un file costantemente senza il copia e incolla..
grazie a chi
puň rispondere
--------------------------------
Inviato via 
http://usenet.iol.it




Chi ha capito la domanda si faccia avanti per
favore.
Un file Excel č costituito da una cartella di lavoro che puň
contenere da una minimo di un foglio di lavoro o per grafico ad una max di
n fogli di lavoro o per grafico.
Cosa vuol dire copiare la riga di un file
excel in un altro file Excel?
Sarebbe meglio spiegarsi con degli esempi
semplici terra terra. Avremmo modo cosě di darti un aiuto. Non ti pare?
Saluti
Il Picchio


Ciao Picchio..
hai ragione sono stato poco chiaro!!!Ecco l'esempio :
chiamiamo il file TISCALI.XLS 
in riga troviamo la data ed il prezzo
ufficiale del titolo ed il volume scambi:
DATA        PREZZO    VOLUME
01/02/2002   8,4       200000
02/02/2002   8,7       190000
03/02/2002
8,6        210000
BENE! questo č il file TISCALI.XLS
Il giorno
04/02/2002 mi arriva l'aggiornamento giornaliero e quello del titolo
Tiscali č solo una riga(supponiamo la riga T) in mezzo a tante altre righe
contenute nel file AGG.XLS .
DOMANDA: con un processo automatico
(qualsiasi,io pensavo una macro) posso portare il contenuto della riga T
del file AGG.XLS all'ultima riga del file TISCALI.XLS ed in tal modo
aggiornare quest'ultimo?
ciao!
io ho un file excel contenente una
serie di dati ordinati 
Il 22 Feb 2002, 01:13, 
fsc...@inwind.it
 (Picchio)
ha scritto: 


aggiornare quest'ultimo?
Si, con una macro. Il problema principale mi sembra riconoscere
qual'e' la riga da importare, visto che non indichi da cosa si
riconosce.
-- 
Lapalissiano
Icq 57269703

Icq 57269703
La riga è la riga T come ho scritto
nell' esempio...



Nel file TISCALI.XLS la nuova riga deve accodarsi alle altre gia'
esistenti o deve sovrascrivere l'ultima?
-- 
ing. Franco Varoli
fva...@tin.it
fva...@libero.it

deve accodarsi a quelle già esistenti!
in tal modo aggiornetà il file,
questo è il mio problema, esiste questa macro che accodi la riga alla serie
di righe già esistenti?


di righe già esistenti?
Prova con questa macro:
Sub CopiaEIncolla()
    Dim Valore(256) As Variant
    Dim Riga As Long
    Dim c As Object
    Dim i As Integer
    Workbooks("Agg.xls").Activate
    Worksheets("Foglio1").Activate
    For i = 1 To 256
        Valore(i) = Cells(15, i).Value
    Next
    Workbooks("Tiscali.xls").Activate
    Worksheets("Foglio1").Activate
    For Each c In ActiveSheet.Range("A:A")
        If c.Value = "" Then
            Riga = c.Row
            For i = 1 To 256
                Cells(Riga, i).Value = Valore(i)
            Next
            GoTo Fine
        End If
    Next c
Fine:
End Sub
La macro puo' essere inserita in una cartella vuota, ma i file
Tiscali.xls e Agg.xls devono essere gia' aperti.
Si suppone che i fogli dei due file contenenti i dati siano in
entrambi i casi il Foglio1. Se cosi' non e' si devono modificare le
righe che contengono il riferimento ai fogli.
Si suppone anche che la riga di Agg da copiare sia la 15. Se cosi' non
e' si cambia il valore nella riga
Valore(i) = Cells(15, i).Value
La riga viene copiata tale e quale sul file Tiscali all'altezza della
prima riga vuota della colonna A. Ad esempio se il file Tiscali ha
nella colonna A le prime 156 celle non vuote i valori letti in
precedenza verranno copiati sulla riga 157.
Un successivo lancio della macro, ad esempio il giorno dopo,
ricopiera' i valori sulla riga 158, se questa e' vuota altrimenti
saltera' le righe non vuote e la copiera' sulla prima riga vuota.
