Aiutamici Forum
Benvenuto Ospite Cerca | Topic Attivi | Utenti | | Log In | Registra

aiuto Opzioni
suunto69
Inviato: Saturday, April 05, 2014 2:23:16 PM
Rank: Member

Iscritto dal : 11/8/2008
Posts: 18
salve cerco una formula che mi restituisca 0 se il colore di una lettera (rossa) di una cella è uguale al colore di un'altra cella (rossa)
es:
su due righe A1-A30 ed B1-B30 nella righa A1-B30 i colori variano a secondo a delle condizioni, in B1-B30 quando il colore della lettera es. B5 e uguale al colore della cella A5 e rorro mi deve dare 0
come posso fare
grazie
Sponsor
Inviato: Saturday, April 05, 2014 2:23:16 PM

 
lui49
Inviato: Tuesday, April 08, 2014 9:10:09 PM
Rank: AiutAmico

Iscritto dal : 5/4/2003
Posts: 2,498
soluzione da perfetto inesperto:

in un modulo metti:

Code:
Sub colori()
Dim colonna As Integer
Dim color1 As Integer
Dim color2 As Integer
For colonna = 1 To 30
color1 = Cells(1, colonna).Font.ColorIndex
color2 = Cells(2, colonna).Font.ColorIndex
If color1 = 3 And color2 = 3 Then
Cells(2, colonna).Value = 0
End If
Next colonna
End Sub


e nel foglio metti un pulsante cui assegni la macro.....
Utenti presenti in questo topic
Guest


Salta al Forum
Aggiunta nuovi Topic disabilitata in questo forum.
Risposte disabilitate in questo forum.
Eliminazione tuoi Post disabilitata in questo forum.
Modifica dei tuoi post disabilitata in questo forum.
Creazione Sondaggi disabilitata in questo forum.
Voto ai sondaggi disabilitato in questo forum.

Main Forum RSS : RSS

Aiutamici Theme
Powered by Yet Another Forum.net versione 1.9.1.8 (NET v2.0) - 3/29/2008
Copyright © 2003-2008 Yet Another Forum.net. All rights reserved.