Valutazione 4.87/ 5 (100.00%) 5838 voti

Condividi:        

Eliminare valori numerici

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 valori numerici

Postdi T.Life » 22/09/12 13:50

Nel foglio 1 A1 : F25 ho una serie di valori numerici, dei quali vorrei eliminare tutti quelli che risultino uguali a quelli presenti nel foglio 3 nell’intervallo H1 / H120
T.Life
Utente Junior
 
Post: 34
Iscritto il: 22/09/12 13:44

Sponsor
 

Re: Eliminare valori numerici

Postdi Flash30005 » 22/09/12 14:04

Ciao T.life e benvenuto nel Forum

Cosa intendi per "eliminare"
1) cancellare il valore lasciando la cella vuota
2) eliminare l'intera riga o parte di riga (es. da A5 a L5) facendo salire le righe al di sotto
3) eliminare la colonna o parte di essa (come sopra)

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-

Re: Eliminare valori numerici

Postdi T.Life » 22/09/12 21:19

Cancellare il valore numerico lasciando la cella vuota. Grazie per l'interessamento !!!
T.Life
Utente Junior
 
Post: 34
Iscritto il: 22/09/12 13:44

Re: Eliminare valori numerici

Postdi Flash30005 » 22/09/12 21:58

Prova questa macro
Codice: Seleziona tutto
Sub cancellaUg()
Set ws1 = Worksheets("Foglio1")
Set Ws3 = Worksheets("Foglio3")
For RR3 = 1 To 120
ValC = Ws3.Range("H" & RR3).Value
For CC1 = 1 To 6
For RR1 = 1 To 25
If ws1.Cells(RR1, CC1).Value = ValC Then ws1.Cells(RR1, CC1).ClearContents
Next RR1
Next CC1
Next RR3
End Sub



Fai attenzione però, se le celle nel range Foglio1 da A1 a F25 ci sono formule correlate con le celle dello stesso range (A1:F25)
potresti non ottenere il risultato voluto.

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-

Re: Eliminare valori numerici

Postdi T.Life » 23/09/12 08:44

GRAZIE Flash30005 !!!!! Perfetto !!!
T.Life
Utente Junior
 
Post: 34
Iscritto il: 22/09/12 13:44

Re: Eliminare valori numerici

Postdi T.Life » 26/06/13 08:16

Questa macro elimina i valori da A1:F25. E possibile modificarla per eliminare solo quelli da A1 : A25.
T.Life
Utente Junior
 
Post: 34
Iscritto il: 22/09/12 13:44

Re: Eliminare valori numerici

Postdi Flash30005 » 26/06/13 09:37

ma il controllo lo deve fare sempre da A a F o solo su A?
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-

Re: Eliminare valori numerici

Postdi T.Life » 26/06/13 11:38

solo A
T.Life
Utente Junior
 
Post: 34
Iscritto il: 22/09/12 13:44

Re: Eliminare valori numerici

Postdi Flash30005 » 26/06/13 11:56

Codice: Seleziona tutto
    Sub cancellaUgA()
    Set ws1 = Worksheets("Foglio1")
    Set Ws3 = Worksheets("Foglio3")
    For RR3 = 1 To 120
    ValC = Ws3.Range("H" & RR3).Value

    For RR1 = 1 To 25
    If ws1.Cells(RR1, 1).Value = ValC Then ws1.Cells(RR1, 1).ClearContents
    Next RR1

    Next RR3
    End Sub


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-

Re: Eliminare valori numerici

Postdi T.Life » 26/06/13 14:44

Grazie Flash30005
T.Life
Utente Junior
 
Post: 34
Iscritto il: 22/09/12 13:44


Torna a Applicazioni Office Windows


Topic correlati a "Eliminare valori numerici":


Chi c’è in linea

Visitano il forum: albval, patel e 69 ospiti