Thema Datum  Von Nutzer Rating
Antwort
Rot Filter
 10.01.2020 11:39:34 Fatos
NotSolved
10.01.2020 11:40:24 Fatos
NotSolved
10.01.2020 11:40:36 Torsten
NotSolved
10.01.2020 11:42:44 Gast99460
NotSolved
10.01.2020 11:49:38 Torsten
Solved
10.01.2020 13:31:51 Gast82976
Solved
10.01.2020 13:54:53 Torsten
NotSolved

Ansicht des Beitrags:
Von:
Fatos		 Datum:
10.01.2020 11:39:34		 Views:
762		 Rating:
     
Antwort:
  Ja
Thema:
Filter

Hallo,

 

ich erhalte hier folgenden SyntaxFehler, aber ich verstehe nicht ganz wieso.

 

Private Sub UserForm_Initialize()

 Dim rngBereich As Range

 Set rngBereich = Tabelle1.Range("A2:H2").CurrentRegion
 Me.ListBox1.List = Application.Transpose(rngBereich.Value)
 
 With Me.ListBox1
 
  .BackColor = RGB(255, 255, 0)
  .ForeColor = RGB(0, 0, 255)
  .Font.Size = 12
  .Font.Bold = True
  .ListIndex = 0
  
 End With
 

End Sub

 

Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:



  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
Rot Filter
 10.01.2020 11:39:34 Fatos
NotSolved
10.01.2020 11:40:24 Fatos
NotSolved
10.01.2020 11:40:36 Torsten
NotSolved
10.01.2020 11:42:44 Gast99460
NotSolved
10.01.2020 11:49:38 Torsten
Solved
10.01.2020 13:31:51 Gast82976
Solved
10.01.2020 13:54:53 Torsten
NotSolved