Thema Datum  Von Nutzer Rating
Antwort
Rot wechselweise Zeilenfärbung
 27.01.2023 15:36:56 vltier
NotSolved
27.01.2023 15:56:18 Gast69250
NotSolved
28.01.2023 08:11:22 RPP63
NotSolved
29.01.2023 11:35:18 Gast1560
NotSolved
29.01.2023 13:24:06 vltier
Solved
29.01.2023 19:08:58 xlKing
NotSolved

Ansicht des Beitrags:
Von:
vltier		 Datum:
27.01.2023 15:36:56		 Views:
580		 Rating:
     
Antwort:
  Ja
Thema:
wechselweise Zeilenfärbung

Geschätzte Gemeinde,

ich verscuche mich viel mit copy and paste. N

Nachstehender Code funktioniert für eine wechselweise Zeilenfärbung wunderbar, wenn ich nur ein Tabellenblatt habe:

=========================

Dim Zeile As Range, ZeilenNr As Integer
    For Each Zeile In Selection.Rows
    ZeilenNr = ZeilenNr + 1
    If ZeilenNr Mod 2 = 0 Then
        Zeile.Interior.ColorIndex = 0
        Else
        Zeile.Interior.Color = RGB(232, 232, 232)
    End If
Next

=========================

Wenn ich den code ein das zweite oder jedes weitere Tabellenblatt einer Datei einfüge, erhalte ich die Fehlermeldung: "Fehler beim Kompilieren:Mehrfachdeklaration im aktuellen Gültigkeitsbereich"

Kann mir jemand auf die sprünge helfen?

 

 

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 wechselweise Zeilenfärbung
 27.01.2023 15:36:56 vltier
NotSolved
27.01.2023 15:56:18 Gast69250
NotSolved
28.01.2023 08:11:22 RPP63
NotSolved
29.01.2023 11:35:18 Gast1560
NotSolved
29.01.2023 13:24:06 vltier
Solved
29.01.2023 19:08:58 xlKing
NotSolved