Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
208to212
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
208to212
208to212
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Active Zelle-Farbe / Finden

Active Zelle-Farbe / Finden
31.01.2003 21:02:03
Gerhard
Hallo,
bräuchte Hilfe.

1.)Was muß ich machen, um die gerade active Zelle mit der Farbe Blau zu hinterlegen.

2.)Einen Wert, den ich in einer Zelle eingeben habe, in der Tabelle zu suchen und zu markieren,

Danke
Gerhard

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Re: Active Zelle-Farbe / Finden
31.01.2003 21:08:21
Bernd Held

Hallo Gerhard,

zu Frage 1:
Sub FarbeZuweisen()
ActiveCell.Interior.ColorIndex = 5
End Sub

zu Frage 2:

Sub BegriffSuchen()
Dim Zelle As Range
Dim sBegriff As String

sBegriff = InputBox("Bitte Suchbegriff eingeben!")
If sBegriff = "" Then Exit Sub
Set Zelle = Worksheets(1).Cells.Find(sBegriff, lookat:=xlWhole)
If Zelle Is Nothing Then
MsgBox "Suchbegriff icht gefunden!"
Else
Zelle.Select
End If
End Sub

Viele Grüße
Bernd
MVP für Microsoft Excel
Excel-Tipps, VBA in 21 Tagen und VBA-Datenbank unter: http://held-office.de


Anzeige
Re: Active Zelle-Farbe / Finden
31.01.2003 21:35:56
Gerhard

Vielen Dank für deine schnelle Hilfe
Gerhard

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige