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:

codice:

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

Discussioni simili
Discussione	Ha iniziato questa discussione	Forum	Risposte	Ultimo messaggio
Sloccare Excel bloccato in apertura di collegamento internet	valerio	Informatica	4	07-30-2013 12:25 PM
Accedere a celle foglio Excel con javascript	phpweb	Informatica	0	11-12-2009 11:31 AM
Rendere il testo minuscolo in una selezione di celle Excel	marco	Informatica	1	10-13-2009 03:21 PM
Verificare la presenza di caratteri semplici in celle Excel	Orlando	Informatica	1	12-21-2008 07:05 PM
Macro Excel che esegua una somma numeri nella stessa cella	PIPPO1	Informatica	3	07-26-2008 08:12 PM

Menu

Macro Excel che agisce solo su celle con determinate sillabe