Thema Datum  Von Nutzer Rating
Antwort
Rot Suchen in Spalte A, Ersetzen in Spalte B
17.03.2017 09:29:20 Gast_Anfänger
NotSolved
17.03.2017 09:41:22 Crazy Tom
NotSolved
17.03.2017 09:43:48 Crazy Tom
NotSolved
17.03.2017 09:45:19 Crazy Tom
NotSolved
17.03.2017 10:32:00 Gast39373
NotSolved

Ansicht des Beitrags:
Von:
Gast_Anfänger
Datum:
17.03.2017 09:29:20
Views:
1002
Rating: Antwort:
  Ja
Thema:
Suchen in Spalte A, Ersetzen in Spalte B

Hallo zusammen,

bin leider absoluter VBA Anfänger und habe folgendes, vermutlich recht simples Problem.

 

Ich brauche ein Makro, dass Spalte A nach bestimmten festen Begriffen absucht. Wenn einer dieser festen Begriffe in Spalte A gefunden wird, soll der Wert, der in der gleichen Zeile in Spalte B steht, durch "Handel" ersetzt werden. Allerdings habe ich es bisher nur geschafft, dass der Wert in der gleichen Zelle ersetzt wird, und nicht in Spalte B. Wie kann ich den Code anpassen damit er beim Ersetzen in eine andere Spalte springt?

Sub test()
Dim wert As Range
Dim bereich As Range
Set bereich = Range("A1:B1000")

For Each wert In bereich

   If wert.Value = "Suchen" Then wert.Value = "Ersetzen"

Next

Danke!

 


Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:



  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
Rot Suchen in Spalte A, Ersetzen in Spalte B
17.03.2017 09:29:20 Gast_Anfänger
NotSolved
17.03.2017 09:41:22 Crazy Tom
NotSolved
17.03.2017 09:43:48 Crazy Tom
NotSolved
17.03.2017 09:45:19 Crazy Tom
NotSolved
17.03.2017 10:32:00 Gast39373
NotSolved