Live-Forum - Die aktuellen Beiträge

Datum

Titel

08.10.2025 06:24:29

VBA - Zeichenkette von rechts kürzen

07.10.2025 18:27:08

Formel anstelle XVWERWEIS für alte Excel-Version

07.10.2025 15:42:10

Identische-Tabellen-identische Sub's funktionieren nicht...

07.10.2025 09:25:19

Bedingte Formatierung mit bezug auf anderes TabellenBlatt

Keine passende Antwort im Forumarchiv gefunden?

Stelle deine Frage im Live-Forum

Anzeige

Anzeige

HERBERS

Excel-Forum (Archiv)

20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Vorheriger Thread

Vorheriger Thread

Rückwärts Blättern

Aktuelles Verzeichnis

Übersicht Verzeichnisse

Nächster Thread

Nächster Thread

Vorwärts blättern

Inhaltsverzeichnis

Error on VBA code If statement

Forumthread: Error on VBA code If statement
2 Beiträge zu diesem Forumthread
Anzeige
309 Threads zu ähnlichen Themen
Top 100 Forumthreads

Forumthread: Error on VBA code If statement

Error on VBA code If statement

29.03.2020 20:52:17

Mike

Hoy zusammen,
ich haben folgenden code geschrieben, welcher prüfen soll ob eine Tabelle existiert oder nicht.
Wenn es eine gibt, soll er diese in einen Bereich umkommentieren. Wenn eine Tabelle besteht, funktioniert es. Wenn keine besteht, gibt es eine Fehlermeldung. Wisst ihr wieso?

Sub find()
If Sheets(4).ListObjects(1).Name = False Then
MsgBox "no table"
End If
Sheets(4).ListObjects(1).Unlist
End Sub

Gruss
Michel

Anzeige

2
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

AW: Error on VBA code If statement

29.03.2020 21:26:28

Daniel
AW: Error on VBA code If statement

29.03.2020 21:30:48

Daniel

Anzeige

AW: Error on VBA code If statement

29.03.2020 21:26:28

Daniel

Hi
Naja das Listobjects(1) gibt es nicht.
Probier's Mal so:
If Sheets(4).ListObjects.Count = 0 Then
Gruß Daniel

AW: Error on VBA code If statement

29.03.2020 21:30:48

Daniel

Der wichtigste Fehler ist aber, dass du dass umwandeln immer ausführst, weil es nach dem End If steht.
Besser so:

Sub find()
If Sheets(4).ListObjects.count = 0 Then
MsgBox "no table"
Else
Sheets(4).ListObjects(1).Unlist
End If
End Sub

Gruß Daniel

Anzeige

;

Forumthreads zu verwandten Themen

VisualBasic Fehlermeldung in Excel

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

Error 400 : Anwendungs- oder objektdef. Fehler

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

VBA: find und instr oder iserror kombinieren

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

VBA: find und instr oder iserror kombinieren

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

VBA CODE KÜRZEN / INTELLIGENT & RUNTIME ERROR

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

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

VBA - 400 (kein Error)

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

VBA: if date endet in runtime error 13 mismatch

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

VBA Modul wirft in Asien Error ? hier nicht

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

VBA Fehler X und die Zahl 400

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

Anzeige

Microsoft Visual Basic Class not registered

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

Anzeige

Visual Basic Fehlermeldung!

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

Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Einzelliste (ohne Inhaltsvorschau)

VBA Modul wirft in Asien Error ? hier nicht

VBA Fehler X und die Zahl 400

Microsoft Visual Basic Class not registered

Visual Basic Fehlermeldung!

VBA kompakte Find-Row-Funktion mit Error-Abfrage

Error in VBA Code

Microsoft Visual Basic

Microsoft Visual Basic!

Visual Basic Fehlermeldung

VBA: Makro in Excel 2000 --> 2003 = error

VBA Ordner verschieben - Errorcode 70

VBA - Internet Error umgehen

VBA - Internet Error umgehen

VBA Code fehler 400

Visual Basic Fehler beim Kompilieren: Prozedur ist zu groß

On Error GoTo ErrorHandler

On error 10 sekunden pause and resume

VBA Resume vier mal, dann Resume next

On Error resume next

Excel4Makro - on error resume next

On Error Resume ohne Funktion an einem PC

OptionButtons per VBA: Automation Error

VBA: deutsche OK - englische Version: Error 13

On Error Goto bleibt hängen

VBA Abfrage on error - nur 1 mal OK

On Error go to .... aber wie ???

On Error Resume Next

on error go to errhandler:

Application.Goto Reference:="Z1S1"

Application.Goto Reference

Application.Goto .Cells(1, 1) - Zelle anzeigen

(an Otto Ecker) on error goto

Application.Goto Laufzeitfehler 1004

on error goto

On Error Resume Next?

On Error GoTo Problem & Code Verschlankung

Funktion geht erst nach vorherigem goto

"On Error GoTo" funktioniert nicht mehr

If-Verschachtelung und On Error GoTo

On Error Resume Next ?!!!!

On Error goto

On Error Goto funktioniert nicht

Application.Goto Reference:="Aktuelle_Zelle"

On Error Goto

On Error goto xy

VBA: On Error go to Fehler

Nach "On Error Resume Next" Activate Problem

On Error goto funktioniert nicht

Excel, VBA, On Error resume Next...

VBA kompakte Find-Row-Funktion mit Error-Abfrage

On Errror Resume Next global setzen?

On Error bringt Automatisierungsfehler

on error resume next ..in funktion funkt nicht ???

On Error Goto wird ignoriert !

Probleme mit "On Error Goto"

On Error GoTo ?

On Error GoTo Fehler

On error resume next

Probleme mit Errorhandler: On Error Goto Ende

On Error.. nächste Form wird automatisch bestätigt

On Error GoTo

on error resume

On Error GoTo a:

On Error Resume Next

On Error Resume Next und Speccialcells

"on error goto ..." nur im ersten Durchgang?

On Error Goto ...

On Error GoTo

On Error Resume Next

On Error GoTo Ende

On Error GOTO Problem

On Error GOTO Fehler

Schleife mit "On Error GoTo Fehler"

3x On Error Goto Weiter ?

On Error goto wird immer angezeigt

on error resume next vermeiden

On Error GoTo...

Wo ist der Fehler? On Error GoTo

Application.Goto

Application.Goto wenn

Application.goto Fehler

Shell .bat Pause einlegen bis durch mit on error go to?

VBA führt On Error-Anweisung aus obwohl kein Fehler?

Problem mit "On Error GoTo ..."

FIFO mit VBA (Endlosschleife?)

Variable - Konstante - auch nach End Sub?

On error 10 sekunden pause and resume

VBA Resume vier mal, dann Resume next

On Error resume next

Excel4Makro - on error resume next

On Error Resume ohne Funktion an einem PC

OptionButtons per VBA: Automation Error

VBA: deutsche OK - englische Version: Error 13

If Rows.Hidden = True Then End

VBA Abfrage on error - nur 1 mal OK

VBA arbeitsmappenübergreifend

On Error Resume Next

VBA Endlosschleife beim Drucken unterbinden

Spalten anhand Überschriften ausblenden (VBA)

VBA end if

If then Anwendung

einzelne Legendenbeschriftung mit VBA ändern

Zeilen mit Suchbegriff einblenden - VBA

Endlosschleife vBA

If Then bei ausgeblendeter Spalte

If Then bei eingeblendeter Spalte

EndSub während If

application.run beendet aufrufende Sub

If ActiveCell.Rows < 17 Then Exit Sub

VBA Beschriftung Balkendiagramm

On Error Resume Next?

VBA Tabellenübergreifende Zellen-Dropdown

VBA-Filtertab übergreifend steuert anderen Filter

VBA Excel Subtraktion in Schleife

Mit VBA auf bestehenden IE TAB zugreifen

Symbolleiste über VBA einblenden & modifizieren

Sub beenden bei Aktion (sowas wie BREAK Befehl)

Sub Workbook_BeforeClose Endlosschleife????

VBA End if wert vorhanden

VBA - Zugriff mehrerer Anwender auf zentrales XLS

VBA Copy & Paste Mappenübergreifend

VBA: if date endet in runtime error 13 mismatch

On Error Resume Next ?!!!!

if rngFIND = "" then exit sub ?

if rngFIND = "" then exit sub ?

If InStr(Target.Address, ":") > 0 Then Exit Sub

On Error -> Ende?

Schleifenproblem-If-then-else-end if

durch funktion den aufrufenden sub beenden

VBA: On Error go to Fehler

Nach "On Error Resume Next" Activate Problem

Excel, VBA, On Error resume Next...

VBA kompakte Find-Row-Funktion mit Error-Abfrage

If Schleife mit END SUB

if x < 0 and ( y="" or y>8) then rigendwas

zurückgeben von Variablen nach "END SUB"

Die Endziffern von Zahlen - VBA

on error verwenden

VBA Tabellenübergreifend ?

If-Bedingung in Neben-Sub beendet Main-Sub

On Errror Resume Next global setzen?

on error resume next ..in funktion funkt nicht ???

VBA Anfänger Problem (Fortlaufende Schleife)

Problem mit If Variable = "" Then Exit Sub

On error resume next

Probleme mit Errorhandler: On Error Goto Ende

If .... then End If

on error resume

On Error Resume Next

On Error Resume Next und Speccialcells

If Zelle Is Nothing Then ??? End If

If = True Then Makro Beenden

VBA beispiel Registerübergreifend

if then Anwendung in einem Makro

On Error Resume Next

On Error GoTo Ende

On Error->Sub

on error resume next vermeiden

VBA: Nachfolgendes Sub NICHT aufrufen

If Then Abfrage in Sub

Makro ergänzen: if xy then end sub

VBA: nach End Sub zurück zu End If

VBA Liniendiagramm letzte Datenpunkte beschriften

VBA führt On Error-Anweisung aus obwohl kein Fehler?

OptionButtons per VBA: Automation Error

VBA: deutsche OK - englische Version: Error 13

VBA Abfrage on error - nur 1 mal OK

VBA: On Error go to Fehler

Excel, VBA, On Error resume Next...

VBA kompakte Find-Row-Funktion mit Error-Abfrage

VBA führt On Error-Anweisung aus obwohl kein Fehler?

On Error GoTo ErrorHandler

On error 10 sekunden pause and resume

VBA Resume vier mal, dann Resume next

On Error resume next

Excel4Makro - on error resume next

On Error Resume ohne Funktion an einem PC

OptionButtons per VBA: Automation Error

VBA: deutsche OK - englische Version: Error 13

On Error Goto bleibt hängen

VBA Abfrage on error - nur 1 mal OK

On Error go to .... aber wie ???

On Error Resume Next

on error go to errhandler:

Automation error Diagrammerstellung per VBA

VBA IF(ISERROR) .Formula

(an Otto Ecker) on error goto

on error goto

On Error Resume Next?

On Error GoTo Problem & Code Verschlankung

SVERWEIS / VLookUp unter VBA mit IFISERROR

"On Error GoTo" funktioniert nicht mehr

VBA - For Next Schleife funktioniert nur im Debug

VBA: if date endet in runtime error 13 mismatch

If-Verschachtelung und On Error GoTo

On Error Resume Next ?!!!!

On Error goto

On Error Goto funktioniert nicht

On Error Goto

On Error goto xy

VBA: On Error go to Fehler

Nach "On Error Resume Next" Activate Problem

On Error goto funktioniert nicht

Excel, VBA, On Error resume Next...

VBA kompakte Find-Row-Funktion mit Error-Abfrage

On Errror Resume Next global setzen?

on error resume next ..in funktion funkt nicht ???

On Error Goto wird ignoriert !

Probleme mit "On Error Goto"

On Error GoTo ?

On Error GoTo Fehler

On error resume next

Probleme mit Errorhandler: On Error Goto Ende

On Error GoTo

on error resume

On Error GoTo a:

On Error Resume Next

On Error Resume Next und Speccialcells

"on error goto ..." nur im ersten Durchgang?

On Error Goto ...

Sheets.Add und for...next-Schleife VBA

On Error GoTo

On Error Resume Next

On Error GoTo Ende

On Error GOTO Problem

On Error GOTO Fehler

Schleife mit "On Error GoTo Fehler"

On Error->Sub

3x On Error Goto Weiter ?

On Error goto wird immer angezeigt

on error resume next vermeiden

On Error GoTo...

VBA Schleife & If.. Then Next

Wo ist der Fehler? On Error GoTo

Shell .bat Pause einlegen bis durch mit on error go to?

VBA führt On Error-Anweisung aus obwohl kein Fehler?

Problem mit "On Error GoTo ..."

On Error GoTo ErrorHandler

On error 10 sekunden pause and resume

VBA Resume vier mal, dann Resume next

On Error resume next

VBA Code if or then nicht richtig

VBA - Hilfetexte für Funktionen wie MsgBox, InputB

Excel4Makro - on error resume next

On Error Resume ohne Funktion an einem PC

OptionButtons per VBA: Automation Error

VBA: deutsche OK - englische Version: Error 13

On Error Goto bleibt hängen

VBA Abfrage on error - nur 1 mal OK

On Error go to .... aber wie ???

On Error Resume Next

on error go to errhandler:

Application.evaluate Error 2015/ L.-Fehler 13

Automation error Diagrammerstellung per VBA

VBA IF(ISERROR) .Formula

(an Otto Ecker) on error goto

on error goto

VBA - IF then...???

VBA If Datum Then...

On Error Resume Next?

On Error GoTo Problem & Code Verschlankung

VBA if then else mit ComboBoxen

VBA If Then für 120 Namen

VBA IF "Dateipfad = false then

Excel VBA - IF AND THEN funktion

SVERWEIS / VLookUp unter VBA mit IFISERROR

"On Error GoTo" funktioniert nicht mehr

VBA Hilfe "If and then"

VBA - For Next Schleife funktioniert nur im Debug

VBA: if date endet in runtime error 13 mismatch

If-Verschachtelung und On Error GoTo

On Error Resume Next ?!!!!

On Error goto

On Error Goto funktioniert nicht

On Error Goto

On Error goto xy

VBA: On Error go to Fehler

on error -> Fehlerzeile Output in msgbox

Nach "On Error Resume Next" Activate Problem

On Error goto funktioniert nicht

Excel, VBA, On Error resume Next...

VBA kompakte Find-Row-Funktion mit Error-Abfrage

VBA If Then Else Problem

On Errror Resume Next global setzen?

on error resume next ..in funktion funkt nicht ???

On Error Goto wird ignoriert !

Probleme mit "On Error Goto"

On Error GoTo ?

On Error GoTo Fehler

On error resume next

Probleme mit Errorhandler: On Error Goto Ende

On Error GoTo

VBA: Schleife für variable Dia-Daten

On Error GoTo ErrorHandler

On Error GoTo ErrorHandler

On Error GoTo ErrorHandler

VBA Code: wenn B1 <> blank, dann I in A1 schreiben

On Error GoTo ErrorHandler

On Error GoTo ErrorHandler

On Error GoTo ErrorHandler

Variable - Konstante - auch nach End Sub?

Beliebteste Forumthreads (12 Monate)

Threadtitel

Lesezugriffe
excel wenn zelle wort enthält

16116
excel zelle hervorheben wenn andere zelle wert

15979
excel substring bis zeichen

14101

Weitere Forumthreads anzeigen

excel bedingte formatierung wenn andere zelle text enthält

12041

excel in jeder zelle etwas hinzufügen

10711

excel wenn enthält wort

9566

excel tabelle scrollen nicht möglich

9184

excel formel ziehen ohne veränderung

8778

excel erste zahl entfernen

8749

wenn wert in zelle dann wert in andere zelle

8000

sverweis und summewenn kombinieren

7556

excel prüfen, ob text in liste vorhanden

7371

wenn negativ dann null excel

7291

excel zelle färben wenn andere zelle wert

7218

excel links abschneiden ab bestimmten zeichen

7029

excel summe null

7011

excel anzahl doppelte werte nur einmal zählen

6874

excel zeichen aus zelle entfernen

6861

excel führende nullen entfernen funktion

6575

excel string abschneiden bei zeichen

6558

prüfen ob wert in spalte vorhanden

6418

excel zählen wenn datum im zeitraum

6336

zählenwenn entweder oder

6204

excel ab zeichen ausgeben

6190

excel links ab zeichen

6081

excel datum und uhrzeit in einer zelle verketten

6055

excel zeichen(10)

5829

excel letzte zeile vba

5789

excel links bis erstes leerzeichen

5766

excel verketten umbruch

5426

excel zeile nur anzeigen wenn wert

5419

vba zeilen auskommentieren

5209

zählenwenn zelle enthält

5115

tabellenblatt in excel verlinken

5033

excel letzte zeichen löschen

4977

excel bestimmte zeichen aus zelle

4892

zellen verbinden tastenkombination

4838

excel maus kreuz

4814

vba zellen löschen

4757

excel vba zelle schreiben

4695

bedingte formatierung excel datum älter als

4642

excel doppelte anführungszeichen in formel

4634

excel zellen verbinden funktioniert nicht

4575

excel wert in spalte suchen und zeilennummer ausgeben

4364

wenn datum kleiner als datum dann

4299

excel addieren wenn größer 0

4262

wenn zwei zellen leer dann

4130

excel inhalt einer zelle in eine andere übernehmen

4126

excel vba zelle hintergrundfarbe ändern

4107

excel aus kw monat ermitteln

4084

excel summewenns nicht gleich

4082

entfernungstabelle deutschland excel

4054

monat und jahr excel

3970

excel wenn auswahl dann wert

3954

wenn nv dann 0

3952

excel wenn zelle 0 dann leer

3926

excel shortcut reiter wechseln

3854

excel datumsformat funktioniert nicht

3817

name tabellenblatt in zelle einfügen

3812

finden vba

3793

vba makro stoppen

3736

excel wert aus tabelle übernehmen wenn bedingung erfüllt

3731

excel summewenn mehrere spalten addieren

3697

excel zeiten vergleichen

3678

excel text in andere zelle übertragen

3657

excel zwei links in einer zelle

3652

excel formel größer und kleiner als

3629

excel vba msgbox ja nein abbruch

3614

excel zeichen von rechts finden

3600

excel wenn farbe dann wert

3564

excel nur zahl aus zelle übernehmen

3524

excel wort aus zelle extrahieren

3509

1000er feld

3501

summewenns mit datum als suchkriterium

3478

summewenns ungleich mehrere kriterien

3457

excel spalten sperren ohne blattschutz

3422

excel blattschutz knacken

3400

excel summenprodukt

3318

excel zahlenreihe automatisch fortsetzen geht nicht

3307

aktuelle uhrzeit excel formel

3300

bedingte formatierung kopieren auf andere zellen

3222

sverweis gibt 0 anstatt leer

3169

Error on VBA code If statement

3142

excel strichlierte linie entfernen

3120

auf und ab text

3119

excel minuten in stunden und minuten umwandeln

3060

excel bedingte formatierung wenn zelle größer als andere zelle

3057

excel erste zeichen abschneiden

3031

ganze zeile löschen vba

3021

pivot kopieren ohne bezug

3014

bestimmten text aus zelle löschen excel

3003

excel gruppierungen beschriften

2990

vba excel file exists

2983

excel dezimalstunden in stunden und minuten

2978

excel pause

2975

excel buchstaben einfügen

2963

excel teilergebnis mit wenn funktion

2957

excel wenn bestimmtes datum dann

2955

excel alle tabellenblattnamen auslesen

2947

excel datum wird nicht erkannt

2897

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

Anzeige

Anzeige

Entdecke mehr

Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten

Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen

Anzeige