PDA

Visualizza la versione completa : Macro Excel che agisce solo su celle con determinate sillabe


marco
02-04-2010, 05:55 PM
Ciao a tutti.
In un foglio Excel contenente un elenco di nomi di città in colonna A, faccio una semplice selezione (per esempio A100:A200 ma devo usare riferimenti relativi) e devo fare in modo che alle celle di questa selezione che contengono alcune sillabe (per esempio “reg” e “par”) , gli venga scritto un “NO” nella riga corrispondente ma in colonna B; le celle che invece non contengono quelle sillabe devono restare invariate.
Con le formule sarebbe semplice, ma non posso usarle e devo fare in modo che la macro non vada ad intaccare le celle che vengono prima o dopo la selezione.
Qualcuno può aiutarmi a creare questa macro?
Grazie

marco
02-09-2010, 07:11 PM
Ed ecco la soluzione semplice ma efficace proposta dal buon Mauro Gamberini, Microsoft MVP - Excel:
Public Sub m()
Dim c As Range
For Each c In Selection
If InStr(LCase(c.Value), "par") Or _
InStr(LCase(c.Value), "reg") Then
c.Offset(0, 1).Value = "NO"
End If
Next
Set c = Nothing
End Sub
Superfluo dire che funziona benissimo.
Grazie e alla prossima