Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
388to392
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
388to392
388to392
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Bereich abfragen

Bereich abfragen
02.03.2004 14:56:46
Suppenhuhn
Ich möchte den Wahrheitswert ermitteln, ob in dem Bereich ("A1:AA7,X5:X10,YY200:YZ438") alle Zellinhalte "Fett" formatiert sind.
Wie mache ich das ?
Danke !

7
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Bereich abfragen
02.03.2004 15:03:39
Boris
Hi Suppenhuhn,
bitte poste hier mit deinem (oder einem) Realnamen - dies ist hier so üblich.
Spalten YY und YZ?!?
VBA gut?
Option Explicit

Sub alle_fett()
Dim C As Range, Bereich As Range
Set Bereich = Range("A1:A7,X5:X10,Y200:Y438")
For Each C In Bereich
If C.Font.Bold = False Then
MsgBox "Sind nicht alle fett...", , "Gebe bekannt..."
Exit Sub
End If
Next C
MsgBox "Alle fett...", , "Gebe bekannt..."
End Sub

Grüße Boris
AW: Bereich abfragen
02.03.2004 15:19:22
Suppenhuhn
Danke Boris !
Gut liegt im Auge des Betrachters.
Ach übrigens.
Script funktioniert nicht.
Fehler 400 !?!?!
Anzeige
NOCH OFFEN
02.03.2004 16:21:53
Boris
Hi,
...keine Ahnung - das muss funktionieren...
Grüße Boris
tut es auch...oT
02.03.2004 16:23:30
Ulf
..
läuft einwandfrei...oT
02.03.2004 16:34:36
y
...
bei mir auch :-) ot
02.03.2004 16:38:50
Andi
.
Es tut es tatsächlich !
02.03.2004 20:12:40
Suppenhuhn

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige