Gruppen

Top Gruppen: Windows 7; Windows Vista; Windows XP; Textverarbeitung; Excel; DSL; Internet Browser; E-Mail/Outlook
Betriebsysteme: Windows classik; Linux; BS-Sonstige
Software: Datenbanken; Bildbearbeitung; Audio/mp3/Video; Security/Viren; SW-Sonstige
Hardware: Mainboard/CPU; Grafikkarten; Peripherie; Laptop/Notebook; HW-Sonstiges
Netzwerk: Telefon,ISDN,Modem; W-Lan; NW-Sonstiges
Programmierung: PHP,ASP,Perl...; Java,C++...; Webseiten/HTML
Sonstiges: PC-Sonstiges; Plauderecke; SN Intern; Test

/ Forum / Tabellenkalkulation

Tabellenkalkulation

Fragevon Sina1982 vom 22.06.2022, 09:52 Options

Laufzeitfehler 1004 Farbindex Excel 1997

Hallo Leutz,

bin grad am tüfteln...habe mit mehrere Buttons bebalstelt wo ich eine Zelle aussuche und beim Klick sich die Zelle mit dem Buchstaben und der gewünschten Farbe füllt (Farbe soll gleich sein) (wenn OptionButton3 aktiv) . Nur Kommt es zur Fehlermeldung:

"Die Color-Index Eigenschaft des Interior-Objekts kann nicht fest gelegt werden"

Meine Buttons: Button 1

Private Sub CommandButton991_Click()
If OptionButton3.Value = False Then

Selection.Value = "No"
Else
Selection.Value = "No "
Selection.Interior.ColorIndex = 16
End If
End Sub

Button 2:

Private Sub CommandButton997_Click()

If OptionButton3.Value = False Then

Selection.Value = "G "

Else
Selection.Value = "G "
Selection.Interior.ColorIndex = 16

End If

End Sub

Ideen?

LG Sina

Antwort schreiben

Antwort 1 von Beverly vom 22.06.2022, 11:05 Options

Hi Sina,

ich habe deinen Code getestet - bei mir kommt keine Fehlermeldung. Vielleicht könntest du deine Mappe mal hochladen (z.B. hier http://www.file-upload.net/)

Bis später,
Karin

Antwort 2 von Sina1982 vom 22.06.2022, 11:09 Options

Hey, zu finden unter:

http://www.file-upload.net/download-2617909/TEST_Kalenderplanung.xls.html

Antwort 3 von Beverly vom 22.06.2022, 11:30 Options

Hi Sina,

ich habe jetzt alle betreffenden Schalter im Tabellenblatt Gruppe1_JH2 getestet - bei keinem kommt ein Laufzeitfehler. Hast du Excel mal komplett geschlossen? Damit werden häufig Probleme behoben, von denen man nicht nachvollziehen kann, wie sie ausgelöst wurden.

Was mir allerdings aufgefallen ist, dass die Farbe nicht zurückgesetzt wird, wenn der OptionsButton nicht aktiviert ist - oder sehe ich das falsch?

Private Sub CommandButton991_Click()
If OptionButton3 = False Then
Selection = "No"
Selection.Interior.ColorIndex = xlNone
Else
Selectione = "No "
Selection.Interior.ColorIndex = 15
End If
End Sub

.Value kann weggelassen werden, weil dies die Standardeigenschaft ist.

Bis später,
Karin

Antwort 4 von Sina1982 vom 22.06.2022, 12:43 Options

Hey,

ja....die Farben zurücksetzen...natürlich.

VIELEN HERZLICHEN DANK!

Antwort 5 von Beverly vom 22.06.2022, 16:30 Options

Hi Sina,

die Code-Korrektur hat aber nichts mit deinem Laufzeitfehler zu tun.

Bis später,
Karin

Hinweis

Diese Frage ist schon etwas älter, Sie können daher nicht mehr auf sie antworten. Sollte Ihre Frage noch nicht gelöst sein, stellen Sie einfach eine neue Frage im Forum..

Neue Einträge

Tipp einschicken

News einschicken