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

As Range Variable , Farbe formatieren

As Range Variable , Farbe formatieren
08.03.2005 11:58:27
Sergej
Hallo Forum!!!!!
Dim A As Integer '#####Zähler Variable
A = ThisWorkbook.Sheets("Dummy").Range("B1").Value
ThisWorkbook.Sheets("Protokol").Cells(A + 1, 6).Value="Hallo"
jezt wollte ich Zeile :
ThisWorkbook.Sheets("Protokol").Cells(A + 1, 6).Value="Hallo"
farblich formatieren
Wollte folgendes machen

Sub farbeAndern()
Dim S As Range
S=ThisWorkbook.Sheets("Protokol").Cells(A + 1, 6)
With S
.Interior.ColorIndex = 6
.Font.ColorIndex = 3
End With
End Sub

und das geht leider nicht....:(
Wer kann mir behilflich sein?
Danke
gruß Sergej

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

Betreff
Datum
Anwender
Anzeige
AW: As Range Variable , Farbe formatieren
08.03.2005 12:22:08
ruds
hi probier mal:

Sub farbeAndern(c as Range)
with c
.Interior.ColorIndex = 6
.Font.ColorIndex = 3
End With
End Sub

aufruf:
farbeAndern(ThisWorkbook.Sheets("Protokol").Cells(A + 1, 6))
greets
ruds
AW: As Range Variable , Farbe formatieren
08.03.2005 12:32:25
Sergej
Meinen besten Dank Ruds!!!!!! Funz..prima!!!!!!
Anzeige

299 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige