Thema Datum  Von Nutzer Rating
Antwort
29.04.2020 14:35:16 M.
NotSolved
29.04.2020 14:53:21 Mase
NotSolved
29.04.2020 15:38:51 M.
NotSolved
29.04.2020 15:47:44 Mase
*****
NotSolved
29.04.2020 15:52:51 M.
NotSolved
Blau ComboBox auf Tabellenblatt aktualisieren
 29.04.2020 16:44:59 M.
NotSolved
29.04.2020 23:55:43 Gast72556
NotSolved

Ansicht des Beitrags:
Von:
M.		 Datum:
29.04.2020 16:44:59		 Views:
625		 Rating:
     
Antwort:
  Ja
Thema:
ComboBox auf Tabellenblatt aktualisieren

Hi,

der Code sieht nun wie folgt aus: 

(Der erste Teil ist für die Befüllung und der Zweite Teil soll für die Auswahl sein)

Problem: es funktioniert genau einmal dann komm eine Fehlermeldung: Objekt unterstützt diese Eigenschaft oder Methode nichtOption Explicit

Habe es beim zweiten Sub sowohl mit Click als auch mit Change versucht.



Private Sub ComboBox1_DropButtonClick()

Dim StrPath As String
Dim strFile As String
Dim strTabName  As String

   StrPath = ThisWorkbook.Path & "\PowerPoint_Vorlage\"
   strFile = Dir(StrPath & "*.pptx")

   With ComboBox1
      .Clear
      Do Until strFile = ""
         .AddItem Left(strFile, Len(strFile) - 5)
         strFile = Dir
      Loop
   End With
   
End Sub
-----------------------------------------------------------------------------------------------------
Private Sub ComboBox1_Click()

    ComboBox1.SelectedItem

End Sub

 

 

VG

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
29.04.2020 14:35:16 M.
NotSolved
29.04.2020 14:53:21 Mase
NotSolved
29.04.2020 15:38:51 M.
NotSolved
29.04.2020 15:47:44 Mase
*****
NotSolved
29.04.2020 15:52:51 M.
NotSolved
Blau ComboBox auf Tabellenblatt aktualisieren
 29.04.2020 16:44:59 M.
NotSolved
29.04.2020 23:55:43 Gast72556
NotSolved