Thema Datum  Von Nutzer Rating
Antwort
Rot Excel 2002 unter Vista-Home
 16.05.2009 19:35:00 Michel
NotSolved

Ansicht des Beitrags:
Von:
Michel		 Datum:
16.05.2009 19:35:00		 Views:
1499		 Rating:
     
Antwort:
  Ja
Thema:
Excel 2002 unter Vista-Home
Folgende Anwendung funktioniert mit Excel 2002 unter Windows XP.
Seit ich Windows Vista habe aber leider nciht mehr.
Mit Leihe auf dem Gebiet, brauche aber diese Anwendung dringend.
Für Hilfe eurer seits im voraus besten Dank.




Private Sub UserForm_Initialize()
Set objSh = ActiveSheet
Set objCell = ActiveCell
Rem MsgBox objSh.Name
Rem MsgBox objCell.Address
UserForm12.TextBox1.Value = objCell
OptionButton7.Value = True
With UserForm12.ListBox1
.ColumnCount = 6
.ColumnWidths = "95;95;150;150;150;30;"
End With
'Suchen-Funktion
Rem Dim s As Integer
With UserForm12
Sheets("Stammdaten").Activate
Rem UserForm12.TextBox1.Value = ActiveCell.Value
.ListBox1.Clear
hier ist das Problem: e = 0
For i = 2 To ActiveSheet.UsedRange.Rows.Count
If InStr(LCase(Cells(i, 1).Value), LCase(.TextBox1.Value)) > 0 Then
.ListBox1.AddItem Cells(i, 1).Value
.ListBox1.Column(1, e) = Cells(i, 2).Value
.ListBox1.Column(2, e) = Cells(i, 3).Value
.ListBox1.Column(3, e) = Cells(i, 4).Value
.ListBox1.Column(4, e) = Cells(i, 5).Value
.ListBox1.Column(4, e) = Cells(i, 6).Value
e = e + 1
Else
End If
Next i
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 Excel 2002 unter Vista-Home
 16.05.2009 19:35:00 Michel
NotSolved