vb@rchiv
VB Classic
VB.NET
ADO.NET
VBA
C#
Top-Preis! AP-Access-Tools-CD Volume 1  
 vb@rchiv Quick-Search: Suche startenErweiterte Suche starten   Impressum  | Datenschutz  | vb@rchiv CD Vol.6  | Shop Copyright ©2000-2025
 
zurück

 Sie sind aktuell nicht angemeldet.Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Fragen & Antworten rund um sev-Komponenten
sevGrid 2 
Autor: PStremmer
Datum: 07.03.08 16:57

Kann man nicht mit Columns("Umsatz_Q1").Backcolor beim Init des Grid die gesamte Spalte mit einer Hintergrundfarbe setzen?
Es wird bei mir nur der Header mit der Farbe gesetzt.

mfg
Paul

With Me.grdUmsatz
.LockUpdate True
.FilterAlign = FILTER_ALIGN_TOP
.FilterForeColorDisabled = vbGrayText
.FilterVisible = True
.AllowFilterEdit = True
.FilterMoveTAB = True
.FilterBackColor = &HC0FFFF ' hellgelb
.FilterBackColorDisabled = &H80000005 ' weiß
.FilterForeColor = &H400000 ' schwarz
.FilterForeColorDisabled = &H808080 ' dunkelgrau
.FilterTextFixCol = "Suche :"
.FixedCol = True
.FixedColCount = 2
.FixedColumns(1).Width = 800
.FixedColumns(1).Caption = "Zeile"
.FixedColumns(2).Width = 2800
.FixedColumns(2).Caption = "Vertreter"
.FixedColumns(2).Align = ALIGNMENT_LEFT
.ColumnHeaderBackColor = RGB(199, 217, 245)
.ScrollBtnBackColor = RGB(199, 217, 245)
.ScrollBtnBackColorDown = .ScrollBtnBackColor
.ScrollBtnBorderColor = &HB99D7F
.CaptionBackColorFrom = &HFFC0C0
.CaptionBackColorTo = &HFF8080
.CaptionForeColor = &HFFFF&
.HighlightBackColor = &HC0E0FF
.HighlightForeColor = vbBlack

.columns("IDI").Visible = False
.columns("UID").Visible = False
.columns("VertreterNr").Visible = False
.columns("Name").Visible = False
.columns("Jahr").Visible = False
.columns("VertreterGruppen_ID").Visible = False
.columns("Prov_Jan").Visible = False
.columns("Prov_Feb").Visible = False
.columns("Prov_Mar").Visible = False
.columns("Prov_Apr").Visible = False
.columns("Prov_Mai").Visible = False
.columns("Prov_Jun").Visible = False
.columns("Prov_Jul").Visible = False
.columns("Prov_Aug").Visible = False
.columns("Prov_Sep").Visible = False
.columns("Prov_Okt").Visible = False
.columns("Prov_Nov").Visible = False
.columns("Prov_Dez").Visible = False
.columns("Prov_Q1").Visible = False
.columns("Prov_Q2").Visible = False
.columns("Prov_Q3").Visible = False
.columns("Prov_Q4").Visible = False


With .columns("Umsatz_Gesamt")
.Caption = "Gesamt"
.HeadAlign = ALIGNMENT_RIGHT
.Align = ALIGNMENT_RIGHT
.Width = 1800
.Position = 6
End With

With .columns("Umsatz_Jan")
.Caption = "Januar"
.HeadAlign = ALIGNMENT_RIGHT
.Align = ALIGNMENT_RIGHT
.Width = 1600
.Position = 7
End With

With .columns("Umsatz_Feb")
.Caption = "Februar"
.HeadAlign = ALIGNMENT_RIGHT
.Align = ALIGNMENT_RIGHT
.Width = 1600
.Position = 8
End With

With .columns("Umsatz_Mar")
.Caption = "März"
.HeadAlign = ALIGNMENT_RIGHT
.Align = ALIGNMENT_RIGHT
.Width = 1600
.Position = 9
End With

With .columns("Umsatz_Q1")
.BackColor = &HFFC0C0
.Caption = "1. Quartal"
.HeadAlign = ALIGNMENT_RIGHT
.Align = ALIGNMENT_RIGHT
.Width = 1800
.Position = 10
End With
alle Nachrichten anzeigenGesamtübersicht  |  Zum Thema  |  Suchen

 ThemaViews  AutorDatum
sevGrid 2797PStremmer07.03.08 16:57
Re: sevGrid 2483rsvisionmaster07.03.08 22:29
Re: sevGrid 2504ModeratorDieter10.03.08 12:36

Sie sind nicht angemeldet!
Um auf diesen Beitrag zu antworten oder neue Beiträge schreiben zu können, müssen Sie sich zunächst anmelden.

Einloggen  |  Neu registrieren

Funktionen:  Zum Thema  |  GesamtübersichtSuchen 

nach obenzurück
 
   

Copyright ©2000-2025 vb@rchiv Dieter Otter
Alle Rechte vorbehalten.
Microsoft, Windows und Visual Basic sind entweder eingetragene Marken oder Marken der Microsoft Corporation in den USA und/oder anderen Ländern. Weitere auf dieser Homepage aufgeführten Produkt- und Firmennamen können geschützte Marken ihrer jeweiligen Inhaber sein.

Diese Seiten wurden optimiert für eine Bildschirmauflösung von mind. 1280x1024 Pixel