Top-Themen

AppleEntwicklungHardwareInternetLinuxMicrosoftMultimediaNetzwerkeOff TopicSicherheitSonstige SystemeVirtualisierungWeiterbildungZusammenarbeit

Aktuelle Themen

Administrator.de FeedbackApache ServerAppleAssemblerAudioAusbildungAuslandBackupBasicBatch & ShellBenchmarksBibliotheken & ToolkitsBlogsCloud-DiensteClusterCMSCPU, RAM, MainboardsCSSC und C++DatenbankenDatenschutzDebianDigitiales FernsehenDNSDrucker und ScannerDSL, VDSLE-BooksE-BusinessE-MailEntwicklungErkennung und -AbwehrExchange ServerFestplatten, SSD, RaidFirewallFlatratesGoogle AndroidGrafikGrafikkarten & MonitoreGroupwareHardwareHosting & HousingHTMLHumor (lol)Hyper-VIconsIDE & EditorenInformationsdiensteInstallationInstant MessagingInternetInternet DomäneniOSISDN & AnaloganschlüsseiTunesJavaJavaScriptKiXtartKVMLAN, WAN, WirelessLinuxLinux DesktopLinux NetzwerkLinux ToolsLinux UserverwaltungLizenzierungMac OS XMicrosoftMicrosoft OfficeMikroTik RouterOSMonitoringMultimediaMultimedia & ZubehörNetzwerkeNetzwerkgrundlagenNetzwerkmanagementNetzwerkprotokolleNotebook & ZubehörNovell NetwareOff TopicOpenOffice, LibreOfficeOutlook & MailPapierkorbPascal und DelphiPeripheriegerätePerlPHPPythonRechtliche FragenRedHat, CentOS, FedoraRouter & RoutingSambaSAN, NAS, DASSchriftartenSchulung & TrainingSEOServerServer-HardwareSicherheitSicherheits-ToolsSicherheitsgrundlagenSolarisSonstige SystemeSoziale NetzwerkeSpeicherkartenStudentenjobs & PraktikumSuche ProjektpartnerSuseSwitche und HubsTipps & TricksTK-Netze & GeräteUbuntuUMTS, EDGE & GPRSUtilitiesVB for ApplicationsVerschlüsselung & ZertifikateVideo & StreamingViren und TrojanerVirtualisierungVisual StudioVmwareVoice over IPWebbrowserWebentwicklungWeiterbildungWindows 7Windows 8Windows 10Windows InstallationWindows MobileWindows NetzwerkWindows ServerWindows SystemdateienWindows ToolsWindows UpdateWindows UserverwaltungWindows VistaWindows XPXenserverXMLZusammenarbeit

Dynamische Übernahme von Farbe u. Text aus einem zweiten Tabellenblatt möglich?

Frage Microsoft Microsoft Office

Mitglied: Eismann09

Eismann09 (Level 1) - Jetzt verbinden

13.01.2011 um 17:46 Uhr, 3752 Aufrufe, 1 Kommentar

Hallo,

folgende Aufgabenstellung möchte ich gerne lösen. Ich wäre Euch sehr dankbar, wenn Ihr mir dabei helfen könntet:

Aufgabenstellung:

Es existieren 2 Tabellenblätter in einer Exceldatei:

1. Tabellenblatt: Hier soll zu 10 verschiedenen Themen (Zeilen) ein „Status“ (in Form einer grünen, gelben oder roten Zellenfüllung inkl. einer kurzen Beschreibung) wiedergegeben werden. Dieser Status ist aus der Tabelle 2 zu „holen“.

2. Tabellenblatt: In dieser Tabelle werden zu den 10 Themen (Zeilen) der Status (in Form einer grünen, gelben oder roten Zellenfüllung inkl. einer kurzen Beschreibung) in jeder Woche neu aufgenommen. Dabei wird in der ersten Woche der Status in der Spalte „A“ eingetragen, in der zweiten Woche in der Spalte „B“, usw.

Frage:

Existiert in Excel eine Möglichkeit für jedes der 10 verschiedenen Themen (Zeilen) in Aufgabenblatt 1
- automatisch den Status aus der aktuellste Woche (Spalte) des 2. Tabellenblatts zu identifizieren (es ist immer die Spalte die am weitestens „rechts“ liegt und ausgefüllt ist)
- und dann den aktuellen Inhalt (Farben + kurzer Beschreibung) auf das 1. Aufgabenblatt zu projizieren?

Ich hoffe Ihr habt mein Problem verstanden. Andernfalls bitte nochmal nachfragen.

Vielen Dank.

P.S.: Ich benutztze Microsoft Excel 2003.
Mitglied: bastla
13.01.2011 um 18:15 Uhr
Hallo Eismann09 und willkommen im Forum!

Mir ist nach Deiner Beschreibung der Zusammenhang zwischen den Tabellen nicht klar: Wo stehen im 1. Tabellenblatt die Themen, und nach welchem Kriterium sollen diese Zellen das Format übernehmen?

Falls es nur darum ginge, zB aus Tabelle2!C1:C10 (C1 = derzeit von A1 aus betrachtet die am weitesten rechts mit Inhalt gefüllte Zelle der Zeile 1) die Formatierungen nach Tabelle1!A1:A10 zu übertragen, könntest Du folgendes Makro dafür verwenden:
01.
Sub Formatieren() 
02.
With Sheets("Tabelle2") 
03.
    Spalte = .Range("A1").End(xlToRight).Column 
04.
    .Cells(1, Spalte).Resize(10, 1).Copy 
05.
End With 
06.
Sheets("Tabelle1").Range("A1").PasteSpecial Paste:=xlPasteFormats 
07.
Application.CutCopyMode = False 
08.
End Sub
Sollen auch die Zellinhalte übernommen werden, dann etwa:
01.
Sub Kopieren() 
02.
With Sheets("Tabelle2") 
03.
    Spalte = .Range("A1").End(xlToRight).Column 
04.
    .Cells(1, Spalte).Resize(10, 1).Copy Destination:=Sheets("Tabelle1").Range("A1") 
05.
End With 
06.
End Sub
Ansonsten wäre ev auch einfach die Verwendung von Zellbezügen + "Bedingter Formatierung" eine Möglichkeit ...

Grüße
bastla
Bitte warten ..
Ähnliche Inhalte
VB for Applications
gelöst Zuordnen von Daten per VBA aus zweitem anderen Tabellenblättern (4)

Frage von Semmy1 zum Thema VB for Applications ...

Microsoft Office
Button für Wechseln zwischen den Tabellenblättern (6)

Frage von lupi1989 zum Thema Microsoft Office ...

Microsoft Office
gelöst Excel 2010: Tabellenblatt verknüpfen (3)

Frage von honeybee zum Thema Microsoft Office ...

VB for Applications
gelöst Tabellenblätter zusammenfassen und Kennzeichnen (7)

Frage von Semmy1 zum Thema VB for Applications ...

Neue Wissensbeiträge
Windows Update

Microsoft Update KB4034664 verursacht Probleme mit Multimonitor-Systemen

Tipp von beidermachtvongreyscull zum Thema Windows Update ...

Viren und Trojaner

CNC-Fräsen von MECANUMERIC werden (ggf.) mit Viren, Trojanern, Würmern ausgeliefert

(4)

Erfahrungsbericht von anteNope zum Thema Viren und Trojaner ...

Windows 10

Windows 10: Erste Anmeldung Animation deaktivieren

(3)

Anleitung von alemanne21 zum Thema Windows 10 ...

Heiß diskutierte Inhalte
Router & Routing
gelöst Linksys wrt1200ac v2 mit dd-wrt: keine vlan-einstellungen im GUI (15)

Frage von Pixi123 zum Thema Router & Routing ...

E-Business
Wo tragt ihr eure privaten Termine ein? (13)

Frage von honeybee zum Thema E-Business ...

Netzwerkprotokolle
Leiten "dumme" Switches VLAN-Tags mit durch? (13)

Frage von coltseavers zum Thema Netzwerkprotokolle ...

Windows Server
Terminalserver starten willkürlich neu (12)

Frage von thaefliger zum Thema Windows Server ...