Condividi:        

Excel - Somma/accoda testo di una colonna in txt temporaneo

Vuoi potenziare i tuoi documenti Word? Non sai come si fa una macro in Excel? Devi creare una presentazione in PowerPoint?
Oppure sei passato a OpenOffice e non sei sicuro di come lavorare al meglio?

Moderatori: Anthony47, Flash30005

Excel - Somma/accoda testo di una colonna in txt temporaneo

Postdi Dylan666 » 19/09/08 09:23

Ho un foglio excel con tre colonne, di cui la terza (diciamo da C4 a C100) ha degli indirizzi di posta.
Vorrei creare un bottone con associato un ciclo che prende il testo della prima cella e ci aggiunge "; ", poi ci mette anche quello della seconda e in più "; " e via via. La lunga stringa di indirizzi finale si dovrebbe aprire in una finestra a parte (con testo copiabile) o ancora meglio in un TXT non salvato (al massimo nei temp)

Suggerimenti? Io sono un po' arrugginito in materia...
Avatar utente
Dylan666
Moderatore
 
Post: 39988
Iscritto il: 18/11/03 16:46

Sponsor
 

Re: Excel - Somma/accoda testo di una colonna in txt temporaneo

Postdi Anthony47 » 19/09/08 15:00

Ciao Dylan,
guarda questa discussione: viewtopic.php?f=26&t=45895
Prevede la possibilita' di creare un elenco basato su filtro degli utenti, ma se non hai bisogno/voglia di approfittare di questa prestazione la formula e' la stessa.
Ti accumula gli indirizzi in una cella di excel, poi Contr-c e Contr-v sul client di posta.

Se non ti quadra siamo (quasi) sempre qui.
Ciao.
Avatar utente
Anthony47
Moderatore
 
Post: 19196
Iscritto il: 21/03/06 16:03
Località: Ivrea

Re: Excel - Somma/accoda testo di una colonna in txt temporaneo

Postdi Dylan666 » 21/09/08 13:04

Scusa, sono un po' di coccio... quel sarebbe la parte di codice che fa al caso mio?
Avatar utente
Dylan666
Moderatore
 
Post: 39988
Iscritto il: 18/11/03 16:46

Re: Excel - Somma/accoda testo di una colonna in txt temporaneo

Postdi Anthony47 » 21/09/08 13:10

Il messaggio di Anthony47, 15/05/06 19:41
"Ciao megatony,
mi sembra che tu stia cercando il modo di avere l' insieme degli indirizzi in funzione di un flag che hai in una colonna.
Supponiamo che hai gli indirizzi in colonna C e il flag in colonna D, dalla riga 2 in giu'; allora prova a mettere in E2 =E3&SE(D2=1;C2&"; ";""), copiando poi la formula sulle righe successive fino all' ultimo utente
Etc etc etc"

Ciao.
Avatar utente
Anthony47
Moderatore
 
Post: 19196
Iscritto il: 21/03/06 16:03
Località: Ivrea

Re: Excel - Somma/accoda testo di una colonna in txt temporaneo

Postdi Dylan666 » 21/09/08 18:24

ma senza copiare la stessa formula in tutte le celle non è più facile fare un ciclo?
Avatar utente
Dylan666
Moderatore
 
Post: 39988
Iscritto il: 18/11/03 16:46

Re: Excel - Somma/accoda testo di una colonna in txt temporaneo

Postdi Dylan666 » 21/09/08 19:51

Causa nuove esigenze devo fare la cosa sopra indicata per forza con una macro e un ciclo. Volevo partire da questo:
http://support.microsoft.com/kb/213544/it

L'esempio cancella tutte le celle che contengono "x":
Codice: Seleziona tutto
Sub DeleteCells()

    'Loop through cells A1:A10 and delete cells that contain an "x."
    For Each c in Range("A1:A10")
        If c = "x" Then c.EntireRow.Delete
    Next

End Sub

Leviamo la condizione "If", che tanto non mi interessa. vorrei ce nella clipboard o in una cella (es. X10) sia andassero a concatenare i contenuti di tutte le celle in cui passa la macro con aggiunto ";"

In .Net si scriverebbe più o meno così:


Codice: Seleziona tutto
Sub DeleteCells()

Dim X10  as String = c

    For Each c in Range("A1:A10")
        c +=  c & ";"   
Next

End Sub


Non sarà corretto ma spero di aver reso l'idea
Avatar utente
Dylan666
Moderatore
 
Post: 39988
Iscritto il: 18/11/03 16:46

Re: Excel - Somma/accoda testo di una colonna in txt temporaneo

Postdi Anthony47 » 21/09/08 20:20

Vedi questa:
Codice: Seleziona tutto
Sub SommAddres()
Uscita = "Foglio2"    '<<< Settare a piacere
For Each Addr In Range("C4", Cells(Rows.Count, 3).End(xlUp))
Tutti = Tutti & Addr.Value & "; "
Next Addr
With Sheets(Uscita).Range("A1")
 .Value = Tutti
 .ColumnWidth = 73
 .WrapText = True
End With
End Sub


Scrive in A1 del foglio che definisci nella seconda istruzione.

Ciao.
Avatar utente
Anthony47
Moderatore
 
Post: 19196
Iscritto il: 21/03/06 16:03
Località: Ivrea


Torna a Applicazioni Office Windows


Topic correlati a "Excel - Somma/accoda testo di una colonna in txt temporaneo":


Chi c’è in linea

Visitano il forum: Nessuno e 51 ospiti