22-05-2008, 14:01
|
#3
|
|
Member
Iscritto dal: Oct 2007
Messaggi: 72
|
Quote:
Originariamente inviato da MarcoGG
Dovrebbe essere possibile anche solo con le funzioni di Excel ( RICERCA... ).
In ogni caso via VBA :
Codice:
Dim str1 As String
str1 = StrConv(Range("A1").Text, vbLowerCase)
Dim test As String
test = "ciao"
If InStr(1, str1, test, vbTextCompare) > 0 Then
Range("A2").FormulaR1C1 = "SI"
Else
Range("A2").FormulaR1C1 = "NO"
End If
 |
Grazie mille
Daniele
__________________
Intel Q6600 G0 @3,2 ghz with Scythe Infinity // Asus P5K-E Wi-Fi // Asus 8800 gts 640mb // 2gb 2x1gb ddr2 800mhz a-data vitesta extreme // 2x western digital caviar SATA2 raid 0 // Masterizzatore Pioneer DVD-RW DL // Masterizzatore LG CD // OCZ 600W StealthXStream // 
|
|
|