Formula per la formattazione condizionale help

[papiriof]

vorrei far evidenziare dei numeri (da 1 a 90 formattati a numero non a testo) a secondo che al loro interno contengano una certa cifra che io metterò ad esempio in Z1 . I numeri 1 ,2,3......9 sono formati da una sola cifra ma vorrei che fossero evivenziati anche se in Z1 metta 0 considerandoli come se avessero uno 0 avanti -
Esempio se metto la cifra 6 mi deve evidenziare sia 6 sia 60 , 61......69 e anche 16,26,36.......86 si puà fare?

[Marius44]

Ciao
Non son sicuro d'aver capito bene ma prova con questa macro (i valori da evidenziare nell'intervallo A1:J9 e il valore da cercare in L2)

Codice: Seleziona tutto

Option Explicit

Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Range("L2")) Is Nothing Then
Dim n(1 To 2) As String, m(1 To 2) As String
Dim nm As String, num As String
Dim i As Long, j As Long, k As Long

  Range("A1:J9").Interior.ColorIndex = xlNone
  nm = Cells(2, 12)
  If IsEmpty(nm) Or nm = "" Then Exit Sub
  nm = Format(nm, "#0")
  For i = 1 To 2
    n(i) = Mid(nm, i, 1)
  Next i
  For i = 1 To 9
    For j = 1 To 10
      num = Format(Cells(i, j), "#0")
      For k = 1 To 2
        m(k) = Mid(num, k, 1)
      Next k
      If Val(num) <= 9 Then
        If Val(nm) = Val(m(1)) Then Cells(i, j).Interior.ColorIndex = 6
      Else
        If n(1) = m(1) Or n(2) = m(2) Or _
          n(1) = m(2) Or n(2) = m(1) Then
          Cells(i, j).Interior.ColorIndex = 6
        End If
      End If
    Next j
  Next i
End If
End Sub


Fai sapere. Ciao,
Mario

[klingklang]

Ciao, in alternativa alla macro di Marius, che saluto, prova ad applicare all'intervallo (che in questo esempio inizia in A1) questa formula di formattazione condizionale:

Codice: Seleziona tutto

=SE.ERRORE(TROVA($Z$1;A1;1);0)+((LUNGHEZZA(A1)=1)*($Z$1=0))

[papiriof]

Ringrazio Marius e KlingKlang, per quanto rigarda la macro di Marius non sono riuscito ad adattarla ai miei bisogni (almeno finora )
invece la formula di KlingKlang funge al 90% in quanto se metto lo 0 non mi evidenzia i num da 1 a 9 , poco male perchè essendo una cosa per di più visiva mi riesce molto facile individuare il restante 10% una volta che mi evidenzia tutto il resto.

[klingklang]

Ciao, è strano perché a me funziona al... 100%, vedi questo file allegato: http://www.filedropper.com/condizionale

[papiriof]

Ciao, è strano perché a me funziona al... 100%, vedi questo file allegato: http://www.filedropper.com/condizionale

Scusa klingklang,hai perfettamente ragione ,il problema era che dovendo io cambiare i riferimenti (da me il controllo cominciava al posto di A1 in " D2104 " in una parte della formula quel " D2104 " diventava " D21041 " e quell'uno (1) in più mi causava quell'errore.
A proposito c'è il modo di allargare la finestra dove si va a mettere la formula per la formattazione condizionale? è talmente piccola che per quelli come me è un problema , Grazie ancora

[Anthony47]

A proposito c'è il modo di allargare la finestra dove si va a mettere la formula per la formattazione condizionale? è talmente piccola che per quelli come me è un problema , Grazie ancora

Secondo me non e' regolabile; pero' puoi provare a impostare, in "Impostazioni di Accessibilità", l'ingrandimento delle schermate; se poi vedi che e' tutto troppo grosso puoi impostare uno zoom <100%

Ciao