Thema Datum  Von Nutzer Rating
Antwort
Rot Entfernen von daten bei Bestimmter Bedingung
04.11.2022 11:06:58 Niklas
NotSolved
04.11.2022 11:12:21 Gast12127
NotSolved
04.11.2022 11:18:36 Niklas
NotSolved
04.11.2022 13:34:39 ralf_b
NotSolved
04.11.2022 14:06:45 Gast14546
NotSolved

Ansicht des Beitrags:
Von:
Niklas
Datum:
04.11.2022 11:06:58
Views:
135
Rating: Antwort:
  Ja
Thema:
Entfernen von daten bei Bestimmter Bedingung

Hallo zusammen,

Habe eine Excel, in der in Zelle D6 ein Dropdownmenü eingefügt ist.

Nun wollte ich, dass die Zelleninhalte in den Zellen D9 und D10 gelöscht werden, sobald in D6 etwas anderes als "Freies Teil" steht. Also zum Beispiel eine beliebige Produktbezeichnung.

 

Hierfür habe ich folgenden Code geschrieben:

Private Sub Entfernen()
If Range("D6") <> "Freies Teil" Then
Range("D9,D10").Select
Selection.ClearContents
End If
End Sub

Allerdings bekomme ich beim Ausführen der Makro dann folgenden Fehler:

Laufzeitfehler '1004':

Anwendungs- oder objektdefinierter Fehler

Beim Debuggen erfolgt dann folgende Meldung:

Sub Entfernen()
'
' Entfernen Makro
'

'
    Range("D9").Select
    ActiveCell.FormulaR1C1 = "8" --> 
    Range("D10").Select
    ActiveCell.FormulaR1C1 = "9"
    Range("D8:G8").Select
End Sub

Bin leider ein totaler Anfänger und habe auch nach recherche nicht herausgefunden, wie man dieses "Problem" löst.

Vielen dank im Voraus!


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 von daten bei Bestimmter Bedingung
04.11.2022 11:06:58 Niklas
NotSolved
04.11.2022 11:12:21 Gast12127
NotSolved
04.11.2022 11:18:36 Niklas
NotSolved
04.11.2022 13:34:39 ralf_b
NotSolved
04.11.2022 14:06:45 Gast14546
NotSolved