Thema Datum  Von Nutzer Rating
Antwort
02.07.2026 11:19:12 Kurt
NotSolved
02.07.2026 13:52:36 Flotter Feger
NotSolved
02.07.2026 14:00:30 Gast22974
NotSolved
02.07.2026 19:52:57 xlKing
NotSolved
Rot Daten und einfärbung auf anderes Datenblatt spiegeln
 02.07.2026 21:28:37 xlKing
NotSolved

Ansicht des Beitrags:
Von:
xlKing		 Datum:
02.07.2026 21:28:37		 Views:
4		 Rating:
     
Antwort:
  Ja
Thema:
Daten und einfärbung auf anderes Datenblatt spiegeln

Falls du mit den Zahlen weiterrechnen oder das nicht nur als Bild haben willst, dann z.B. so:

in ein allgemeines Modul:

Function Uebernehmen(r As Range)
  Application.Volatile
  Tabelle2.Zellen.Add Application.Caller
  Tabelle2.Farben.Add r.Interior.Color
  Uebernehmen = r.Value
End Function

in das Modul von Tabelle2:

Public Zellen As New Collection
Public Farben As New Collection

Private Sub Worksheet_Activate()
  Application.Calculate
End Sub

Private Sub Worksheet_Calculate()
  If Zellen.Count = Farben.Count And Zellen.Count > 0 Then
    For i = 1 To Zellen.Count
      Zellen(i).Interior.Color = Farben(i)
    Next i
  End If
  Set Zellen = Nothing
  Set Farben = Nothing
End Sub

Formel in die Zielzelle von Tabelle2

=uebernehmen(Tabelle1!A1)

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
02.07.2026 11:19:12 Kurt
NotSolved
02.07.2026 13:52:36 Flotter Feger
NotSolved
02.07.2026 14:00:30 Gast22974
NotSolved
02.07.2026 19:52:57 xlKing
NotSolved
Rot Daten und einfärbung auf anderes Datenblatt spiegeln
 02.07.2026 21:28:37 xlKing
NotSolved