Valutazione 4.87/ 5 (100.00%) 5838 voti

Condividi:        

eliminare colonne non contigue

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

eliminare colonne non contigue

Postdi miko » 20/06/11 13:51

salve,
dopo aver importato un file txt devo eliminare alcune colonne non contigue;
registrando la macro relativa e successivamente eseguendola ho errore nella seguente linea di codice:
Codice: Seleziona tutto
.......
Range("B:B,D:D,F:F").Select
    Range("F1").Activate
    Selection.Delete Shift:=xlToLeft  <<<<<<<<<<<
......

non essendo possibile eseguire il comando con sezioni sovrapposte.
come devo modificare la macro?
ciao grazie
windows xp-office 2003
miko
Utente Senior
 
Post: 422
Iscritto il: 29/12/09 10:44

Sponsor
 

Re: eliminare colonne non contigue

Postdi Anthony47 » 20/06/11 14:33

Devi selezionare /eliminare in blocchi di colonne contigue; quindi prima B, poi D, poi F. In pratica devi ripetere tre volte le istruzioni.

Ciao
Anthony
Win7 + Office 2010 Ita; Win 7 + Office 2013 Ita
Xp + Office 2003 Ita
E voi cosa usate? (per istruzioni vedere viewtopic.php?f=26&t=97449)
Avatar utente
Anthony47
Moderatore
 
Post: 13899
Iscritto il: 21/03/06 16:03
Località: Ivrea

Re: eliminare colonne non contigue

Postdi miko » 20/06/11 14:35

miko ha scritto:salve,
dopo aver importato un file txt devo eliminare alcune colonne non contigue;
registrando la macro relativa e successivamente eseguendola ho errore nella seguente linea di codice:
Codice: Seleziona tutto
.......
Range("B:B,D:D,F:F").Select
    Range("F1").Activate
    Selection.Delete Shift:=xlToLeft  <<<<<<<<<<<
......

non essendo possibile eseguire il comando con sezioni sovrapposte.
come devo modificare la macro?
inoltre non conosco l'ultima cella-riga occupata identica per tutte le colonne
ciao grazie
windows xp-office 2003
miko
Utente Senior
 
Post: 422
Iscritto il: 29/12/09 10:44

Re: eliminare colonne non contigue

Postdi Anthony47 » 20/06/11 14:55

E' una domanda?
Anthony
Win7 + Office 2010 Ita; Win 7 + Office 2013 Ita
Xp + Office 2003 Ita
E voi cosa usate? (per istruzioni vedere viewtopic.php?f=26&t=97449)
Avatar utente
Anthony47
Moderatore
 
Post: 13899
Iscritto il: 21/03/06 16:03
Località: Ivrea

Re: eliminare colonne non contigue

Postdi miko » 20/06/11 15:07

ciao,
se ti riferisci all'ultimo post, non è una domanda;
tentavo di aggiungere un particolare che avevo dimenticato, e ci siamo sovrapposti;
intanto ho provato il tuo suggerimento, ma anche se risolve il problema ne crea un altro;
eliminando le colonne queste si spostano verso destra e quindi la colonna D diventa la colonna E per cui la macro elimina colonne che non devono essere eliminate;
forse dopo aver eliminato la prima colonna devo vedere quella successiva da eliminare e modificare il codice;
non mi sembra una buona soluzione.
ciao, grazie
windows xp-office 2003
miko
Utente Senior
 
Post: 422
Iscritto il: 29/12/09 10:44

Re: eliminare colonne non contigue

Postdi miko » 20/06/11 18:05

ciao,
la soluzione che avevo indicato funziona, anche se non è delle migliori;
qualcuno può suggerirmi una soluzione diversa?
se dovessi eliminare sempre una stessa colonna, ad esempio la B, per un certo numero di volte, come dovrei agire?
ho scritto questo codice:
Codice: Seleziona tutto
....
a:
     Range("B:B").Select
    Selection.Delete Shift:=xlToLeft
    GoTo a
.....

ma in questo modo il ciclo non ha mai termine;
come modifico il codice se devo ripetere ad esempio 5 volte la stessa operazione?
ciao, grazie
windows xp-office 2003
miko
Utente Senior
 
Post: 422
Iscritto il: 29/12/09 10:44

Re: eliminare colonne non contigue

Postdi Anthony47 » 20/06/11 22:15

Per il primo problema, comincia eliminando le colonne piu' a destra.

Per l' altra domanda, se devi ripetere 5 volte l' eliminazione della colonna B e' perche' vuoi eliminare le colonne B:F, quindi, per cominciare basterebbe dire Range("B:F").Select
Oppure usi Range("B:B").Resize(, 5).Select

Insomma non c' e' nessun motivo per arrivare a un ciclo del tipo
For I=1 to 5
'le istruzioni per eliminare col B
Next I


Ciao
Anthony
Win7 + Office 2010 Ita; Win 7 + Office 2013 Ita
Xp + Office 2003 Ita
E voi cosa usate? (per istruzioni vedere viewtopic.php?f=26&t=97449)
Avatar utente
Anthony47
Moderatore
 
Post: 13899
Iscritto il: 21/03/06 16:03
Località: Ivrea

Re: eliminare colonne non contigue

Postdi miko » 25/06/11 10:09

ciao;
hai ragione bastava indicare e selezionare il range, dal momento che eliminiamo colonne contigue;
che stupido, io, a non averci pensato.
grazie, buon weekend.
windows xp-office 2003
miko
Utente Senior
 
Post: 422
Iscritto il: 29/12/09 10:44

Re: eliminare colonne non contigue

Postdi Flash30005 » 27/06/11 00:11

Perdona ma...
Lo stupido è quello che non capisce
tu, grazie ad Anthony, hai capito e ne farai tesoro ;)

Ciao
Flash
Win7 + Office 2010 Ita
"Fotografica" al servizio dell'immagine

Ottime opportunità di lavoro (part-time o full-time) con guadagni immediati. Info in MP
Avatar utente
Flash30005
Moderatore
 
Post: 8460
Iscritto il: 27/09/07 11:44
Località: Roma +o-


Torna a Applicazioni Office Windows


Topic correlati a "eliminare colonne non contigue":


Chi c’è in linea

Visitano il forum: Nessuno e 9 ospiti

cron