Ich habe ein Dokument mit einer Produktlänge | Produktname | und ProduktpreisMehrere Zeilen in Excel finden und ersetzen
ich diesen Code verwendet habe, fand ich online den Produktpreis zu ersetzen:
Sub Multi_FindReplaceALL_pvc_replace_new()
'PURPOSE: Find & Replace a list of text/values throughout entire workbook
'SOURCE: www.TheSpreadsheetGuru.com/the-code-vault
Dim sht As Worksheet
Dim fndList As Variant
Dim rplcList As Variant
Dim x As Long
fndList = Array("2 ft", "PVC", "390")
rplcList = Array("2 ft", "PVC", "290")
'Loop through each item in Array lists
For x = LBound(fndList) To UBound(fndList)
'Loop through each worksheet in ActiveWorkbook
For Each sht In ActiveWorkbook.Worksheets
sht.Cells.Replace What:=fndList(x), Replacement:=rplcList(x), _
LookAt:=xlPart, SearchOrder:=xlByRows, MatchCase:=False, _
SearchFormat:=False, ReplaceFormat:=False
Next sht
Next x
End Sub
Das Problem, das ich habe, ist der VB-Skript ersetzt die Produktnamen Acrylic die Preisgestaltung als auch.
Jede Hilfe würde sehr geschätzt werden. Ich kann bei Bedarf auch zusätzliche Informationen liefern.
Bildlink von Doc: http://prntscr.com/h1votx
Bitte erläutern Sie, wie Sie erwarten, dass Ihr Code funktioniert. –
Was hat die Preisgestaltung mit dem von Ihnen geposteten Code zu tun? Wie würden wir/Sie wissen, was die aktualisierte Preisgestaltung sein sollte? – BruceWayne
Ich möchte den 2 ft PVC-Preis von 390 bis 290 über alle 2 ft PVC-Produkte ändern. Ist das sinnvoll? –