Thema Datum  Von Nutzer Rating
Antwort
Rot Entfernen aus Listbox und Exceltabelle gleichzeitig
 25.12.2021 14:08:56 Gast12265
NotSolved
25.12.2021 23:44:06 ralf_b
NotSolved

Ansicht des Beitrags:
Von:
Gast12265		 Datum:
25.12.2021 14:08:56		 Views:
1019		 Rating:
     
Antwort:
  Ja
Thema:
Entfernen aus Listbox und Exceltabelle gleichzeitig

Hallo zusammen,

ich habe ein kleines Problem. Beim Klick auf einen Entfernen Commandbutton soll ein bestimmter Wert "X" aus einer Listbox aber auch aus der Tabelle entfernt werden. Aus der Listbox wird er auch entfernt aber er meckert dann bei Tabelle5.cells ... . Ich weiß leider nicht wie ich ihm sagen soll das er in der Exceltabelle nach dem "X" suchen soll und das dann entfernen soll.

Ich habs versucht mit dem Listindex aber es geht wohl nur mit Zeilen und Spaltenangabe.

Kann jemand helfen?

 

Private Sub cmdEntf1_Click()

    Dim Bereich1 As Range
    Set Bereich1 = Tabelle5.Columns(3).Find(What:=ListBox1.ListIndex, After:=Range("C1"), LookIn:=xlValues, LookAt:=xlWhole,     SearchOrder:=xlByRows, SearchDirection:=xlNext, MatchCase:=True)
        If Bereich1 Is Nothing Then
            ListBox1.RemoveItem (ListBox1.ListIndex)


            -> -> -> Tabelle5.Cells (Listbox1.Listindex).RemoveContents <- <- <-


        Else
            MsgBox "Diesen Wert gibt es nicht"
        End If

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 Entfernen aus Listbox und Exceltabelle gleichzeitig
 25.12.2021 14:08:56 Gast12265
NotSolved
25.12.2021 23:44:06 ralf_b
NotSolved