Valutazione 4.87/ 5 (100.00%) 5838 voti

Condividi:        

Excel Macro per evidenziare

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 Macro per evidenziare

Postdi Statix » 27/04/11 09:56

Ciao a tutti,spero che avete trascorso una Buona Pasqua,
la pasquetta è stata così così,causa maltempo.
veniamo a noi,ho un problema da risolvere ad un amico,
ho un range di 20 righe e 90 colonne range C6:CN25 con dati
range C2:CN2 90 colonne numerate da 1 a 90
range CQ6:CU6 ho 5 numeri
range CW6:DA6 ho dati con lettere e numeri,
quello che devo fare e evidenziare le lettere e numeri del range CW6:DA6
nella riga C6:CN6 facendo riferimento ai numeri del range CQ6:CU6
questo va fatto per tutte le 20 righe,una per una .
non so se sono stato chiaro,provo con un esempio.
questa foto, mostra solo l'ultima decina gia evidenziata a mano,
ogni numero ha il suo riferimento
CQ7 12 = CW7 punto
CR7 83 = CX7 7
CS7 90 = CY7 7
CT7 6 = CZ7 punto
CU7 72 = DA7 punto

Immagine

Immagine
Statix
Windows 7,
Office 2010,
Statix
Utente Senior
 
Post: 1078
Iscritto il: 12/05/06 21:55
Località: Provincia di Caserta

Sponsor
 

Re: Excel Macro per evidenziare

Postdi Statix » 27/04/11 11:05

Pensandoci bene,
credo che si potrebbe fare in un altro modo,
tipo cerca.orizzontale numero ,evidenzia indice.
esempio in C2:CN2 ho i numeri da 1 a 90
in CQ6:CU6 i 5 numeri
la macro dovrebbe cercare tipo formula
=cerca.orizz(CQ6;C2:CN25;5;falso) evidenziando la cella trovata se è un numero o lettera,
così per tutte le 20 righe cambiando di volta in volta l'indice
Statix
Windows 7,
Office 2010,
Statix
Utente Senior
 
Post: 1078
Iscritto il: 12/05/06 21:55
Località: Provincia di Caserta

Re: Excel Macro per evidenziare

Postdi Anthony47 » 27/04/11 13:14

Se il foglio non e' pesante potresti provare con la formattazione condizionale:
-selezioni l' area C6:CN25 e avvii la formattazione condizionale
-condizione1="la formula è"
-come formula usi
Codice: Seleziona tutto
=SE(VAL.ERRORE(CONFRONTA(C$2;$CQ6:$CU6;0));0;SE(SCARTO($CV6;0;CONFRONTA(C$2;$CQ6:$CU6;0))=C6;1;0))

-imposti il "motivo" che ti piace; chiudi la formattazione condizionale

Se cosi' non risolvi allora potrebbe essere utile un file di prova, per evitare di starsene a creare uno.

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: 13892
Iscritto il: 21/03/06 16:03
Località: Ivrea

Re: Excel Macro per evidenziare

Postdi Statix » 27/04/11 14:31

Ciao Anthony,
ho testato la formattazione ,va bene, su questo non c'era nessun dubbio, :)
tranne per i punti che non dovrebbero essere visualizzati ma a questo già avevo risolto.
ho bisogno di una macro,ti allego un file per il test.
per il semplice motivo che i dati nel foglio vengono incollati riga su riga dopo ogni elaborazione
nel foglio attualmente ci sono solo 15 righe di dati, ma possono essere anche di più,
diciamo che max 100 righe sono più che sufficienti.quindi ho un range di righe variabili,
quindi sarebbe opportuno che una volta che io ho fatto un elaborazione di tot righe,
successivamente lancio la macro che mi va ad evidenziare i valori.
per i punti eventualmente li sostituisco con trattino.
http://www.megaupload.com/?d=74JO84ZN
Statix
Windows 7,
Office 2010,
Statix
Utente Senior
 
Post: 1078
Iscritto il: 12/05/06 21:55
Località: Provincia di Caserta

Re: Excel Macro per evidenziare

Postdi Anthony47 » 27/04/11 23:53

Dovrebbe andare questa macro:
Codice: Seleziona tutto
Sub Highl()
Range("C6:CN10000").Interior.ColorIndex = xlNone
For I = 6 To Cells(Rows.Count, "CQ").End(xlUp).Row
    For J = 0 To 4
        If Cells(I, Cells(I, "CQ").Offset(0, J).Value + 2) = Cells(I, "CQ").Offset(0, J + 6).Value Then
            If Cells(I, Cells(I, "CQ").Offset(0, J).Value + 2) <> "." Then Cells(I, Cells(I, "CQ").Offset(0, J).Value + 2).Interior.ColorIndex = 4
        End If
    Next J
Next I
End Sub

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: 13892
Iscritto il: 21/03/06 16:03
Località: Ivrea

Re: Excel Macro per evidenziare

Postdi Statix » 28/04/11 12:30

Ciao Anthony,
la macro è perfetta,
ho visto che hai messo anche la condizione del punto.
grazie ,sei un vero Tutor. ;) ;)
Statix
Windows 7,
Office 2010,
Statix
Utente Senior
 
Post: 1078
Iscritto il: 12/05/06 21:55
Località: Provincia di Caserta


Torna a Applicazioni Office Windows


Topic correlati a "Excel Macro per evidenziare":


Chi c’è in linea

Visitano il forum: Nessuno e 21 ospiti