Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1656to1660
1656to1660
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

VBA fehler 400

Forumthread: VBA fehler 400

VBA fehler 400
26.11.2018 09:47:46
Angie
Guten Morgen meine Damen und Herren,
ich habe einen Code geschreibene und da kommt immer ein Fehler.
Sub Löschebereich()
Range("F32:I38,F40:I47,F49:I51,F53:I54,F56:I58,F60:I61,F63:I66,F68:I73,F75:I77,F79:I81,F83:I85") _
.ClearContents
End Sub

Es sollen die Zellen einfach entfernt werden aber es funktioniert nicht mit dem Code
Anzeige

9
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
ClearContents löscht nur Inhalte ... owT
26.11.2018 10:06:29
Matthias
AW: ClearContents löscht nur Inhalte ... owT
26.11.2018 10:09:44
Angie
Ich habe Sie nicht verstanden oder kann ihren Beitrag nicht lesen
AW: ClearContents löscht nur Inhalte ...
26.11.2018 10:14:47
Matthias
Hallo Angie
Wir sind eine Gemeinschaft von Excelfreunden.
Hier dutzt man sich :-)
Meine Anwort stand schon in der Betreffzeile
In meiner 2.Antwort auch.
Schau mal ob Du einen Blattschutz gesetzt hast.
owT im Betreff heißt: ohne weiteren Text
Gruß Matthias
Anzeige
bei mir keine Fehler. Blattschutz gesetzt? owT
26.11.2018 10:11:11
Matthias
AW: bei mir keine Fehler. Blattschutz gesetzt? owT
26.11.2018 10:16:17
Torsten
Der Blattname sollte schon angegeben werden, wenn der Code nicht im Klassenmodul des Tabellenblatts steht. Sonst weiss der code nicht, wo er loeschen soll.
Gruss Torsten
schreib das an Angie, nicht an mich. ow
26.11.2018 10:23:56
Matthias
Anzeige
AW: VBA fehler 400
26.11.2018 10:15:03
Daniel
Hi
an sich ist der Code korrekt.
Mögliche Ursachen für eine Fehler könnten sein:
- auf dem Blatt ist der Blattschutz aktiv und eine oder mehrere dieser Zellen sind gesperrt
- auf dem Blatt befinden sich verbundene Zellen und du löschst einen Teil eines Verbundes und nicht den ganzen Verbund
- du hast uns nicht den richtigen Code gezeigt, in deiner Datei willst du mehr Zellen löschen und die Länge des Adressstrings überschreitet die erlaubte Länge von 256 Zeichen.
- wenn der Code läuft, ist zufälligerweise ein Diagrammblatt aktiv und kein Tabellenblatt.
aber all das erzeugt bei mir nicht den Fehler 400, sondern den Fehler 1004.
Wenn die Ursache für deinen Fehler nicht dabei ist, müsstest du mal die Datei hochladen.
Gruß Daniel
Anzeige
AW: VBA fehler 400
26.11.2018 10:48:56
Angie
Was ist wenn 2 Zeilen verbunden sind und ich beide zelleninhalte gelöscht haben mag?
geht es dann nicht mehr?
AW: VBA fehler 400
26.11.2018 11:02:21
Daniel
Hi
das geht schon.
du musst dann aber beide Zellen löschen und nicht nur eine.
wenn du A1:B1 verbindest, dann musst du auch A1:B1 löschen und nicht nur A1.
Gruß Daniel
Anzeige
;

Forumthreads zu verwandten Themen

VisualBasic Fehlermeldung in Excel
Kazo

Hallo, ich muss für einen Kollegen in einer Excelliste eine Fehlermeldung erstellen, von der Erstellung solcher Angelegenheiten haben hier leider keine meiner Kollegen eine Ahnung! Ich absolviere momentan ein Praktikum und mir wurde diese Arbeit erteilt. Leider habe ich VB erst im nächsten Stud...
15.04.2014 09:22:41
Thread-ID: 1357331
10 Beiträge
Error 400 : Anwendungs- oder objektdef. Fehler
Henry

Moin,
ich benutze diesen Code wenn icheine Formel in eine Spalte bis zur letzten Zeile füllen möchte : ( der funktioniert ) Sub Tag() Dim iRow As Integer iRow = Cells(Rows.Count, 1).End(xlUp).Row Range("F2").Formula = "=TEXT(RC[-2],""TTTT"")" Range("F2:F" & iRow).FillDown End Sub
...
27.08.2014 15:58:15
Thread-ID: 1378507
6 Beiträge
VBA: find und instr oder iserror kombinieren
tomcatoggo

Hallo!
da ich jetzt etliche Stunden an diesem Problem hänge und einfach gar nicht verstehe, warum so eine (so dachte ich das zumindest) super simple Sache sich nicht lösen lässt, frage ich jetzt mal hier nach:
Ich denke ich brauche hier nix extra hochladen... hier die Beschreibung:
...
13.11.2014 15:26:30
Thread-ID: 1392217
6 Beiträge
Anzeige
VBA: find und instr oder iserror kombinieren
tomcatoggo

Hallo!
da ich jetzt etliche Stunden an diesem Problem hänge und einfach gar nicht verstehe, warum so eine (so dachte ich das zumindest) super simple Sache sich nicht lösen lässt, frage ich jetzt mal hier nach:
Ich denke ich brauche hier nix extra hochladen... hier die Beschreibung:
...
13.11.2014 15:49:45
Thread-ID: 1392225
2 Beiträge
VBA CODE KÜRZEN / INTELLIGENT & RUNTIME ERROR
Mark.

Hallo liebe Community,
es geht um den Beitrag:
Archiv IDX:1474392
Datum: 2016-02-09 17:54:31
Titel: VBA Code Kürzen / INTELLIGENTER schreiben
anhängend könnt Ihr die Beispieldatei finden.
https://www.herber.de/bbs/user/103521.xlsm
diese Datei muss in dem s...
13.02.2016 12:23:55
Thread-ID: 1475231
5 Beiträge
VBA Fehler 400
torro100

Hallo
mit dem aufgeführten Code soll die nächste leere Zeile gefunden werden, beginnend ab Zeile 5, die Zeile 4 (dient als Vorlage; Zeile 3 und 4 sind versteckt)) soll dort hin kopiert werden, nur Formate und Formeln sollen beibehalten werden, die aktive Zelle soll in der neu eingefügten Z...
06.12.2016 14:09:13
Thread-ID: 1528843
4 Beiträge
VBA - 400 (kein Error)
Steven

Hallo liebe Community,
ich stehe wirklich ganz ganz ganz am Anfang von Makros. Ich möchte durch klick auf einen Button, _ dass folgendes in einem anderen Tabellenblatt ausgeführt wird. Diesen Code nutze ich dafür. Sub HFB() ' alle Spalten (Spaltenbereich) ausblenden Columns("E:OV").Selec...
17.01.2019 11:10:37
Thread-ID: 1668781
14 Beiträge
Anzeige
VBA: if date endet in runtime error 13 mismatch
Tom

Hallo Experten
Werde nicht schlau, vielleicht einer der es direkt sieht. Ich nutze einen Datumsabgleich in einem Makro, um darüber eine Trial für das Excel zu machen. Also, ich gebe ein Datum im Makro vor und prüfe es im Vergleich zum heutigen Datum. An sich funktioniert es, wird das Excel...
17.06.2019 12:30:58
Thread-ID: 1698111
3 Beiträge
VBA Modul wirft in Asien Error ? hier nicht
Nati93

Hallo zusammen,
ich habe ein VBA Modul, welches mir eine von dem User ausgewählte Datei öffnet.
Gleichzeitig wird eine neue Excel geöffnet mit dem Namen "Bufferfile".
Leider bricht der Code bei Auswahl einer Datei des Users ab und zwar bisher nur in China ?... Bei uns funktioniert...
30.07.2019 10:10:33
Thread-ID: 1704911
5 Beiträge
VBA Fehler X und die Zahl 400
lay

Hallo zusammen, ich brauch Hilfe!
Folgendes Problem, nach Eingabe der Daten und 2 kleinen Makros, die lediglich die Daten sortieren, habe ich die Datei gespeichert und geschlossen.
Beim öffnen dieser Datei wird mir ein weißes Kreuz (X) in einem roten Kreis und der Zahl 400 angezeigt.
03.09.2019 10:59:32
Thread-ID: 1710877
13 Beiträge
Anzeige
Microsoft Visual Basic Class not registered
stephan

Hallo und guten Tag,

ich habe einer Bekannten von mir eine Excel97 Datei gemailt. Diese erhält nun beim Öffnen die Fehlermeldung :

"Microsoft Visual Basic" Class not registered. Looking for object with CLSid:
{AC9F2F90-E877-11CE-9F68-00AA00574A4F}

Kann mir jemand sage...
07.08.2003 11:46:47
Thread-ID: 291000
5 Beiträge
Visual Basic Fehlermeldung!
Silvi
Hallo!

kann mir jemand helfen? Bekomme eine merkwürdige Fehlermeldung beim Speichern einer Datei in der Makros enthalten sind.

Systemfehler: &H8000FFFF (-2147418113). Schwerer Fehler

Was kann ich denn da bloß falsch gemacht haben?

Hilfe!!!

Gruß
Sylvia
05.09.2003 11:20:53
Thread-ID: 305325
7 Beiträge
Anzeige
Anzeige

Infobox / Tutorial

VBA Fehler 400: Ursachen und Lösungen

Schritt-für-Schritt-Anleitung

  1. Code überprüfen: Stelle sicher, dass der VBA-Code korrekt ist. Der folgende Code sollte die Inhalte der angegebenen Zellen löschen:

    Sub Löschebereich()
   Range("F32:I38,F40:I47,F49:I51,F53:I54,F56:I58,F60:I61,F63:I66,F68:I73,F75:I77,F79:I81,F83:I85").ClearContents
End Sub

  2. Blattschutz prüfen: Überprüfe, ob der Blattschutz aktiviert ist. Ist dies der Fall, kann der Code möglicherweise nicht auf gesperrte Zellen zugreifen, was zu einem excel vba fehler 400 führen kann.

  3. Verbundene Zellen: Achte darauf, dass keine verbundenen Zellen im angegebenen Bereich sind. Wenn du versuchst, nur einen Teil eines verbundenen Bereichs zu löschen, kann dies ebenfalls diesen Fehler verursachen.

  4. Aktives Blatt: Stelle sicher, dass du auf einem Tabellenblatt arbeitest und nicht auf einem Diagrammblatt, während der Code ausgeführt wird.

  5. Länge des Adressstrings: Überprüfe, ob die Länge der Zelladresse 256 Zeichen nicht überschreitet. Dies könnte ebenfalls zu einem error 400 excel führen.

Häufige Fehler und Lösungen

  • Blattschutz aktiviert: Wenn du den Fehler 400 erhältst, überprüfe, ob der Blattschutz aktiv ist. Deaktiviere ihn, um den Code auszuführen.

  • Verbundene Zellen: Bei verbundenen Zellen musst du den gesamten Bereich löschen. Beispielsweise, wenn Zellen A1 und B1 verbunden sind, lösche den Bereich A1:B1.

  • Falsches aktives Blatt: Wenn das aktive Blatt ein Diagrammblatt ist, kann der Code nicht korrekt ausgeführt werden. Stelle sicher, dass ein Tabellenblatt aktiv ist.

  • Zu lange Zelladresse: Achte darauf, dass die Länge des Zellbereichs 256 Zeichen nicht überschreitet. Reduziere den Bereich, wenn nötig.

Alternative Methoden

  • Anwendung von Cells: Statt Range kannst du Cells verwenden, um einen bestimmten Bereich zu löschen. Zum Beispiel:

    Sub LöscheZellen()
   Cells(32, 6).Resize(7, 4).ClearContents ' F32:I38
   ' Füge hier weitere Zellbereiche hinzu
End Sub

  • Nutzung von Schleifen: Du kannst auch Schleifen verwenden, um mehrere Bereiche zu löschen, was flexibler ist, falls du dynamische Zellbereiche hast.

Praktische Beispiele

  1. Einfaches Löschen von Inhalten:

    Sub EinfachLoeschen()
   Range("A1:B2").ClearContents
End Sub

  2. Löschen unter Berücksichtigung der Blattschutz:

    Sub LoescheMitBlattschutz()
   If Not ActiveSheet.ProtectContents Then
       Range("C1:D2").ClearContents
   Else
       MsgBox "Blattschutz ist aktiv!"
   End If
End Sub

Tipps für Profis

  • Verwende On Error Resume Next, um Fehler abzufangen und den Code nicht zum Absturz zu bringen, aber nutze dies mit Vorsicht, um nicht die Ursachen von Fehlern zu ignorieren.

  • Optimiere deine Makros, indem du häufige Operationen zusammenfasst und Teile des Codes in separate Subroutinen auslagerst, um die Lesbarkeit zu erhöhen.

  • Halte deine Excel-Version auf dem neuesten Stand, da Fehler wie microsoft visual basic error 400 gelegentlich in älteren Versionen auftreten können.

FAQ: Häufige Fragen

1. Was ist der VBA Fehler 400?
Der Fehler 400 ist ein allgemeiner Fehler in VBA, der auf verschiedene Probleme hinweisen kann, wie z.B. Blattschutz oder ungültige Zellreferenzen.

2. Wie kann ich den Fehler 400 beheben?
Überprüfe die Zellreferenzen, stelle sicher, dass kein Blattschutz aktiv ist, und dass keine verbundenen Zellen betroffen sind.

3. Tritt der Fehler 400 nur in bestimmten Excel-Versionen auf?
Ja, einige ältere Versionen von Excel können anfälliger für diesen Fehler sein. Aktualisiere auf die neueste Version, um die Wahrscheinlichkeit zu verringern.

4. Was kann ich tun, wenn ich immer noch nicht weiterkomme?
Wenn die oben genannten Lösungen nicht helfen, lade deine Datei in ein Forum hoch, um gezielte Hilfe von anderen Excel-Nutzern zu erhalten.

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Anzeige