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, 1911 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 ..
Neuester Wissensbeitrag
Off Topic

"Ich habe nichts zu verbergen"

(2)

Erfahrungsbericht von FA-jka zum Thema Off Topic ...

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

Frage von winget zum Thema Microsoft Office ...

Microsoft Office
gelöst Bedingte Formatierung in Excel für verschiedene Dezimalstellen (6)

Frage von winget zum Thema Microsoft Office ...

Microsoft Office
gelöst EXCEL Bedingte Formatierung wenn bestimmtes Jahr im Datum ist (6)

Frage von Hobi84 zum Thema Microsoft Office ...

Heiß diskutierte Inhalte
Linux Netzwerk
gelöst DHCP vergibt keine Adressen (32)

Frage von Maik82 zum Thema Linux Netzwerk ...

Apache Server
gelöst Lets Encrypt SSL mit Apache2 (20)

Frage von banane31 zum Thema Apache Server ...

CPU, RAM, Mainboards
Kaufberatung für mind. 8 verschiedene HighEnd-Mainboards (20)

Frage von yperiu zum Thema CPU, RAM, Mainboards ...

Hardware
gelöst PCI-Express-Adapterfrage (14)

Frage von DerWoWusste zum Thema Hardware ...