Pagina precedente | 1 | Pagina successiva
Vota | Stampa | Notifica email    
Autore

Errore di Cancellazione Colonne.

Ultimo Aggiornamento: 13/04/2020 18:42
Post: 3
Registrato il: 03/05/2019
Città: MAGLIE
Età: 62
Utente Junior
2007
OFFLINE
13/04/2020 14:39

Salve nel File allegato, ho inserito un Bottone che dovrebbe cancellare tutte le colonne, che nella Cella della riga 1 hanno valore uguale a "X".
Mi spiegate dove sbaglio, perchè attivando la Macro, non mi cancella tutte le colonne ma solo alcune.
Allego File.
Grazie
[Modificato da Leccese62 13/04/2020 14:40]
13/04/2020 15:13

>>>Mi spiegate dove sbaglio
Ex Elimini la colonna 17 =Ok, però intanto la 18 diventa la vecchia 17. Devi usare un ciclo (all'incontrario) che parte da colonna 35 sino a 2. Di norma la scrivo così...
Sub Elimina_Colonne()
Dim Col, x
Col = Cells(1, 16000).End(xlToLeft).Column + 1
    For x = Col To 2 Step -1
       If Cells(1, x) = "X" Then Cells(1, x).EntireColumn.Delete
   Next x
End Sub
Post: 3
Registrato il: 03/05/2019
Città: MAGLIE
Età: 62
Utente Junior
2007
OFFLINE
13/04/2020 18:42

Perfetto, và una meraviglia...
Grazie...
Vota:
Amministra Discussione: | Chiudi | Sposta | Cancella | Modifica | Notifica email Pagina precedente | 1 | Pagina successiva
Nuova Discussione
 | 
Rispondi
Cerca nel forum
Tag discussione
Discussioni Simili   [vedi tutte]
Feed | Forum | Bacheca | Album | Utenti | Cerca | Login | Registrati | Amministra
Tutti gli orari sono GMT+01:00. Adesso sono le 11:03. Versione: Stampabile | Mobile | Regolamento | Privacy
FreeForumZone [v.6.1] - Copyright © 2000-2024 FFZ srl - www.freeforumzone.com