Wie muss es denn richtig heissen?

Vielen Dank

Antworten

Re: Finden den Fehler in der VBA-Funktion nicht. Hallo noch ein Tipp aus der Münchner Gegend:


If ActiveCell = "exportiert" Then
Selection.Value = ""
Selection.Locked = False

Re: Finden den Fehler in der VBA-Funktion nicht. Habe gleich eine Besprechung, keine Zeit zu kommentieren aber damit würde es funktionieren

schöne bretonische Grüße aus München marzina

Sub Makro1()
If LCase(Trim(ActiveCell)) = "exportiert" Then
x = ActiveCell.Row
y = ActiveCell.Column
Sheets("Datenbank").Cells(x, y).Value = ""
Sheets("Datenbank").Cells(x, y).Locked = False
End If
End Sub

Eigene Lösung:

Re: Finden den Fehler in der VBA-Funktion nicht Hallo Marzina, hab das Problem schon gefunden. Der Befehl ActiveCell muss alleine angewendet werden also z. B. so.

 
If ActiveCell = "exportiert" Then
ActiveCell.Value = ""
ActiveCell.Locked = False
End If

Der Bezug auf das Tabellenblatt ist hier scheinbar nicht zulässig. Trotzdem vielen Dank für Deinen Tipp

Microsoft erklärt ActiveCell wie folgt:

Diese Eigenschaft gibt ein Range-Objekt zurück, das die aktive Zelle entweder im aktiven Fenster (das Fenster im Vordergrund) oder im angegebenen Fenster repräsentiert. Wird im betreffenden Fenster kein Arbeitsblatt angezeigt, führt diese Eigenschaft zu einem Fehler. Schreibgeschützt.

Relevante Artikel

Projekt-Anfrage

Excel automatisieren. Zeit sparen.
Fehler vermeiden.
Wir entwickeln Ihre individuelle
Excel- / VBA-Lösung.
Jetzt anfragen!

Formular Anfrageformular öffnen Telefon Jetzt anrufen: +49 (0)151 164 55 914 E-Mail Anfrage per E-Mail senden Informationen Weitere Informationen
Wir benutzen Cookies
Ihre Zufriedenheit ist unser Ziel, deshalb verwenden wir Cookies. Mit diesen ermöglichen wir, dass unsere Webseite zuverlässig und sicher läuft, wir die Performance im Blick behalten und Sie besser ansprechen können. Cookies werden benötigt, damit technisch alles funktioniert und Sie auch externe Inhalte lesen können. Des Weiteren sammeln wir unter anderem Daten über aufgerufene Seiten, getätigte Käufe oder geklickte Buttons, um so unser Angebot an Sie zu Verbessern. Mehr über unsere verwendeten Dienste erfahren Sie unter „Weitere Informationen“. Mit Klick auf „Akzeptieren“ erklären Sie sich mit der Verwendung dieser Dienste einverstanden. Ihre Einwilligung können Sie jederzeit mit Wirkung auf die Zukunft widerrufen oder ändern.
Akzeptieren Ablehnen
Weitere Informationen | Impressum