Thema Datum  Von Nutzer Rating
Antwort
31.03.2021 08:20:46 David
*****
Solved
31.03.2021 11:00:20 ralf_b
NotSolved
31.03.2021 20:11:25 David
NotSolved
31.03.2021 22:00:30 ralf_b
NotSolved
01.04.2021 07:33:21 David
NotSolved
01.04.2021 09:01:18 ralf_b
NotSolved
01.04.2021 18:07:53 David
NotSolved
01.04.2021 19:41:35 ralf_b
NotSolved
03.04.2021 19:21:53 David
NotSolved
03.04.2021 20:43:12 Gast42026
NotSolved
03.04.2021 20:49:15 Gast42026
NotSolved
04.04.2021 23:00:19 David
NotSolved
Rot Hm... befindet sich die etwa auf einem Tabellenblatt? (owt)
05.04.2021 14:31:51 Gast59526
*****
Solved
05.04.2021 15:47:00 Gast68914
NotSolved
03.04.2021 22:56:16 ralf_b
NotSolved

Ansicht des Beitrags:
Von:
Gast59526
Datum:
05.04.2021 14:31:51
Views:
140
Rating: Antwort:
 Nein
Thema:
Hm... befindet sich die etwa auf einem Tabellenblatt? (owt)

Aha, dann würde ich vorschlagen, die ComboBox beim im Workkook_Open zu setzen.

'in DieseArbeitsmappe / ThisWorkbook
Option Explicit

Private Sub Workbook_Open()
  
  Dim i As Integer
  
  For i = Year(Date) To 2000 Step -1
    Tabelle1.ComboBox1.AddItem i
  Next
  Tabelle1.ComboBox1.ListIndex = 0
  
End Sub

Tabelle1 ist der CodeName der Tabelle, nicht der Blattname - müsstest nachschauen welchen CodeNamen deine Tabelle hat (VBA -> Projekt-Explorer; CodeName ist das was vor der Klammer steht).


Du könntest aber auch die LinkedCell- und ListFillRange-Eigenschaft der ComboBox nutzen.

Gibst du dem Bereich einem Namen, dann kannst du sogar diesen Namen in ListFillRange verwenden. In diesem Fall bräuchtest du dann nur den Bereich des Namens anpassen um den Inhalt der ComboBox anzupassen.

Ein Beispiel:


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
31.03.2021 08:20:46 David
*****
Solved
31.03.2021 11:00:20 ralf_b
NotSolved
31.03.2021 20:11:25 David
NotSolved
31.03.2021 22:00:30 ralf_b
NotSolved
01.04.2021 07:33:21 David
NotSolved
01.04.2021 09:01:18 ralf_b
NotSolved
01.04.2021 18:07:53 David
NotSolved
01.04.2021 19:41:35 ralf_b
NotSolved
03.04.2021 19:21:53 David
NotSolved
03.04.2021 20:43:12 Gast42026
NotSolved
03.04.2021 20:49:15 Gast42026
NotSolved
04.04.2021 23:00:19 David
NotSolved
Rot Hm... befindet sich die etwa auf einem Tabellenblatt? (owt)
05.04.2021 14:31:51 Gast59526
*****
Solved
05.04.2021 15:47:00 Gast68914
NotSolved
03.04.2021 22:56:16 ralf_b
NotSolved