[Risolto] trova e sostituisci Formule utilizzando la Macro

[chimico]

Saluti ,

è necessario creare una Macro per trovare una String particolare nelle Formule della colonna "N" e sostituirla con un'altra String .

per esempio:

Trova nelle Formule della colonna "N" i caratteri minuscoli "abcd" e poi Sostituisci con i caratteri "ABCD" maiuscoli .

osservazione:

questo processo deve essere eseguito solo nelle Formule della colonna "N" .


abbracci .

[patel]

allega un file di esempio

[chimico]

segue il file allegato .

la Macro dovrebbe trovare la stringa "abcd" nelle Formule della colonna "N", e quindi Sostituire con la stringa "ABCD" .

osservazione:

non sempre nella colonna "N" le Formule hanno caratteri "abcd", quindi la Macro deve cercare "abcd" e quindi, se trova, deve sostituire .

[patel]

Codice: Seleziona tutto

Sub Main
Doc = ThisComponent
Sh = Doc.Sheets(0)
r=1
do while Sh.getCellRangeByName("M" & r).String <> ""
  s = Sh.getCellRangeByName("N" & r).FormulaLocal
  rep = Replace(s,"abcd","ABCD")
  Sh.getCellRangeByName("N" & r).FormulaLocal= rep
  r=r+1
loop
End Sub

[chimico]

sr. patel ,
questo è quello che stavo cercando .

Grazie mille, amico mio.

abbracci .