Herbers Excel-Forum - das Archiv
Dropdown
- Dropdown von Michael vom 26.09.2003 07:34:48
Betrifft: Dropdown
von: Michael
Geschrieben am: 26.09.2003 07:34:48
hi,
ich brauch in einem exceldokument in einer spalte ein dropdownmenü, welches drei buchstaben enthält! (X, I, O) Nach auswahl eines dieser buchstaben soll folgendes makro erkennen, ob in dem dropdownmenü ein x ausgewählt worden ist und makiert diese zeile dann grau:
Sub Status()
Dim I As Long
For I = 15 To Sheets("Action Item List").UsedRange.SpecialCells(xlCellTypeLastCell).Row
If UCase(Cells(I, 4).Value) = "X" Then
Worksheets("Action Item List").Range(Cells(I, 1), Cells(I, 11)).Interior.ColorIndex = 15
Else
Worksheets("Action Item List").Range(Cells(I, 1), Cells(I, 11)).Interior.ColorIndex = 2
End If
Next
End Sub
wie bekomme ich so ein dropdown menü in mein exceldokument und was muss ich in meinem makro abändern, dass es mit dem dropdown menü arbeitet.
ich freu mich über jede hilfe!
Gruss
Michael
Betrifft: AW: Dropdown
von: Galenzo
Geschrieben am: 26.09.2003 07:54:26
Hallo,
mach' es dir doch nicht so schwer und nimm für die Einfärbung der Zellen die
"Bedingte Formatierung".
mfg - Galenzo
Betrifft: AW: Dropdown
von: Michael
Geschrieben am: 26.09.2003 07:55:48
wie genau geht das?
Betrifft: AW: Dropdown
von: Galenzo
Geschrieben am: 26.09.2003 08:11:05
Vorgehensweise:
1. Markiere die komplette Spalte
2. Menü: "Format/Bedingte Formatierung" - es öffnet sich das entsprechende Menü
3. Bedingung 1 eingeben: "Zellwert ist" + "gleich" + X
4. Knopf "Format" drücken und dort unter "Muster" die gewünschte Hintergrundfarbe
auswählen (für den Fall, daß X eingegeben wird)
5. Knopf "Hinzufügen" drücken - das Fenster wird für eine zweite Bedingung erweitert
6. Gib deine 2. Bedingung ein: "Zellwert ist gleich I" und wähle unter Format eine passsende Hintergrundfarbe
7. Die 3. Bedingung hinzufügen.
8. OK drücken
9. Fertig - Sollte nun funktionieren.
Viel Erfolg.