Thema Datum  Von Nutzer Rating
Antwort
26.12.2011 22:25:30 Toreg
Solved
31.12.2011 22:45:40 Gast85437
NotSolved
01.01.2012 14:05:34 Torsten
NotSolved
Blau Fehler im Quellcode: Objekt wird nicht unterstützt!
01.01.2012 15:38:34 Heiko
Solved
12.01.2012 16:32:44 Gast35136
NotSolved

Ansicht des Beitrags:
Von:
Heiko
Datum:
01.01.2012 15:38:34
Views:
970
Rating: Antwort:
 Nein
Thema:
Fehler im Quellcode: Objekt wird nicht unterstützt!

Hallo Thorsten,

Tatsächlich. So einfach macht es einem der Excel-VBA-Editor nicht. Deshalb programmiere ich lieber mit deklarierten Objekten. Dann schützt Intellisense vor solchen Schreibfehlern.

Ein gutes 2012 wünscht

Heiko

Private Sub Userform_Initialize()
'bessere Variante - unterstützt Intellisense
  
  Dim i As Integer
  Dim wks As Excel.Worksheet
  Dim rng As Excel.Range
 
  Set wks = ThisWorkbook.Sheets("Vorgaben")
  
  'Kombinationsfeld Abteilung füllen
  For i = 2 To 6
    Set rng = wks.Cells(i, 2)
    me.ComboBox1.AddItem rng.Value
  Next i
   
  'Den ersten Eintrag erstellen
  Me.ComboBox1.ListIndex = 0
  i = Me.ComboBox1.ListIndex
  
  'Textfeld Kostenstelle füllen
  Me.cmdKostenstelle.Caption = _
  HoleKostenstelle(Me.ComboBox1.List(i))
   
  'Die Optionsbutton beschriften
  Set rng = wks.Cells(2, 3)
  Me.OptionButton1.Caption = rng.Value
  Set rng = wks.Cells(3, 3)
  Me.OptionButton2.Caption = rng.Value
  Set rng = wks.Cells(4, 3)
  Me.OptionButton3.Caption = rng.Value
     
  'Die erste Optionsschaltfläche vorbelegen
  Me.OptionButton1.Value = 1
  
  Set wks = Nothing
  Set rng = Nothing
  
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
26.12.2011 22:25:30 Toreg
Solved
31.12.2011 22:45:40 Gast85437
NotSolved
01.01.2012 14:05:34 Torsten
NotSolved
Blau Fehler im Quellcode: Objekt wird nicht unterstützt!
01.01.2012 15:38:34 Heiko
Solved
12.01.2012 16:32:44 Gast35136
NotSolved