formattazione condizionata - per pari e dispari

[Zef]

ciao a tutti,

ho "scoperto" che Access dispone della formattazione condizionata,
in realtà l'ho sempre snobbata, ma un giorno sulla Via di damasco ...

scherzi a parte, mi sembra una cosa carina e ... utile ...
a me servirebbe cambiare il colore di fondo
associandolo al pari e dispari
esempio: 1,3,5,13...=fondo rosso ; 2,4,8,56 ...) =fondo verde

è possibile?

grazie, Zef

PS: dispongo di Access Xp e 2003

[access il top]

Post by Zef
ciao a tutti,
ho "scoperto" che Access dispone della formattazione condizionata,
in realtà l'ho sempre snobbata, ma un giorno sulla Via di damasco ...
scherzi a parte, mi sembra una cosa carina e ... utile ...
a me servirebbe cambiare il colore di fondo
associandolo al pari e dispari
esempio: 1,3,5,13...=fondo rosso ; 2,4,8,56 ...) =fondo verde
è possibile?
grazie, Zef
PS: dispongo di Access Xp e 2003

per quanto riguarda il colore di sfondo queste 3 righe impostano il
colore di sfondo al colore nero se nella casella di testo 33 c'è il
numero 3

If Me.Testo33 = 3 Then
Me.Testo33.BackColor = 1
End If

ciao.
non ho trovato niente riguardo a come si fa a sapere se un numero è pari
o dispari

[strano...mavero]

[cut]

Questa funzione indica se un numero è Primo o meno.
Rrestituisce i seguenti valori:
1 il numero è primo
0 il numero non è primo
-1 il numero è negativo


'*********************************************
'num = numero da controllare
'*********************************************
Function Primo(num As Double) As Integer
Dim indice As Integer
If num < 0 Then
Primo = -1
Exit Function
End If
If num = 1 Or num = 2 Then
Primo = 1
Else
For indice = 2 To num - 1
If num Mod indice = 0 Then
Primo = 0
Exit Function
End If
Next indice
Primo = 1
End If
End Function

[TANNHAUSER]

Post by strano...mavero
[cut]
Questa funzione indica se un numero è Primo o meno.
1 il numero è primo
0 il numero non è primo
-1 il numero è negativo
'*********************************************
'num = numero da controllare
'*********************************************
Function Primo(num As Double) As Integer
Dim indice As Integer
If num < 0 Then
Primo = -1
Exit Function
End If
If num = 1 Or num = 2 Then
Primo = 1
Else
For indice = 2 To num - 1
If num Mod indice = 0 Then
Primo = 0
Exit Function
End If
Next indice
Primo = 1
End If
End Function

Mi sembra che volesse solo determinare se un numero è pari o dispari,
quindi, dato per scontato che sia intero e positivo:

Dim resto as Integer
resto= Me.CtrNumero Mod 2
If resto=0 then Me.CtrlNumero.BackColor= x (numero corrispondente al
colore desiderato nel caso di numero pari) Else
Me.CtrlNumero.BackColor= y (numero corrispondente al colore desiderato nel
caso di numero dispari)
End If

TANNHAUSER

[Oscar Manfredini]

"Zef" <

Post by Zef
scherzi a parte, mi sembra una cosa carina e ... utile ...
a me servirebbe cambiare il colore di fondo
associandolo al pari e dispari
esempio: 1,3,5,13...=fondo rosso ; 2,4,8,56 ...) =fondo verde
è possibile?

Sul sito di Alessandro Baraldi, ho visto degli esempi.

Ciao.

[Alessandro Baraldi]

Post by Zef
ciao a tutti,
ho "scoperto" che Access dispone della formattazione condizionata,
in realtà l'ho sempre snobbata, ma un giorno sulla Via di damasco ...
scherzi a parte, mi sembra una cosa carina e ... utile ...
a me servirebbe cambiare il colore di fondo
associandolo al pari e dispari
esempio: 1,3,5,13...=fondo rosso ; 2,4,8,56 ...) =fondo verde
è possibile?
grazie, Zef
PS: dispongo di Access Xp e 2003

Sul mio sito alla sezione Forms trovi alcuni esempi,
ma se usi la formattazione condizionale puoi impostare
la Formula:

([Valore] Mod 2)>0

Questo vale TRUE se Dispari...!!!

http://www.mantuanet.it/alessandro.baraldi/

Ciao
@Alex

[Zef]

Post by Zef
scherzi a parte, mi sembra una cosa carina e ... utile ...
a me servirebbe cambiare il colore di fondo
associandolo al pari e dispari
esempio: 1,3,5,13...=fondo rosso ; 2,4,8,56 ...) =fondo verde
è possibile?

grazie a tutti per le rapide risposte!!!

quello cui cui avevo bisogno
è nell'esempio postato da Baraldi,

... le soluzioni più "semplici" ...
sono quasi sempre le più difficili!

rigrazie, Zef