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
GELÖST

VBA code für bedingte Formatierung bei einer wenn dann Formel?

Frage Entwicklung VB for Applications

Mitglied: Rainer23

Rainer23 (Level 1) - Jetzt verbinden

30.01.2015, aktualisiert 01.03.2015, 2196 Aufrufe, 6 Kommentare

Hallo zusammen,

ich komme einfach nicht da drauf, wie der richtige vba code für folgendes Problem lautet und ich hoffe so sehr, dass jemand von euch weiter weiß.

Im ganzen Arbeitsblatt "Lieferdaten" sollen die Zellen A:O einer Zeile rot eingefärbt werden, wenn zutrifft, dass in der jeweiligen Zeile in der Spalte E etwas drinnen steht UND das Datum, dass in Spalte F in dieser Zeile steht, kleiner ist als das Datum, was in Spalte M in dieser Zeile steht.

Wenn ich die bedingte Formatierung ohne VBA eingebe, sieht das so aus:

Bedingte Formatierung (Formel)
=UND($E2<>"";$F2<$M2)
dann wähle ich die Farbe Rot zum Ausfüllen aus, klicke auf OK, und gebe den Anwendungsbereich an:
$A$2:$O$10000

Wie würde das im VBA Code aussehen?

Danke für die Hilfe!!

Viele Grüße
Mitglied: colinardo
LÖSUNG 30.01.2015, aktualisiert 01.03.2015
Hallo Rainer23, Willkommen auf Administrator.de!
Das sieht nach deiner Beschreibung so aus:
01.
With ActiveSheet.Range("$A$2:$O$10000").FormatConditions.Add(xlExpression, Formula1:="=UND($E2<>"""";$F2<$M2)") 
02.
   .Interior.Color = vbRed 
03.
End With
Grüße Uwe
Bitte warten ..
Mitglied: Rainer23
02.02.2015 um 09:59 Uhr
danke! werde ich gleich ausprobieren
Bitte warten ..
Mitglied: Rainer23
02.02.2015 um 10:00 Uhr
danke, werde ich gleich ausprobierren
Bitte warten ..
Mitglied: Rainer23
02.02.2015 um 16:17 Uhr
hat funktioniert! Tausend Dank!! Echt super ))
Bitte warten ..
Mitglied: colinardo
03.02.2015, aktualisiert um 14:33 Uhr
Wenns das dann war, den Beitrag bitte noch auf gelöst setzen. Merci.

p.s. die drei Kommentare hätte man auch in einem Kommentar zusammenfassen können.
Bitte warten ..
Ähnliche Inhalte
Microsoft Office
VBA Code zum Kopieren von einzelnen Zellen in Excel (3)

Frage von SebastianL zum Thema Microsoft Office ...

VB for Applications
gelöst VBA Code Änderung Access 2010 (6)

Frage von Dr.Cornwallis zum Thema VB for Applications ...

Microsoft Office
gelöst Bedingte Formatierung in Excel, wenn zweite Dezimalstelelle nicht eine Null ist (11)

Frage von winget zum Thema Microsoft Office ...

Neue Wissensbeiträge
Heiß diskutierte Inhalte
Festplatten, SSD, Raid
PC stellt nach dem Bios ab (20)

Frage von uridium69 zum Thema Festplatten, SSD, Raid ...

Server-Hardware
Einem Stromausfall entgegen wirken (19)

Frage von OIOOIOOIOIIOOOIIOIIOIOOO zum Thema Server-Hardware ...

Windows 7
Freeware MSI Tool (13)

Frage von uridium69 zum Thema Windows 7 ...

Microsoft Office
gelöst VBA Excel Problem mit UserForm, ListBox und TextBox (12)

Frage von abuelito zum Thema Microsoft Office ...