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

Come eliminare i numeri non colorati

Ultimo Aggiornamento: 05/01/2020 12:34
Post: 73
Registrato il: 27/05/2019
Città: MILANO
Età: 56
Utente Junior
2016
OFFLINE
05/01/2020 11:47

Ciao e Buon Anno, mi servirebbe un modo per eliminare i numeri non
colorati da un gruppo di numeri come nel file allegato come esempio.
Siccome i numeri da eliminare sono tanti, giusto per sveltire.
Grazie mille.
Post: 1.866
Registrato il: 10/10/2013
Città: VICENZA
Età: 69
Utente Veteran
365
ONLINE
05/01/2020 12:26

ciao
in un modulo
Option Explicit

Sub Cancella()
Dim x As Long
Dim y As Long
For x = 1 To 16
For y = 2 To 7
If Cells(x, y).Interior.Color <> RGB(0, 176, 240) Then
Cells(x, y).ClearContents

End If
Next
Next
End Sub


poi collegala dove vuoi tu
[Modificato da federico460 05/01/2020 12:27]
Post: 73
Registrato il: 27/05/2019
Città: MILANO
Età: 56
Utente Junior
2016
OFFLINE
05/01/2020 12:34

Grazie mille.
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 12:36. Versione: Stampabile | Mobile | Regolamento | Privacy
FreeForumZone [v.6.1] - Copyright © 2000-2024 FFZ srl - www.freeforumzone.com