Thema Datum  Von Nutzer Rating
Antwort
10.09.2021 15:21:53 Chris
NotSolved
Blau Werte in Tabelle mit Wert aus erster Zeile ersetzen
10.09.2021 16:21:27 xlKing
NotSolved
11.09.2021 15:33:50 Gast48340
NotSolved

Ansicht des Beitrags:
Von:
xlKing
Datum:
10.09.2021 16:21:27
Views:
230
Rating: Antwort:
  Ja
Thema:
Werte in Tabelle mit Wert aus erster Zeile ersetzen

Hallo Chris,

und das kriegst du nicht alleine hin? Du musst nur 2 Schleifen ineinander verschachteln. Die eine ist für den Durchlauf deiner 50 Tabellenblätter und die andere durchläuft die Spalten.

Sub Ersetzen()
  For Each sh In Sheets
    For Each cl In sh.UsedRange.Columns
      cl.Replace What:="X", Replacement:=cl.Cells(1), LookAt:=xlWhole
    Next cl
  Next sh
End Sub

Gruß Mr. K.


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
10.09.2021 15:21:53 Chris
NotSolved
Blau Werte in Tabelle mit Wert aus erster Zeile ersetzen
10.09.2021 16:21:27 xlKing
NotSolved
11.09.2021 15:33:50 Gast48340
NotSolved