Condividi:        

ricerca e sostituzione con caratteri jolly

Vuoi potenziare i tuoi documenti Word? Non sai come si fa una macro in Excel? Devi creare una presentazione in PowerPoint?
Oppure sei passato a OpenOffice e non sei sicuro di come lavorare al meglio?

Moderatori: Anthony47, Flash30005

ricerca e sostituzione con caratteri jolly

Postdi cd7019 » 10/03/14 21:59

ciao,

Come posso sostituire i seguenti caratteri?
433s576
con 433w576.

oppure
29s1
con 29w1

    for i=1to 10
    for j=1 to 20
    if cells(i,j) like "#s#" then cells(i,j)=...
    next j
    next i
Grazie
EXCEL 2003
cd7019
Utente Senior
 
Post: 232
Iscritto il: 26/06/12 21:38

Sponsor
 

Re: ricerca e sostituzione con caratteri jolly

Postdi scossa » 10/03/14 23:24

cd7019 ha scritto:ciao,

Come posso sostituire i seguenti caratteri?
433s576
con 433w576.

oppure
29s1
con 29w1


Senza entrare nel merito del codice:
Codice: Seleziona tutto
for i=1to 10
for j=1 to 20
cells(i,j).value = replace( cells(i,j).value, "s", "w")
next j
next i
Bye!
scossa

Se tu hai una mela, e io ho una mela, e ce le scambiamo, allora tu ed io abbiamo sempre una mela per uno. Ma se tu hai un'idea, ed io ho un'idea, e ce le scambiamo, allora abbiamo entrambi due idee. (George Bernard Shaw)
Avatar utente
scossa
Utente Senior
 
Post: 427
Iscritto il: 01/04/12 16:40
Località: Provincia di Verona

Re: ricerca e sostituzione con caratteri jolly

Postdi cd7019 » 11/03/14 00:20

grazie,
ma desideravo sostituire i 3 caratteri :
numero-s-numero
con
numero-w-numero


ciao.
EXCEL 2003
cd7019
Utente Senior
 
Post: 232
Iscritto il: 26/06/12 21:38

Re: ricerca e sostituzione con caratteri jolly

Postdi ricky53 » 11/03/14 01:15

Ciao,
ed il codice di Scossa cosa fa?

Lo hai provato? ... Forse no!
Dice il vecchio saggio provare e riprovare è l'unica strada per imparare

Più chiara è la vostra spiegazione
Più immediata sarà la nostra soluzione


. . . . . . . . . .
S.O. W10; Office 2003-10-13-16-19
Avatar utente
ricky53
Utente Senior
 
Post: 4565
Iscritto il: 11/04/09 19:29
Località: Italia

Re: ricerca e sostituzione con caratteri jolly

Postdi cd7019 » 11/03/14 08:58

All'interno del mio intervallo ho dei testi che contengono anche la "s", con il comando replace mi sostituisce tutto dove trova la "s", io desidero che venga sostituito il blocco di 3 caratteri: numero "s" numero .


Grazie
EXCEL 2003
cd7019
Utente Senior
 
Post: 232
Iscritto il: 26/06/12 21:38

Re: ricerca e sostituzione con caratteri jolly

Postdi Anthony47 » 11/03/14 12:54

Prova questa versione:
Codice: Seleziona tutto
Dim I As Long, J As Long, myS As Long, myScr As String
'
For I = 1 To 10
    For J = 1 To 2
        myS = InStr(1, Cells(I, J), "s", vbTextCompare)
        If myS > 1 Then
            myScr = Mid(Cells(I, J), myS - 1, 3)
                If IsNumeric(Left(myScr, 1) & Right(myScr, 1)) Then
                Cells(I, J).Value = Replace(Cells(I, J).Value, "s", "w")
                End If
        End If
    Next J
Next I

Ciao
Avatar utente
Anthony47
Moderatore
 
Post: 19196
Iscritto il: 21/03/06 16:03
Località: Ivrea

Re: ricerca e sostituzione con caratteri jolly

Postdi cd7019 » 11/03/14 15:43

GRAZIE, GRAZIE, GRAZIE.
EXCEL 2003
cd7019
Utente Senior
 
Post: 232
Iscritto il: 26/06/12 21:38


Torna a Applicazioni Office Windows


Topic correlati a "ricerca e sostituzione con caratteri jolly":


Chi c’è in linea

Visitano il forum: raimea e 39 ospiti